Клавиатурой вводится число вывести на экран четное оно или нет
Var n:integer;
begin
readln(n);
if(n mod 2 = 0) then
writeln(Chetnoe)
else writeln(nechetnoe);
end.
Оцени ответ
Подпишись на наш канал в телеграм. Там мы даём ещё больше полезной информации для школьников!
