Комментарии: Поиск в строках. Наивный алгоритм на Delphi

Автор: Рустам

Рустам — Fri, 03 Jun 2011 10:44:56 +0000

Вход: ‘vlad’, ‘vl’. выход: ‘v’
Вход: ‘vlad’, ‘vla’. выход: ‘vl’
Теряет один символ.

Правильно:
…
SetLength(Matrix, Length(str1)+1);
for I:=0 to length(Matrix)-1 do
SetLength(Matrix[i],length(str2)+1);
…

Vlad — Thu, 02 Jun 2011 09:54:03 +0000

Тестировал на коротких строках, но это было уже давненько. В чем ошибка заключается?

Рустам — Thu, 02 Jun 2011 05:03:40 +0000

В вашей реализации ошибка. Вы хоть тестировали её?