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

228665123 228665123    1   07.09.2019 03:40    0

Ответы
tsoikin77 tsoikin77  06.10.2020 22:21
// PascalABC.NET 3.3, сборка 1542 от 05.10.2017
// Внимание! Если программа не работает, обновите версию!

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

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

Введите натуральное число:  135233
не перевертыш
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика