Как найти палиндром в паскале?

Палиндром - последовательность символов, читающихся одинаково как назад, так и вперед. Другими словами палиндром - это перевертыш. Самый большое слово-палиндром: saippuakauppias, что в переводе с финского означает продавец.

В Turbo Pascal палиндром может являться как последовательностью букв, так и последовательностью цифр. Существует несколько способов определения палиндрома средствами Паскаль. Вот основные из них:

Нахождение палиндрома в pascal (Универсальный способ)

Данный метод работает в Паскале как с числами, так и со строками. Для реализации такого способа определения необходимо использовать цикл, в котором до половины текущей строки s будет выполнять проверка:

d := length(s);

l := d div 2;

for i := 1 to l do

if s[i] <> s[d+1-i] then pal := flase;

Числовой палиндром на Паскале

Для определения числа на палиндром, состоящего из трех цифр необходимо сравнить его крайние цифры. Для этого для правой цифры используем операцию a mod 10, а для левой: a div 10. Такой принцип можно использовать и для больших чисел, заранее приводя их к трехзначному.

Теперь вы знаете как найти средствами паскаль палиндром!

Скачать:

Палиндром - Универсальный способ нахождения палиндрома в Паскале (1 способ)

Числовой палиндром - Нахождение числового палиндрома в pascal (2 способ)

Составление палиндрома - Составление палиндрома путем реверсирования его цифр и сложения с исходными