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

Pascal ABC

Question

Спартак

28 марта, 00:03

+4

Ответы (1)

Знаете ответ?

Шурена · Answer 1

var

a : integer;

begin

readln (a) ;

if a mod 2 = 0 then

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

else

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

end.

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