Как вывести последнюю цифру числа pascal

var n:longint;

begin

readln(n);

writeln(n mod 10);

end.

Программа будет работать при условии, что число натуральное и не больше 2*10^9

b - последняя цифра, a - исходное число

b:= a mod 10;

Чтобы вывести её:

writeln(b);