Определить, является ли данное число А, четным.
Определить, является ли данное число А, четным.
Гость
Ответ(ы) на вопрос:
Гостьvar a:integer;
begin
write('A='); readln(a);
if a mod 2 = 0
then writeln('число ',a,' четное')
else writeln('число ',a,' нечетное')
end.
Не нашли ответ?
Похожие вопросы