Составить функцию результатом которой является истинное значение, если число, заданное при обращении к функции-четное, и ложное значение в противном случае.

Question

Составить функцию результатом которой является истинное значение, если число, заданное при обращении к функции-четное, и ложное значение в противном случае.

Гость

Ответ(ы) на вопрос:

Accepted Answer

var a:integer; begin read(a); if a mod 2 = 0 then writen('Число чётное') else writen('Число нечетное'); end.