梦里的难题

前言
”女娲日天，后羿射之。“欢迎来到嘟嘟课堂。今天，嘟嘟老师讲一道看似很难，实际超简单，一听嘟嘟老师讲就茅厕顿开的一道题——梦里的难题。
题目描述
生化危机血腥暴力的场面对小星星的冲击很大，晚上频繁地做起了梦，梦里他担负起拯救世人消灭僵尸的重任，眼看就能拿到消除 T 病毒的解药还世界清静，但 T 病毒人工智能电脑挡住了星星的去路，它声称研制出 T 病毒的目的是因为察觉人类智力退化，只有聪明的人才能存活下来，如果想要拿到解药，必须回答出下面这个难题：
　　有 N(1≤N≤100000)个数字（由 1 到 K 组成，1≤K≤10000），排成一列形成数字串，例如 1,5,3,2,5,1,3,4,4,2,5,1,2,3 它包含了很多的子序列，比如(5)、(1,3,2)、(1,5,3)、(3,4,1,3)，请思考该列数字串不包含的最短的由 1 到 K 组成的的子序列长度是多少？
输入
第一行输入两个整数 N 和 K，接下来 N 行分别输入这 N 个数字
输出
一个整数表示原数字串中不包含的最短子序列长度
样例输入
14 5
1
5
3
2
5
1
3
4
4
2
5
1
2
3
样例输出
3
样例说明
所有的长度为 1 和为 2 的子序列都存在。
长度为 1 的子序列有：（1）、（2）、（3）、（4）、（ 5）
长度为 2 的子序列有：（1,1）、（1,2）、（1,3）、（1,4）、（1,5） 、（ 2,1）、（2,2）、（2,3）、（2,4）、（2,5）、 （3,1）、（3,2）、（3,3）、（ 3,4）、（ 3,5）、（4,1）、（ 4,2）、（ 4,3）、（4,4）、（4,5）、（ 5,1）、（ 5,2）、 （5,3）、（5,4）、（5,5）
长度为 3 的序列不全都有，例如：(2,2,4)
思路
童鞋们看到本题，可能会感到很难，嘟嘟老师一开始也是这样的。现在发明了一种水法，判断这一序列数中的1到k个数有几个就行了。因为长度为n的子序列需要n个同样的数，是不是感到很容易啊？
代码

var
        a:array[1..10000] of boolean;
        i,j,k,n,m,ans:longint;
begin
        assign(input,'dream.in');reset(input);
        assign(output,'dream.out');rewrite(output);
        readln(n,k);
        m:=k;
        for i:=1 to n do
        begin
                readln(j);
                if (a[j]=false) then
                begin
                        a[j]:=true;
                        dec(m);
                end;
                if (m=0) then
                begin
                        inc(ans);
                        fillchar(a,sizeof(a),false);
                        m:=k;
                end;
        end;
        inc(ans);
        writeln(ans);
        close(input);
        close(output);
end.