Visual Basic, .NET, ASP, VBScript
 

   
   
     

Форум - VBA

Страница: 1 |

 

  Вопрос: Помогите!(очень надо)! Добавлено: 27.09.09 12:27  

Автор вопроса:  Илья
Пожалуйсто помогите написать 2 программы в VBA(Excele).
1.Сосчитайте сколько четырёхзначных чисел имеют одинаковые суммы двух первых и двух последних цифр.

2.Задан одномерный массив и некоторое число. Найдите на каком месте стоит число в массиве.

Ребят очень срочно надо!!!Помогите пожалуйсто!

Ответить

  Ответы Всего ответов: 2  

Номер ответа: 1
Автор ответа:
 Sharp


Лидер форума

ICQ: 216865379 

Вопросов: 106
Ответов: 9979
 Web-сайт: sharpc.livejournal.com
 Профиль | | #1
Добавлено: 27.09.09 20:33
  1. res = 0
  2. for i = 1 to 9
  3. for j = 0 to 9
  4. for k = 0 to 9
  5. for l = 0 to 9
  6. if i + j = k + l then res = res + 1
  7. next
  8. next
  9. next
  10. next


  1. pos = -1
  2. for i = 1 to ubound(arr)
  3. if arr(i) = num then
  4. pos = i
  5. exit for
  6. end if
  7. next

Ответить

Номер ответа: 2
Автор ответа:
 Илья



Вопросов: 1
Ответов: 1
 Профиль | | #2 Добавлено: 28.09.09 10:18
спасибо за помощ...все получилось!!!

Ответить

Страница: 1 |

Поиск по форуму



© Copyright 2002-2011 VBNet.RU | Пишите нам