• Определить среди шестизначных чисел палиндромы (палиндромом называется число, которое читается слева направо и с права налево одина-ково) в паскаль.

Ответы 1

  • // PascalABC.NET 3.1, сборка 1250 от 28.05.2016begin  var s:=ReadInteger('Введите шестизначное натуральное число:').ToString;  if s=ReverseString(s) then Writeln('Это палиндром')  else Writeln('Это не палиндром')end.Тестовое решениеВведите шестизначное натуральное число: 158851Это палиндром
    • Автор:

      bean16
    • 6 лет назад
    • 0
  • Добавить свой ответ

Еще вопросы

Войти через Google

или

Забыли пароль?

У меня нет аккаунта, я хочу Зарегистрироваться

How much to ban the user?
1 hour 1 day 100 years