Вот такая последовательность |
1. Заголовок темы должен быть информативным. В противном случае тема удаляется ...
2. Все тексты программ должны помещаться в теги [code=pas] ... [/code], либо быть опубликованы на нашем PasteBin в режиме вечного хранения.
3. Прежде чем задавать вопрос, см. "FAQ", если там не нашли ответа, воспользуйтесь ПОИСКОМ, возможно такую задачу уже решали!
4. Не предлагайте свои решения на других языках, кроме Паскаля (исключение - только с согласия модератора).
5. НЕ используйте форум для личного общения, все что не относится к обсуждению темы - на PM!
6. Одна тема - один вопрос (задача)
7. Проверяйте программы перед тем, как разместить их на форуме!!!
8. Спрашивайте и отвечайте четко и по существу!!!
Вот такая последовательность |
Tauka |
Сообщение
#1
|
Новичок Группа: Пользователи Сообщений: 28 Репутация: 0 |
Есть два предложения из простых смволов латынского алфавита.
Цель: надо найти найбольшую общую последовательность. Например: 1. aacdgtserf 2. ascfde Наибольшая общая последовательность тут будет "acde" -------------------- С уважением,
Таука. |
klem4 |
Сообщение
#2
|
Perl. Just code it! Группа: Пользователи Сообщений: 4 100 Пол: Мужской Реальное имя: Андрей Репутация: 44 |
вот что-то типа, щас накатал, не оч рационально, но думаю идея правильная :
uses crt; Сообщение отредактировано: klem4 - -------------------- perl -e 'print for (map{chr(hex)}("4861707079204E6577205965617221"=~/(.{2})/g)), "\n";'
|
volvo |
Сообщение
#3
|
Гость |
Цитата(klem4 @ 28.04.05 9:58) не оч рационально :yes: А если вместо
сделать вот так:
Логика программы не меняется, но по-моему это проще ... |
Guest |
Сообщение
#4
|
Гость |
1) axjx
2) satjx выводит ax а должно ajx |
volvo |
Сообщение
#5
|
Гость |
Между прочим, тестовые примеры принято давать вместе с заданием... Тем более в таких "бредовых" заданиях...
|
virt |
Сообщение
#6
|
Знаток Группа: Пользователи Сообщений: 419 Пол: Мужской Репутация: 6 |
поищи алгоритм нудельмана - вунша.
добавил позже, Прикрепленные файлы ANV.PAS ( 1.38 килобайт ) Кол-во скачиваний: 409 -------------------- |
klem4 |
Сообщение
#7
|
Perl. Just code it! Группа: Пользователи Сообщений: 4 100 Пол: Мужской Реальное имя: Андрей Репутация: 44 |
тебе осталось только подкорректировать, чтобы выводила большую из 2-х
теперь вроде привильно :low:
-------------------- perl -e 'print for (map{chr(hex)}("4861707079204E6577205965617221"=~/(.{2})/g)), "\n";'
|
Текстовая версия | 23.12.2024 19:44 |