题目描述
给定两个字符串a和b,我们可以定义一些操作:a*b为将字符串a和字符串b连接起来,比如a= “aoe”,b= “jkw”,那么a*b= “aoejkw”。进一步,我们可以有指数操作,a^0= “”, a^1=a, a^2=a*a, a^n=a*(a^(n-1))=a*a*…*a (n个a)
现在给你一个字符串,你可以将它看成是a^n的形式,比如字符串”abababab”,可以认为是”abab”^2, 也可以是”abababab”^1,还可以是”ab”^4。
现在问题是,给定的字符串,我们想让它变成a^n中的n达到最大,那么这个n最大是多少?例如:”abababab”最大的n是4。
输入
第一行,一个整数m,表示有m个字符串。
接下来m行每行输入一个只含小写字母的字符串。
输出
输出m行,对于每行输出相应字符串的最大n。
样例输入
3
abcde
aaaaaa
abababab
样例输出
1
6
4
提示
30%的数据:字符串的长度≤1000;
100%的数据:字符串的长度≤1000000, m≤10,字符串内只含小写字母。
30分做法:枚举
长度范围只有1000时,我们可以枚举k, 取字符串第1个到第k个字符作为子串T,然后去验证剩下的字符串是否都是T重复得来
时间复杂度O(n^2)
100分做法:KMP,Next数组
假设字符串为S,长度为N,子串T重复K次后得到串S,那么T的长度一定为L = N/K(要整除),则T = S[1…L],将S拆分成K份,每份长度为L,则有
S[1…L] = S[L+1…2L] = S[2L+1…3L] = … = S[(K-1)L+1…KL]
由于要保证K最大,势必L要取最小,所以根据Next函数的定义,有Next[KL] = (K-1)L;
即Next[N] = N - L,所以L = N - Next[N];
但是得出的长度L还要保证能被N整除,所以如果不能整除说明L = N,即K = 1;而如果能整除,那么K = N / (N - Next[N]);
因而我们只要对字符串S做一趟KMP,对其求Next数组,剩下的就是上述结论
时间复杂度O(n)
var
q,t,len,i,ans,k:longint;
f:boolean;
next:array[0..2000011] of longint;
s:ansistring;
function find(i,k:longint):longint;
begin
if k=0 then exit(0);
if s[i]=s[next[k]+1] then exit(next[k]+1)
else exit(find(i,next[k]));
end;
begin
readln(t);
for q:=1 to t do
begin
readln(s);
len:=length(s);
fillchar(next,sizeof(next),0);
for i:=2 to len do
begin
k:=i-1;
while (s[i]<>s[next[k]+1])and(k<>0) do
begin
k:=next[k];
end;
if k=0 then next[i]:=0 else next[i]:=next[k]+1;
end;
ans:=next[len];
if ans=0 then begin writeln('1'); continue; end;
i:=ans+1;
f:=true;
while i<=len do
begin
if s[(i-1) mod ans+1]<>s[i] then begin f:=false; break; end;
i:=i+1;
end;
if f then writeln(len div (len-ans))
else writeln('1');
end;
end.