С клавиатуры вводится число, определить является ли оно четным, результат вывести на экран.

(написать программу в паскале)

Question

Информатика

Агита

7 ноября, 10:22

С клавиатуры вводится число, определить является ли оно четным, результат вывести на экран.

(написать программу в паскале)

+5

Ответы (1)

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

Нюса · Answer 1

var

a: integer;

begin

writeln ('Введите число') ;

readln (a) ;

if (a mod 2 = 0) then

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

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

end.

С клавиатуры вводится число, определить является ли оно четным, результат вывести на экран.(написать программу в паскале)

С клавиатуры вводится число, определить является ли оно четным, результат вывести на экран.

(написать программу в паскале)