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

Question

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

Answer 1

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