Предмет: Информатика, автор: rr3671

Составить программу проверки на четность введенного с клавиатуры числа

Ответы

Автор ответа: varscat
0

program test;
var number: integer;

begin
  write('Enter the number: ');
  readln(number);
  if (number mod 2 = 0) then
    writeln('Chislo ', number, ' chetnoe')
  else
    writeln('Chislo ', number, ' nechetnoe');
readln();
end.

Похожие вопросы
Предмет: Алгебра, автор: pp4011856
Предмет: Алгебра, автор: Аноним