1Дано четырехзначное число. Проверить, является ли оно палиндромом. Примечание: палиндромом

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

Задать свой вопрос
1 ответ
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
Не автоморф
, оставишь ответ?
Имя:*
E-Mail:


Добро пожаловать!

Для того чтобы стать полноценным пользователем нашего портала, вам необходимо пройти регистрацию.
Зарегистрироваться
Создайте собственную учетную запить!

Пройти регистрацию
Авторизоваться
Уже зарегистрированны? А ну-ка живо авторизуйтесь!

Войти на сайт