Составить программу для определения, является ли введенное предложение палиндромом

@федор михалыч · Регистрация: 24.02.2013

Студворк — интернет-сервис помощи студентам

Составить программу для определения: является ли введенное предложение палиндромом.
Пример палиндрома: А роза упала на лапу Азора ЗАРАНЕЕ СПАСИБО)))

@gazlan · 29.10.2013, 16:22

Дело не в регистре, а в неверном подходе.

Сценарий:

X. устроился программистом в фирму по обработке текста.

День первый
Получен контракт на поиск палиндромов в тексте. Предложение о декомпозиции на простые подзадачи, X, будучи "крутым" программистом, отвергает и впихивает всю обработку в единственный цикл.

День второй
Заказчик звонит на фирму, интересуется успехами и, заодно, вспоминает, что весь текст задан в кодировке UTF-8.

День третий
X. ищет новую работу. Его замечательный цикл выброшен и переписан новым программистом в полном соответствии с правилами декомпозиции сложных задач:

Все должно быть изложено так просто, как только возможно, но не проще.
Альберт Эйнштейн, Афоризмы

Новичок · 29.10.2013, 16:24

gazlan,а можно по-конкретнее и без этих метафор?

@gazlan · 29.10.2013, 16:30

Сообщение от Новичок

поконкретнее и без этих метафор

Перечитайте подпись в моих сообщениях.

@APALoff · 29.10.2013, 16:51

мои 5 копеек:

Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
Var
  S,ss : String;
  i : Byte;
 
Begin
 Readln(ss);  S:='';
 For i:=1 to Length(SS) do
   If ss[i]<>' ' then s:=s+ss[i];
 For i:=1 to Length(S) div 2 do
   If Upcase(S[i])<>Upcase(S[Length(S)-i+1]) then
   Begin
     Writeln('Not Polyndrome!');
     Break;
   End;
  If i>=Length(S) div 2 then Writeln('Its Polyndrome!');
End.

Новичок · 29.10.2013, 16:58

А если в предложении знаки препинания?

@ildwine · 29.10.2013, 17:02

APALoff, не учитывает знаки препинания:

Code
1
2
Ты, милок, иди яром: у дороги мина, за дорогой огород, а за ним и город у моря; иди, коли мыт.
Not Polyndrome!

Добавлено через 35 секунд
И мой вариант:

Code
1
2
3
4
5
строка:
Ты, милок, иди яром: у дороги мина, за дорогой огород, а за ним и город у моря; иди, коли мыт.
является палиндромом
ТЫМИЛОКИДИЯРОМУДОРОГИМИНАЗАДОРОГОЙОГОРОДАЗАНИМИГОРОДУМОРЯИДИКОЛИМЫТ
ТЫМИЛОКИДИЯРОМУДОРОГИМИНАЗАДОРОГОЙОГОРОДАЗАНИМИГОРОДУМОРЯИДИКОЛИМЫТ

Добавлено через 2 минуты

Не по теме:

На самом деле, флуд развели, а TC молчит

@APALoff · 29.10.2013, 17:34

Хорошо, можно и со знаками препинания:
Меняем

Pascal
1
2
For i:=1 to Length(SS) do
   If ss[i]<>' ' then s:=s+ss[i];

на

Pascal
1
2
For i:=1 to Length(SS) do
   If ss[i]<>' ' and ss[i]<>'.' and ss[i]<>',' and ss[i]<>';' and ss[i]<>':' and ss[i]<>'!' and ss[i]<>'"' then s:=s+ss[i];

по мере придумывания новых знаков препинания - добавлять в условие. =)

Добавлено через 2 минуты
Кстати, автор в условии ничего не упомянул про знаки припинания... значит условие можно трактовать в удобную для себя сторону до тех пор, пока автор не уточнит свои условия.

Добавлено через 8 минут
Кстати, знаки препинания вроде как в таблице ASCII начинаются с кода 32... их можно объединить все в одну группу и тогда строка с условием сократится.
Т.е:

Pascal
1
2
For i:=1 to Length(SS) do
   If ss[i]<>' ' and ss[i]>=#65 then s:=s+ss[i]; {#65 - ASCII код латинской буквы A}

@rangerx · 29.10.2013, 20:19

Сообщение от Новичок

А как же регистр букв,а?

Два сравниваемых символа приводятся к одному регистру. Проблема-то в чём?

Сообщение от gazlan

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

Декомпозиция, это всё конечно хорошо, вот только относительно данной задачи это звучит скорее как навязчивая идея, чем здравый подход.

