Написать программу, которая запрашивает с клавиатуры целое число и сообщает «четное» или «нечетное» это число. pascal abc

anastasiarazumeeva anastasiarazumeeva    2   26.09.2019 22:20    0

Ответы
Gelmi Gelmi  08.10.2020 21:25
Var
  n:integer;
begin
  Write('Введите число: ');
  Readln(n);
  if Odd(n) then Writeln('Нечетное')
  else Writeln('Четное');
end.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика