program lastDigit;
var
number, last: integer;
begin
writeln('Введите любое трехзначное число: ');
readln(number);

last := number mod 10;

writeln('Последняя цифра числа ', number, ' это ', last);
end.