создать программу позволяющую по последней цифре данного числа определить последнюю цифру куба этого числа

var
  n:integer;

begin
  Write('n='); Read(n);
  n:=Abs(n); { защита от злобных буратинок, любящих минусы }
  n:=n mod 10;
  n:=n*n*n mod 10;
  Writeln('Последняя цифра куба этого числа равна ',n)
end.


n=352421137
Последняя цифра куба этого числа равна 3