Алгоритмы поиска в тексте
Категория реферата: Рефераты по информатике, программированию
Теги реферата: сочинение по английскому, реферат на
Добавил(а) на сайт: Valentin.
Предыдущая страница реферата | 1 2 3 4 5 6 7 8 9 10 | Следующая страница реферата
begin
Result := 0;
lp := Length(P);
if lp > l then Exit;
for i := l - lp + 1 downto 1 do
for j := 1 to lp do
if (P[j]<>S[i+j-1]) and (P[j]<>'?') and (S[i+j-1]<>'?')
then Break
else if j = lp then
begin
Result := i;
Exit;
end;
end;
procedure WCMakeBMTable( var BMT : PBMTable;
const P : String);
var
i, j, lp, MaxShift, CurShift, SufPos : Integer;
Suffix : String;
begin
lp := Length(P);
GetMem(BMT, SizeOf(TIntVect)*lp);
if P[lp] = '?' then
for i := 0 to 255 do BMT^[lp-1][i] := 0
else
Рекомендуем скачать другие рефераты по теме: шпоры по праву, реферат по физкультуре.
Предыдущая страница реферата | 1 2 3 4 5 6 7 8 9 10 | Следующая страница реферата