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

спасибо

Ох уж этот Паскаль Program zz;var a:integer;beginreadln(a);a:=a mod 10;if a mod 2=0 then writeln(a,' -четное число')                                  else writeln(a,' -нечетное число');end.

VarA:integer;BeginWrite('A = ');ReadLn(A);if (A mod 10) mod 2 = 0 then WriteLn(A mod 10,' - чётное число')else WriteLn(A mod 10,' - НЕчётное число')End.