Состпвьте программу, определяющую, является ли последняя цифра введенного целого числа...

Question

Состпвьте программу, определяющую, является ли последняя цифра введенного целого числа нечётным числом(На языке Pascal ABC).

Answer 1

Var i;
begin
readln(i);
i := i mod 10; i := i mod 2;
if i = 1 then writeln('Последнее число нечётное')
else writeln('Последнее число четное');
end.