№1 дано четырехзначное число. проверить, является ли оно палиндромом. примечание: палиндромом называется число, слово или текст, которые одинакового читаются слева направо и справа налево. например, в нашем случае это числа 1441, 5555, 7117 и т. д. №2 автоморфным числом называется число, равное последним цифрам своего квадрата. например, 52=25, 252=625. составить программу, которая определяет, являются ли числа автоморфными.

PascalABC.NET 3.3.5, сборка 1659 от 09.04.2018
Внимание! Если программа не работает, обновите версию!

№1

begin
  var a:=ReadInteger.ToString;
  Writeln(a=a.Inverse)
end.

Примеры
2441
False

1991
True

№2

begin
  var n:=int64(ReadInteger);
  var s:=n.ToString;
  var s2:=(n*n).ToString;
  if s2.Right(s.Length)=s then Writeln('Афтоморф')
  else Writeln('Не автоморф')
end.

Примеры
625
Афтоморф

1020
Не автоморф