Показаны различия между двумя версиями страницы.
| Предыдущая версия справа и слева Предыдущая версия Следующая версия | Предыдущая версия | ||
|
cp:obx-lcs [2024/05/24 17:45] iadenisov |
cp:obx-lcs [2024/05/24 17:47] (текущий) iadenisov |
||
|---|---|---|---|
| Строка 1: | Строка 1: | ||
| ====== Наибольшая общая подпоследовательность ====== | ====== Наибольшая общая подпоследовательность ====== | ||
| - | Данная реализация основана на реализации C++ с [[http:// | + | Данная реализация основана на [[http:// |
| + | |||
| + | Отличие состоит в том, что вместо строки возвращаются начальная позиция подстроки в строке **a** и её длина. | ||
| <code componentpascal> | <code componentpascal> | ||
| + | |||
| + | MODULE DemoLCS; | ||
| + | |||
| + | IMPORT Log, Strings; | ||
| + | |||
| (* Longest Common Substring (LCS) *) | (* Longest Common Substring (LCS) *) | ||
| Строка 44: | Строка 51: | ||
| END | END | ||
| END FindLCS; | END FindLCS; | ||
| - | </ | ||
| - | |||
| - | === Пример использования === | ||
| - | <code componentpascal> | + | (* Пример использования *) |
| PROCEDURE Do*; | PROCEDURE Do*; | ||
| VAR | VAR | ||
| Строка 60: | Строка 64: | ||
| Log.String(" | Log.String(" | ||
| END Do; | END Do; | ||
| - | </ | ||
| - | ==== Внешние ссылки ==== | + | END DemoLCS. |
| + | </ | ||
| - | * [[http:// | ||