Показать сообщение отдельно
  #7  
Старый 23.04.2013, 21:10
faer253 faer253 вне форума
Прохожий
 
Регистрация: 23.04.2013
Сообщения: 6
Версия Delphi: Delphi 7
Репутация: 10
По умолчанию

Цитата:
Сообщение от Alegun
Небольшой ликбез

Функция Odd(Num) возвращает true, если Num нечетно и false если наоборот.

Пример
Код:
...

var
  i : Integer;
begin
  // Отображение всех нечетных значений в диапазоне от 1 до 9
  for i := 1 to 9 do
    if Odd(i) then ShowMessageFmt('%d нечётно',[i]) 
 //  else ShowMessageFmt('%d чётно',[i])
  ;
end;
т.е. выводит сообщение " Нечётно" на 1,3,5,7 и 9
Спасибо огромнейшее за старанее,но я думаю зря я сюда написал все ровно,я не знаю просто о чем вы..
Ответить с цитированием