1151. 【克罗地亚】pjesma (Standard IO)_综合

题目描述

“Guess the song” 是一项在克罗地亚的年轻程序员中非常流行的游戏。它是一种集技能、智慧、耐性于一体的游戏。这个游戏给玩游戏的人放音乐，游戏者的目标是竟可能快地猜这首歌的歌名。
Mirko可能不是一个很好的程序员，但他是一个世界级的猜歌者。Mirko总是在专辑里的某首歌播放出至少一半歌词的时候猜出歌名。所有歌名的单词是唯一的（没有一个单词会出现一次或更多次）。
写一个程序，给出歌名和专辑名，看看Mirko在这首歌的哪个点上（在多少个单词之后）猜出歌名。

题解：

水成一x样，输入判断枚举，注意超过一半。

代码：

vara:array[1..10000] of string;n,m,i,j:longint;sum,ss,t:longint;s:string;
beginreadln(n);sum:=0;if n mod 2<>0 then t:=n div 2+1else t:=n div 2;for i:=1 to n doreadln(a[i]);readln(m);for i:=1 to m dobeginreadln(s);for j:=1 to n doif s=a[j] thenbegina[j]:='';sum:=sum+1;end;if (sum>=t)and(ss=0) then ss:=i;end;writeln(ss);
end.