Опубликовано 13.06.2017 по предмету Информатика от Гость >> <<

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

Ответ оставил Гость

// 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