Показать сообщение отдельно
Старый 02.12.2009, 18:37   #11
ViNT
Модератор
 
Регистрация: 03.04.2007
Сообщений: 2,252
Написано 597 полезных сообщений
(для 817 пользователей)
Ответ: Проверка на нечётность .

Сообщение от Ganociy Посмотреть сообщение
А можно по подробнее
В смысле поподробнее?
Допустим, есть массив A из N элементов и Memo, в который будем выводить данные о четности каждого элемента - одна строка - один элемент. Тогда будет так:

for i:= 1 to N do
 if 
odd(A[i]) then
  Memo1
.Lines.Add('Элемент '+inttostr(i)+' нечетный')
 else
  
Memo1.Lines.Add('Элемент '+inttostr(i)+' четный'); 
Вот и все.
(Offline)
 
Ответить с цитированием