Программирование на 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
Кто сейчас на конференции
Сейчас этот форум просматривают: нет зарегистрированных пользователей и гости: 4