разработайте программу в паскаль, которая запрашивает у пользователя любое натуральное (целое положительное) число и проверяет его на четность/нечетность (используйте либо mod либо odd), результат выводится на экран
More Questions From This User See All
Answers & Comments
Verified answer
Var n:integer;begin
write('n='); readln(n);
if n mod 2 = 0
then writeln('Число четное')
else writeln('Число нечетное');
end.
Пример:
n=15
Число нечетное