День второй
Заказчик звонит на фирму, интересуется успехами и, заодно, вспоминает, что весь текст задан в кодировке UTF-8. День третий
X. ищет новую работу. Его замечательный цикл выброшен и переписан новым программистом в полном соответствии с правилами декомпозиции сложных задач: Все должно быть изложено так просто, как только возможно, но не проще. Альберт Эйнштейн, Афоризмы

Каким образом кодировка символов повлияла непосредственно на составленный алгоритм?

Новичок · 29.10.2013, 20:52

Сообщение от rangerx

Проблема-то в чём?

Проблема ни в чем,но поймите обязательно нужно к одному регистру привести.

Добавлено через 59 секунд

Сообщение от APALoff

Кстати, автор в условии ничего не упомянул про знаки припинания...

Любой нормальный человек в конце предложения точку ставит(или восклицательный или вопросительный знак).

@ildwine · 29.10.2013, 21:02

Ну просто даже многие известные палиндромы - это сложные предложения. Я приводил пример.

Добавлено через 5 минут
Морда казака за кадром.
Ты, милок, иди яром: у дороги мина, за дорогой огород, а за ним и город у моря; иди, коли мыт.
На в лоб, болван!
«Море, веру буди - ярок, скор я иду буревером» —

Новичок · 29.10.2013, 21:08

ildwine, хорошие примеры.И не знал что такие есть.

@gazlan · 29.10.2013, 23:26

Сообщение от rangerx

на составленный алгоритм

И где ваш алгоритм?

Ни строчки кода, ни алгоритма в этой теме я от вас не видел. Но с удовольствием погляжу на чтение UTF-8 задом наперед в единственном цикле.

@APALoff · 30.10.2013, 13:25

Сообщение от gazlan

И где ваш алгоритм?

Ни строчки кода, ни алгоритма в этой теме я от вас не видел. Но с удовольствием погляжу на чтение UTF-8 задом наперед в единственном цикле.

А я бы поглядел как Вы будете вводить с клавиатуры текст в кодировке UTF-8...
Может хватит оффтопить и доказывать, что программа не универсальна? Здесь такой задачи не стояло.

Новичок · 30.10.2013, 16:01

Сообщение от APALoff

кодировке UTF-8...

Кодировки то тут причем?!Говорю ж,алгоритм простой:
1)Удалить все что не является буквами
2)Все буквы в один регистр
3)Дальше простой алгоритм проверять 1 символ и последний,2 и предпоследний,и.т.д.

@gazlan · 30.10.2013, 16:38

Сообщение от Новичок

проверять 1 символ и последний

Удивительно, что самые простые вещи требуют пояснения. UTF-8: Кодирование и декодирование

Расскажите, как вы будете искать последний символ строки в кодировке UTF-8.

Новичок · 30.10.2013, 16:53

Причем здесь кодировка?!!При чем?!!

Сообщение от Новичок

проверять 1 символ и последний,2 и предпоследний

Я имел ввиду обычный алгоритм,как при перевороте массива.

@gazlan · 30.10.2013, 18:12

"Если все кажется легким — это безошибочно доказывает, что работник весьма мало искусен и что работа выше его разумения" (c) Леонардо да Винчи

Сообщение от Новичок

При чем здесь кодировка?

При том, что учет знаков препинания переводит поставленную TS задачу из области равномерного кодирования в неравномерную. И решать ее уже лучше не подпором костылями (a la скачки через разделители), а в более общем виде. И UTF-8 - просто наиболее знакомый большинству программистов пример неравномерного кодирования.

Разумеется, "проверка на палиндром" - просто учебный пример, но задачи с неравномерными кодами встречаются повсеместно.

Если вы пишете полиморфную защиту для архитектуры Intel, то вынуждены пермутировать инструкции переменного размера. В текстовом редакторе необходима работа с многобайтными кодировками и пропорциональными шрифтами итд. Иероглифические яыки (китайский, итд) - еще один важный пример. В арабском, из-за лигатур, число символов может зависеть от шрифта и их положения в строке. И даже текст, который вы сейчас просматриваете на вашем мониторе, не может быть отображен правильно без учета переменного размера символов.

