Чтобы определить чётность числа в Delphi с помощью функции odd(), можно написать следующий код: 14

var a: integer;begin  readln(a);  if odd(a) then wreteln('нечётное') else wreteln('чётное')end.

Функция odd() проверяет, является ли аргумент нечётным числом, и возвращает True, если является, и False — если чётным. 5

Также для определения чётности числа можно использовать оператор mod (остаток от деления): 4 если (число mod 2) равно нулю, то число чётное, иначе — нечётное. 4

Выбор метода зависит от личных предпочтений и удобства разработки программы.