KMP模板

最新推荐文章于 2019-08-12 23:26:33 发布

Jacky35

最新推荐文章于 2019-08-12 23:26:33 发布

阅读量418

点赞数 1

分类专栏：模板库字符串 KMP&EXKMP 模板库文章标签： kmp

本文链接：https://blog.csdn.net/u011056504/article/details/51406991

版权

模板库同时被 3 个专栏收录

43 篇文章 0 订阅

订阅专栏

模板库

39 篇文章 6 订阅

订阅专栏

字符串

21 篇文章 0 订阅

订阅专栏

kmp用来快速求一个字符串的给定字串的数量。可以说是pascal的pos()，十分高效
详细解释点这里
求next

for i:=2 to m do
    begin
        while (j>0)and(s[i]<>s[j+1]) do j:=next[j];
        if s[i]=s[j+1] then inc(j);
        next[i]:=j;
    end;

求KMP

function kmp(s1,s2:ansistring):longint;
var
    i,j,k,n,ans:longint;
begin
    j:=0;n:=length(s1);ans:=0;
    for i:=1 to n do
    begin
        while (j>0)and(s1[i]<>s2[j+1]) do begin j:=next[j];end;
        if s1[i]=s2[j+1] then inc(j);
        if j=m then
        begin
            inc(ans);
            j:=next[j];
        end;
    end;
    exit(ans);
end;