|
|
Регистрация Восстановить пароль |
Регистрация | Задать вопрос |
Заплачу за решение |
Новые сообщения |
Сообщения за день |
Расширенный поиск |
Правила |
Всё прочитано |
|
Опции темы | Поиск в этой теме |
30.03.2011, 12:03 | #1 |
Пользователь
Регистрация: 30.03.2011
Сообщений: 36
|
Сравнить буквы в строках
Вводится n строк вида "XY", где X и Y любые буквы латинского алфавита. X может быть равно Y.
Пример: при n=7 7 CD AD CC DC BC DD CD Нужно посчитать максимальное число повторных букв в конце строк Если буквы одинаковые ничего не происходит, если буква стоит на 2 позиции к ней добавляется 1, если буква стоит на 1 позиции от нее отнимается 1. Если буква стоящая на 1 позиции равна 0, то она остается 0, а к букве на 2 позиции ничего не прибавляется и не отнимается. D:=1; C:=1; A:=1; B:=1; CD d=2 c=0 AD d=3 c=0 a=0 CC d=3 c=0 a=0 DC d=2 c=1 a=0 BC d=2 c=2 a=0 b=0 DD d=2 c=2 a=0 b=0 BD d=2 c=2 a=0 b=0 CD d=3 c=1 a=0 b=0 нужно вывести максимальный элемент. В этом случае D=3 |
30.03.2011, 12:58 | #2 |
Форумчанин
Регистрация: 10.01.2011
Сообщений: 243
|
Все буквы изночально равны 1?
|
30.03.2011, 13:34 | #3 |
Форумчанин
Регистрация: 27.09.2010
Сообщений: 376
|
Здравствуйте
Можно попробовать так Код:
Подправьте под Pascal, если необходимо, т.к. я писал в Delphi До свидания |
30.03.2011, 13:59 | #4 | |
Пользователь
Регистрация: 30.03.2011
Сообщений: 36
|
Да
Цитата:
Там еще доп условие: Если буква стоящая на 1 позиции равна 0, то она остается 0, а к букве на 2 позиции ничего не прибавляется и не отнимается. DD d=2 c=2 a=0 b=0 BD d=2 c=2 a=0 b=0 {b уже равно 0, значит ни каких действий не выполнять} В этом сложность, это условие же не впишешь в цикл Последний раз редактировалось zink; 30.03.2011 в 14:06. |
|
30.03.2011, 14:17 | #5 | |
Форумчанин
Регистрация: 27.09.2010
Сообщений: 376
|
Цитата:
P.S. Добавьте if на проверку Ord(StrAtoZ[1]), больше не знаю пока что сказать. Последний раз редактировалось OlegVE; 30.03.2011 в 14:19. |
|
30.03.2011, 14:34 | #6 |
Форумчанин
Регистрация: 10.01.2011
Сообщений: 243
|
Код:
|
30.03.2011, 15:05 | #7 | |
Старожил
Регистрация: 09.01.2008
Сообщений: 26,229
|
Акоб, не берусь утверждать на 100%
но, не увидел, где у Вас: Цитата:
проверьте на таких данных: Код:
|
|
30.03.2011, 16:00 | #8 |
Форумчанин
Регистрация: 10.01.2011
Сообщений: 243
|
Там нету этого условия.
Я исправил код,но он только для больших букв. Код:
|
30.03.2011, 16:22 | #9 | |
Старожил
Регистрация: 09.01.2008
Сообщений: 26,229
|
Цитата:
кстати, а кто нибудь может мне объяснить, а зачем подобная головоломка может быть полезна? Или это чистая абстракция не имеющая отношения ни к одному реальному процессу?! |
|
30.03.2011, 19:20 | #10 |
Пользователь
Регистрация: 30.03.2011
Сообщений: 36
|
Акоб спасибо.
Serge_Bliznykov, это часть задачи. Нужна была для нахождения размерности массива. В один из дней к складскому помещению привезли N ящиков. Каждый из ящиков был помечен одной буквой латинского алфавита. Причем i-му ящику соответствовала i-ая буква латинского алфавита. На складе по счастливой случайности как раз имелось N свободных площадок расположенных в ряд. Каждой из площадок была приписана одна буква латинского алфавита. Грузчику Василию поступило указание выполнить M операций вида XY, где X и Y – латинские буквы. Операция вида XY означает, что необходимо взять самый верхний ящик с площадки, помеченной буквой X и положить его на площадку помеченную буквой Y. Новый ящик можно поставить только на тот, который был поставлен на эту площадку до него. То есть ящики будут образовывать столбик. Ваша прога ищет размерность Этого массива Последний раз редактировалось zink; 30.03.2011 в 19:38. |
Похожие темы | ||||
Тема | Автор | Раздел | Ответов | Последнее сообщение |
Фильтр в строках, а не в столбцах? | MaxxVer | Microsoft Office Excel | 22 | 26.09.2017 11:18 |
поиск в строках | katena88 | Общие вопросы C/C++ | 3 | 28.10.2010 13:26 |
Счетчик в строках Grid | serik_f | БД в Delphi | 2 | 18.03.2010 02:23 |
числа в строках на C++ Builder | Dimon | Фриланс | 2 | 22.10.2009 15:30 |
Анси и Юникод в строках.... | Johnson | PHP | 7 | 03.10.2008 22:20 |