...И создал Бог программиста, и поселил его в своем вычислительном центре, чтобы работал в нем...
Читать дальше...
Согласие на обработку персональных данных.
04.04.2021
Новый выпуск журнала Автоматизация и Программирование.
27.03.2021
Новая статья Где взять Питон и как установить.
25.03.2021
Новый раздел Python.
04.03.2021
Новые видео и статья Процедура Exclude.
03.03.2021
Новый выпуск журнала Автоматизация и Программирование.
04.04.2021
Новый выпуск журнала Автоматизация и Программирование.
27.03.2021
Новая статья Где взять Питон и как установить.
25.03.2021
Новый раздел Python.
04.03.2021
Новые видео и статья Процедура Exclude.
03.03.2021
Новый выпуск журнала Автоматизация и Программирование.
Раздел: Стандартные функции Паскаля
Функция Odd
Функция Odd в Паскале определяет, является ли число чётным или нечётным. Синтаксис:
function odd(N : LongInt) : Boolean; function odd(N : LongWord) : Boolean; function odd(N : Int64) : Boolean; function odd(N : QWord) : Boolean;
Функция Odd возвращает TRUE, если число является НЕчётным. Иначе возвращает FALSE.
Как определить чётное число в Паскале
Если в функцию передано чётное число, то она возвращает FALSE. Следовательно, чтобы проверить, является ли число чётным, надо результат функции сравнить с FALSE:
if not Odd(x) then WriteLn('x - чётное число ');
Как определить нечётное число в Паскале
Если в функцию передано нечётное число, то она возвращает TRUE. Следовательно, чтобы проверить, является ли число нечётным, надо результат функции сравнить с TRUE:
if Odd(x) then WriteLn('x - нечётное число ');
Пример программы, где используется функция Odd:
program oddtest; var x : Integer; begin Randomize; x := Random(100); if Odd(x) then //Если число нечётное WriteLn('x = ', x, ' - odd number') else //Если число чётное WriteLn('x = ', x, ' - even number'); WriteLn('Press ENTER...'); //Вывести числа от 1 до 8 в два столбца for x := 1 to 8 do if Odd(x) then Write(x, ' ') else WriteLn(x); WriteLn('Then end. Press ENTER...'); ReadLn; end.

Подписаться на канал в YouTube
Вступить в группу "Основы программирования" Подписаться на рассылки по программированию |
![]() |
Как стать программистом 2.0
Эта книга для тех, кто хочет стать программистом. На самом деле хочет, а не просто мечтает. И хочет именно стать программистом с большой буквы, а не просто научиться кулебякать какие-то примитивные программки… Подробнее... |