(ssl1063)P1097 2007年分区联赛提高组之一 统计数字

2007年分区联赛提高组之一 统计数字

Time Limit:1000MS

Memory Limit:256000K

Total Submit:375

Accepted:154

Description

　　某次科研调查时得到了n个自然数，每个数均不超过1500000000（1.5*109）。已知不相同的数不超过10000个，现在需要统计这些自然数各自出现的次数，并按照自然数从小到大的顺序输出统计结果。

Input

　　输入包含n+1行；
　　第一行是整数n，表示自然数的个数；
　　第2~n+1每行一个自然数。

Output

　　输出包含m行（m为n个自然数中不相同数的个数），按照自然数从小到大的顺序输出。每行输出两个整数，分别是自然数和该数出现的次数，其间用一个空格隔开。

Sample Input

8
2
4
2
4
5
100
2
100

Sample Output

2 3
4 2
5 1
100 2

Hint

40%的数据满足：1<=n<=1000

80%的数据满足：1<=n<=50000

100%的数据满足：1<=n<=200000，每个数均不超过1500 000 000（1.5*109）

Source

elba

   题解：本体依旧是哈希表(哈希部分请看这里）
   本题是统计数字，思路是用哈希表储存数字。
   由于题目要求从大到小输出，于是还需要个快排
   （注：其实本题可以找出min和max来使最后的输出减少循环次数，但因为个人加的min和max会报错，便放弃了。。。有兴趣的同学可以尝试来提速！(ง •̀_•́)ง）

const
 maxn=50001;
var
 a,b:array[0..maxn] of longint;
 i,x,n:longint;
function try(t:longint):longint;//哈希表
var
 tmp:longint;
begin
 tmp:=t mod maxn;
 while (a[tmp]<>0) and (a[tmp]<>t) do
  tmp:=(tmp+1) mod maxn;
 try:=tmp;
end;
procedure kp(l,r:longint);//快排
var
 i,j,mid,t:longint;
begin
 i:=l;j:=r;
 mid:=a[(l+r)div 2];
 repeat
  while a[i]<mid do inc(i);
  while a[j]>mid do dec(j);
  if i<=j then
   begin
    t:=a[i];a[i]:=a[j];a[j]:=t;
    t:=b[i];b[i]:=b[j];b[j]:=t;
    inc(i);dec(j);
   end;
 until i>j;
 if l<j then kp(l,j);
 if i<r then kp(i,r);
end;
begin
 read(n);
 for i:=1 to n do
  begin
   read(x);
   a[try(x)]:=x;//储存进哈希中
   inc(b[try(x)]);//记录个数
  end;
 kp(0,maxn);
 for i:=0 to maxn do
  if a[i]<>0 then writeln(a[i],' ',b[i]);//如果里面有数就输出它和它出现的次数
end.