№1 дано четырехзначное число. проверить, является ли оно палиндромом. примечание: палиндромом называется число, слово или текст, которые одинакового читаются слева направо и справа налево. например, в нашем случае это числа 1441, 5555, 7117 и т. д. №2 автоморфным числом называется число, равное последним цифрам своего квадрата. например, 52=25, 252=625. составить программу, которая определяет, являются ли числа автоморфными.
Внимание! Если программа не работает, обновите версию!
№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
Не автоморф