Новые блоги и статьи Все статьи Все блоги /
Управление камерой с помощью скрипта OrbitControls.js на Three.js: Вращение, зум и панорамирование 8Observer8 05.03.2026 Содержание блога Финальная демка в браузере работает на Desktop и мобильных браузерах. Итоговый код: orbit-controls-threejs-js. zip. Сканируйте QR-код на мобильном. Вращайте камеру одним пальцем,. . .	SDL3 для Web (WebAssembly): Синхронизация спрайтов SDL3 и тел Box2D 8Observer8 04.03.2026 Содержание блога Финальная демка в браузере. Итоговый код: finish-sync-physics-sprites-sdl3-c. zip На первой гифке отладочные линии отключены, а на второй включены:. . .	SDL3 для Web (WebAssembly): Идентификация объектов на Box2D v3 - использование userData и событий коллизий 8Observer8 02.03.2026 Содержание блога Финальная демка в браузере. Итоговый код: finish-collision-events-sdl3-c. zip Сканируйте QR-код на мобильном и вы увидите, что появится джойстик для управления главным героем. . . .	Реалии Hrethgir 01.03.2026 Нет, я не закончил до сих пор симулятор. Эта задача сложнее. Не получилось уйти в плавсостав, но оно и к лучшему, возможно. Точнее получалось - но сварщиком в палубную команду, а это значит, в моём. . .
Ритм жизни kumehtar 27.02.2026 Иногда приходится жить в ритме, где дел становится всё больше, а вовлечения в происходящее — всё меньше. Плотный график не даёт вниманию закрепиться ни на одном событии. Утро начинается с быстрых,. . .	SDL3 для Web (WebAssembly): Сборка библиотек: SDL3, Box2D, FreeType, SDL3_ttf, SDL3_mixer и SDL3_image из исходников с помощью CMake и Emscripten 8Observer8 27.02.2026 Недавно вышла версия 3. 4. 2 библиотеки SDL3. На странице официальной релиза доступны исходники, готовые DLL (для x86, x64, arm64), а также библиотеки для разработки под Android, MinGW и Visual Studio. . . .	SDL3 для Web (WebAssembly): Реализация движения на Box2D v3 - трение и коллизии с повёрнутыми стенами 8Observer8 20.02.2026 Содержание блога Box2D позволяет легко создать главного героя, который не проходит сквозь стены и перемещается с заданным трением о препятствия, которые можно располагать под углом, как верхнее. . .	Конвертировать закладки radiotray-ng в m3u-плейлист damix 19.02.2026 Это можно сделать скриптом для PowerShell. Использование . \СonvertRadiotrayToM3U. ps1 <path_to_bookmarks. json> Рядом с файлом bookmarks. json появится файл bookmarks. m3u с результатом. # Check if. . .

@федор михалыч 0 / 0 / 0 Регистрация: 24.02.2013 Сообщений: 29

	Составить программу для определения, является ли введенное предложение палиндромом 28.10.2013, 17:49. Показов 9960. Ответов 36 Метки нет (Все метки) Составить программу для определения: является ли введенное предложение палиндромом. Пример палиндрома: А роза упала на лапу Азора ЗАРАНЕЕ СПАСИБО))) 0

@gazlan 3176 / 1935 / 312 Регистрация: 27.08.2010 Сообщений: 5,131 Записей в блоге: 1
	29.10.2013, 16:22
	Дело не в регистре, а в неверном подходе. Сценарий: X. устроился программистом в фирму по обработке текста. День первый Получен контракт на поиск палиндромов в тексте. Предложение о декомпозиции на простые подзадачи, X, будучи "крутым" программистом, отвергает и впихивает всю обработку в единственный цикл. День второй Заказчик звонит на фирму, интересуется успехами и, заодно, вспоминает, что весь текст задан в кодировке UTF-8. День третий X. ищет новую работу. Его замечательный цикл выброшен и переписан новым программистом в полном соответствии с правилами декомпозиции сложных задач: Все должно быть изложено так просто, как только возможно, но не проще. Альберт Эйнштейн, Афоризмы 0

Новичок 1682 / 1098 / 489 Регистрация: 17.07.2012 Сообщений: 5,360
	29.10.2013, 16:24
	gazlan,а можно по-конкретнее и без этих метафор? 0

Новичок 1682 / 1098 / 489 Регистрация: 17.07.2012 Сообщений: 5,360
	29.10.2013, 16:58
	А если в предложении знаки препинания? 0

@ildwine Почетный модератор 6201 / 2963 / 1300 Регистрация: 04.03.2013 Сообщений: 5,797 Записей в блоге: 1
	29.10.2013, 21:02
	Ну просто даже многие известные палиндромы - это сложные предложения. Я приводил пример. Добавлено через 5 минут Морда казака за кадром. Ты, милок, иди яром: у дороги мина, за дорогой огород, а за ним и город у моря; иди, коли мыт. На в лоб, болван! «Море, веру буди - ярок, скор я иду буревером» — 1

Новичок 1682 / 1098 / 489 Регистрация: 17.07.2012 Сообщений: 5,360
	29.10.2013, 21:08
	ildwine, хорошие примеры.И не знал что такие есть. 0