Ввести ціле число вивести повідомлення число парне чи непарне використовуючи операцію div
Var
n:integer;
begin
Write(n= ); Read(n);
if n = (n div 2)*2 then Writeln(Четное)
else Writeln(Нечетное)
end.
Тестовое решение:
n= 26321
Нечетное
Оцени ответ
Подпишись на наш канал в телеграм. Там мы даём ещё больше полезной информации для школьников!
