Показать сообщение отдельно
  #2  
Старый 24.05.2011, 19:27
lmikle lmikle вне форума
Модератор
 
Регистрация: 17.04.2008
Сообщения: 8,096
Версия Delphi: 7, XE3, 10.2
Репутация: 49089
По умолчанию

Делаешь массив целых чисел от 1 до 50, заполняешь его.
Далее идешь циклом for, проверяешь условие и если оно выполняется, то суммируешь в какой-нить счетчик.
Ответить с цитированием