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