Написать программу, которая проверяет, является ли четным введенное с клавиатуры целое число.

Pascal ABC

Question

Венуся

30 ноября, 18:03

+4

Ответы (1)

Знаете ответ на вопрос?

Инга · Answer 1

var

a : integer;

begin

readln (a) ;

if a mod 2 = 0 then

writeln ('число является чётным') ;

else

writeln ('число не является чётным') ;

end.

Написать программу, которая проверяет, является ли четным введенное с клавиатуры целое число.Pascal ABC