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