Склавиатуры вводится число,определить является ли оно четным,результат вывести на экран. (написать программу в паскале)

LightMAN2017 LightMAN2017    1   19.05.2019 11:00    0

Ответы
hotrikplayp03euu hotrikplayp03euu  12.06.2020 14:54

var
a: integer;

begin
writeln('Введите число');
readln(a);
if (a mod 2 = 0) then
writeln('Число является четным') else
writeln('Число является нечетным');
end.

ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика