Из трехзначного числа n вычислили его последнюю цифру - Turbo Pascal

Формулировка задачи:

Из трехзначного числа n вычислили его последнюю цифру.Когда результат разделили на 10,а к частному прибавили последнюю цифру числа n, то получилось число x

Решение задачи: «Из трехзначного числа n вычислили его последнюю цифру»

Листинг программы

var r,x,n,l: integer;
 
 
begin
  writeln( 'readln x' );
  readln(x); 
  writeln( 'readln n' );
  readln(n); 
 
  l := n mod 10;
  writeln( 'L num: ',l );
  
  r := (x-l) * 10;
 
  writeln( 'Result: ' , r );
end.

Объяснение кода листинга программы

Объявляются переменные r, x, n, l: они будут целочисленными.
Выводится приглашение к вводу значений переменных x и n с помощью функции readln.
Значение переменной n сохраняется в l для дальнейшего использования.
Вычисляется последняя цифра числа n с помощью операции деления на 10 и остатка от деления (mod).
Выводится значение переменной l.
Вычисляется результат умножения (x-l) * 10.
Выводится результат вычислений.