Дано трехзначное число. Определить, заканчивается ли оно четной цифрой.

Question

Раду

22 апреля, 17:50

+1

Ответы (2)

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

Динар · Answer 1

Var a:integer;

Begin

Readln (a) ;

If a mod 2=0 Then Writeln ('Чётное') else Writeln ('Нечётное') ;

Readln;

End.

Агаша · Answer 2

Если последняя цифра делится на 2, значит число четное