我一开始用快排然后再找RE+ML?
在此膜大神
一开始看到这题还以为是个水题,结果发现内存限制竟然只有1MB!
这就说明开不了数组了,思考良久后,还是有了个成型算法。
看了下网上别人的算法,基本上和我想法一致 =_= 。
那么这里我就额外解释一下。
题目要求我们求出众数,那么众数就是出现次数最多的一个数。
所以我们可以用抵消法,设一变量K,遇到一个与当前数不同的数就将K-1,反之+1,若K=0将答案更新为当前数。
这样下来,留到最后的那个数K一定大于0,因为答案X出现次数最多,抵消不干净。
程序很短,方法很犇。
var
n,i,x,k,ans:
longint
;
begin
readln(n); k:=
0
;
for
i:=
1
to
n
do
begin
read(x);
if
k=
0
then
ans:=x;
if
ans=x
then
inc(k)
else
dec(k);
end
;
writeln
(ans);
end
.
版权声明:转载请注明出处——http://blog.youkuaiyun.com/thinfatty