Паскаль. Является ли число четным, если да, то делится ли оно на 10

Question

Информатика

Кельтск

9 ноября, 16:40

Паскаль. Является ли число четным, если да, то делится ли оно на 10

+5

Ответы (1)

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

Зинаша · Answer 1

Var x: integer;

begin writeln ('Введите число:') ; readln (x) ; if x mod 2 = 0 then begin writeln ('Число является четным.') ; if x mod 10 = 0 then writeln ('Число делится на 10.') else writeln ('Число не делится на 10.') ; end else writeln ('Число не является четным') ; end.