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

Answer 2

Прям так писать ReadInteger?

Answer 3

Почему нет, если PascalABC.NET 3.х это позволяет? Вот если у Вас паскаль какой-то другой - тогда будут проблемы.

Answer 4

А еще больше будет, проблем .если у Вас вообще не паскаль. Вы же в вопросе язык не указали.