Question

Определите последнюю цифру степени 7n, для (n<100).

Answer 1

// PascalABC.NET 3.0, сборка 1160 от 05.02.2016
const
  r:array[0..3] of integer=(1,7,9,3);
begin
  Writeln('Последняя цифра ',r[ReadInteger('n=') mod 4])
end.

Тестовое решение:
n= 7
Последняя цифра 3