Как составить блок-схему и программу, проверяющую, верно ли

утверждение, что введенное вами целое число является четным.

Question

Вышеслав

31 января, 13:30

+1

Ответы (1)

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

Грипа · Answer 1

Var x, y: integer;

begin write ('Введите число: ') ;

readln (x) ;

y:=x mod 2;

if y=0 then writeln ('Четное')

else writeln ('Нечетное') ;

end.

Как составить блок-схему и программу, проверяющую, верно лиутверждение, что введенное вами целое число является четным.