Сравнение двух массивов

Программирование на Visual Basic, главный форум. Обсуждение тем программирования на VB 1—6.
Даже если вы плохо разбираетесь в VB и программировании вообще — тут вам помогут. В разумных пределах, конечно.
Правила форума
Темы, в которых будет сначала написано «что нужно сделать», а затем просьба «помогите», будут закрыты.
Читайте требования к создаваемым темам.
Валентин
Начинающий
Начинающий
 
Сообщения: 3
Зарегистрирован: 06.10.2004 (Ср) 15:36
Откуда: toronto

Сравнение двух массивов

Сообщение Валентин » 06.10.2004 (Ср) 15:49

Желаю здравия всем!

Имеется два массива по 10 цифр. Надо сравнить их и найти колличество совпадений цифр.

Vitaly1
Брехман
Брехман
 
Сообщения: 1578
Зарегистрирован: 30.12.2002 (Пн) 16:35
Откуда: Russia, Mosсow

Сообщение Vitaly1 » 06.10.2004 (Ср) 16:43

k=0
for i=1 to 10
if a(i) = b(i) then
k=k+1
end if
next i

Валентин
Начинающий
Начинающий
 
Сообщения: 3
Зарегистрирован: 06.10.2004 (Ср) 15:36
Откуда: toronto

Сообщение Валентин » 06.10.2004 (Ср) 16:58

Огромное спасибо.

Валентин
Начинающий
Начинающий
 
Сообщения: 3
Зарегистрирован: 06.10.2004 (Ср) 15:36
Откуда: toronto

Сообщение Валентин » 06.10.2004 (Ср) 18:38

Проверил. Не работает в том случае если одинаковые цифры в обеих массивах стоят в разных местах. Пришлось немного добавить код
k=0
for i=1 to 10
for n=1 to 10
if a(i) = b(n) then
k=k+1
end if
next n
next i

в этом случае могут быть ошибки или нет?


Вернуться в Visual Basic 1–6

Кто сейчас на конференции

Сейчас этот форум просматривают: Yandex-бот и гости: 0

    TopList