Написать программу в паскале, определяющую является ли число перевертышем в паскаль. p.s...

0 голосов
106 просмотров

Написать программу в паскале, определяющую является ли число перевертышем в паскаль. p.s перевертыш т.е с двух сторон читается одинаково, например 111

помогите!!!!


Информатика (132 баллов) | 106 просмотров
Дан 1 ответ
0 голосов
Правильный ответ
// PascalABC.NET 3.3, сборка 1542 от 05.10.2017
// Внимание! Если программа не работает, обновите версию!

begin
  var n:=ReadInteger('Введите натуральное число: ').ToString;
  if n=ReverseString(n) then Writeln('Перевертыш')
  else Writeln('не перевертыш')
end.

Пример
Введите натуральное число:  3527253
Перевертыш

Введите натуральное число:  135233
не перевертыш
(150k баллов)