Написать программу, которая проверяет, является ли четным введенное пользователем цело число.
Вопрос посетителя
Написать программу, которая проверяет, является ли четным введенное пользователем цело число.
Ответ эксперта
Program zadacha_2;
var
n:integer;
begin
writeln(‘введите целое число’);
readln(n);
write(‘число’,n,’-‘);
if n mod 2=0
then writeln (‘четное’)
else writeln(‘нечетное’);
readln;
end.
