3098: Hash Killer II

这天天气不错，hzhwcmhf神犇给VFleaKing出了一道题：
给你一个长度为N的字符串S，求有多少个不同的长度为L的子串。
子串的定义是S[l]、S[l + 1]、... S[r]这样连续的一段。
两个字符串被认为是不同的当且仅当某个位置上的字符不同。

VFleaKing一看觉得这不是Hash的裸题么！于是果断写了哈希 + 排序。
而hzhwcmhf神犇心里自然知道，这题就是后缀数组的height中 < L的个数 + 1，就是后缀自动机上代表的长度区间包含L的结点个数，就是后缀树深度为L的结点的数量。
但是hzhwcmhf神犇看了看VFleaKing的做法表示非常汗。于是想卡掉他。

VFleaKing使用的是字典序哈希，其代码大致如下：
u64 val = 0;
for (int i = 0; i < l; i++)
 val = (val * base + s[i] - ‘a‘) % Mod;
u64是无符号int64，范围是[0, 2^64)。
base是一个常量，VFleaKing会根据心情决定其值。
Mod等于1000000007。
VFleaKing还求出来了base ^ l % Mod，即base的l次方除以Mod的余数，这样就能方便地求出所有长度为L的子串的哈希值。
然后VFleaKing给哈希值排序，去重，求出有多少个不同的哈希值，把这个数作为结果。
其算法的C++代码如下：

typedef unsigned long long u64;

const int MaxN = 100000;

inline int hash_handle(const char *s, const int &n, const int &l, const int &base)
{
 const int Mod = 1000000007;

 u64 hash_pow_l = 1;
 for (int i = 1; i <= l; i++)
  hash_pow_l = (hash_pow_l * base) % Mod;

 int li_n = 0;
 static int li[MaxN];

 u64 val = 0;
 for (int i = 0; i < l; i++)
  val = (val * base + s[i] - ‘a‘) % Mod;
 li[li_n++] = val;
 for (int i = l; i < n; i++)
 {
  val = (val * base + s[i] - ‘a‘) % Mod;
  val = (val + Mod - ((s[i - l] - ‘a‘) * hash_pow_l) % Mod) % Mod;
  li[li_n++] = val;
 }

 sort(li, li + li_n);
 li_n = unique(li, li + li_n) - li;
 return li_n;
}

hzhwcmhf当然知道怎么卡啦！但是他想考考你。

没有输入。

你需要输出一组数据使得VFleaKing的代码WA掉。我们会使用Special Judge检查你的结果的正确性。
第一行两个用空格隔开的数n、l。
第二行是一个长度为n的字符串。只能包含‘a‘~‘z‘。
需要保证1 <= n <= 10^5, 1 <= l <= n，
不符合以上格式会WA。
不要有多余字符，很可能导致你WA。

如果一个房间里有23个或23个以上的人，那么至少有两个人的生日相同的概率要大于50%。

VFleaKing & hzhwcmhf

题解：其实这题的HINT已经是个绝好的提示了——对于mod 1000000007而言，哈希字符串跪的概率相当大不解释（HansBug：嘿嘿嘿幸亏我从来不用hash）。。。很明显此题就算不去有意卡常数也有相当大的概率卡掉VFleaking神犇的程序卡掉。。。由于CYG神犇今天说这题要是N=1000000 M=1000时的随机字符串能造成我的程序WA的话，那可以买彩票去了——于是我来了一发——真的WA了——于是再来一发一样的程序——Accept呵呵呵呵。。。（HansBug：话说我在省选前这么浪费RP真的好么 phile：。。。）

 1 /**************************************************************
 2     Problem: 3098
 3     User: HansBug
 4     Language: Pascal
 5     Result: Accepted
 6     Time:12 ms
 7     Memory:220 kb
 8 ****************************************************************/
 9  
10 var
11         i,j,k,l,m,n:longint;
12 begin
13         n:=100000;
14         m:=1000;
15         writeln(n,‘ ‘,m);
16         randomize;
17         for i:=1 to n do
18                 write(chr(97+random(26)));
19         writeln;
20 end.

（HansBug：作为对比我再来一发WA的呵呵呵请原谅我的无聊我是来水经验的不解释 phile：什么鬼。。。）

 1 /**************************************************************
 2     Problem: 3098
 3     User: HansBug
 4     Language: Pascal
 5     Result: Wrong_Answer
 6 ****************************************************************/
 7  
 8 var
 9         i,j,k,l,m,n:longint;
10 begin
11         n:=100000;
12         m:=1000;
13         writeln(n,‘ ‘,m);
14         randomize;
15         for i:=1 to n do
16                 write(chr(97+random(26)));
17         writeln;
18 end.