Показаны различия между двумя версиями страницы.
Предыдущая версия справа и слева Предыдущая версия | |||
cp:obx-lcs [2024/05/24 17:46] iadenisov |
cp:obx-lcs [2024/05/24 17:47] (текущий) iadenisov |
||
---|---|---|---|
Строка 6: | Строка 6: | ||
<code componentpascal> | <code componentpascal> | ||
+ | |||
+ | MODULE DemoLCS; | ||
+ | |||
+ | IMPORT Log, Strings; | ||
+ | |||
(* Longest Common Substring (LCS) *) | (* Longest Common Substring (LCS) *) | ||
Строка 46: | Строка 51: | ||
END | END | ||
END FindLCS; | END FindLCS; | ||
- | </ | ||
- | === Пример использования | + | (* Пример использования |
- | + | ||
- | <code componentpascal> | + | |
PROCEDURE Do*; | PROCEDURE Do*; | ||
VAR | VAR | ||
Строка 62: | Строка 64: | ||
Log.String(" | Log.String(" | ||
END Do; | END Do; | ||
+ | |||
+ | END DemoLCS. | ||
</ | </ | ||