Дано натуральное число. верно ли, что оно оканчивается нечетной цифрой? на алгоритмическом языке

Простенький код
var 
a,b,c:integer;
begin
writeln('Введите число: ');
readln(a);
if a mod 2<>0 then writeln('Число заканчивается нечетное цифрой')
else writeln('Число заканчивается четной цифрой');
end.