记录编号	20391	评测结果	AAAAAAAAAA
题目名称	NBA总冠军	最终得分	100
用户昵称	ybh	是否通过	通过
代码语言	Pascal	运行时间	0.029 s
提交时间	2010-10-25 22:05:30	内存使用	0.13 MiB

{NBA总冠军}
{水题}
{yangbohua}
{time: 2010-10-25}

program nba;
var
  t:array[1947..2009] of string;
  s:string;
  n,i,y:integer;

begin
  assign(input,'nba.in');
  reset(input);
  assign(output,'nba.out');
  rewrite(output);

  readln(n);
  for i:=1 to n do
  begin
    readln(s);
    val(copy(s,length(s)-4+1,4),y);
    delete(s,length(s)-5+1,5);
    t[y]:=s;
  end;

  for i:=1947 to 2009 do
    if t[i]<>''
      then writeln(i,' ',t[i]);

  close(input);
  close(output)
end.