Question

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

Answer 1

// PascalABC.NET 3.2, сборка 1367 от 20.12.2016
// Внимание! Если программа не работает, обновите версию!

begin
  var a:=Arr(0,1,4,9,6,5,6,9,4,1);
  var i:=ReadInteger('Введите натуральное число:') mod 10;
  Writeln('Последняя цифра квадрата введенного числа- ',a[i])
end.

Пример
Введите натуральное число: 76649
Последняя цифра квадрата введенного числа- 1