Question

Дано натуральное число. Верно ли, что оно заканчивается: - нечетной цифрой; - четной цифрой

Answer 1

var a:integer;
begin
readln(a);
if a mod 10 mod 2 = 0 then writeln ('заканчивается четной цифрой')
else writeln ('заканчивается нечетной цифрой')
end.