文章标题

翻译APP

【本题来自某网站（我是在它上面看到的）/洛谷（我后来发现的）】
题目：
题目描述
某翻译软件原理很简单，它只是从头到尾，依次将每个英文单词用对应的中文含义来替换。对于每个英文单词，软件会先在内存中查找这个单词的中文含义，如果内存中有，软件就会用它进行翻译；如果内存中没有，软件就会在外存中的词典内查找，查出单词的中文含义然后翻译，并将这个单词和译义放入内存，以备后续 的查找和翻译。
假设内存中有M个单元，每单元能存放一个单词和译义。每当软件将一个新单词存入内存前，如果当前内存中已存入的单词数不超过M−1，软件会将新单词存入一个未使用的内存单元；若内存中已存入M个单词，软件会清空最早进入内存的那个单词，腾出单元来，存放新单词。
假设一篇英语文章的长度为N个单词。给定这篇待译文章，翻译软件需要去外存查找多少次词典？假设在翻译开始前，内存中没有任何单词。
输入
共2行。
第1行为两个正整数M和N，代表内存容量和文章的长度。
第2行为N个非负整数，按照文章的顺序，每个数（大小不超过1000）代表一个英文单词。文章中两个单词是同一个单词，当且仅当它们对应的非负整数相同。
输出
输出共1行，包含一个整数，为软件需要查词典的次数。
样例输入
3 7
1 2 1 5 4 4 1
样例输出
5
输入输出说明
整个查字典过程如下：每行表示一个单词的翻译，冒号前为本次翻译后的内存状况：
空：内存初始状态为空。
1．1：查找单词1并调入内存。
2．1 2：查找单词2并调入内存。
3．1 2：在内存中找到单词1。
4．1 2 5：查找单词5并调入内存。
5．2 5 4：查找单词4并调入内存替代单词1。
6．2 5 4：在内存中找到单词4。
7．5 4 1：查找单词1并调入内存替代单词2。
共计查了5次词典。
数据范围
对于10%的数据有M=1，N≤5。
对于100%的数据有0

var m,n,k1,k2,i,s,ans:longint; a,b:array [0..1001] of longint;     begin        readln(m,n);         k1:=1; k2:=0;         for i:=1 to n do            begin                read(s);                 if a[s]=0 then                    begin                         if k2-k1+1<m then                             begin                                inc(k2);                                 b[k2]:=s;                                 a[s]:=1;                             end else                            begin                                inc(k2);                                 b[k2]:=s;                                 inc(k1);                                 a[b[k1-1]]:=0;                                 a[s]:=1;                             end;                         inc(ans);                     end;             end;         writeln(ans);     end.