Лазарь 27 октября 2019 в 12:37

Составьте программу на языке Паскаля, определяющую, является ли введенное с клавиатуры целое число четным
Пример ввода:
68
Пример вывода:
Число 68 - четное

Var
text:integer;
Begin
readln(text);
if (text mod 2 = 0) then writeln(text, - четное)
else writeln(text, - не четное)
End.

103 60

Для комментирования необходимо зарегистрироваться на сайте