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