• Предмет: Информатика
  • Автор: denisenokdiana1
  • Вопрос задан 8 лет назад

Составьте программу которая определяет является ли целое число введённое с клавиатуры чётным или нечётным и выводит информацию на экран

Ответы

Ответ дал: 491С
0
Допустим, что число будет называться z
Program z1;
var z:integer;
begin
Write('Целое число =');
ReadLn(z);
If z mod2=0 then WriteLn('четное') else WriteLn('нечетное');
end.
Вас заинтересует