记录编号	13018	评测结果	AAAAAAAAAA
题目名称	背诵单词	最终得分	100
用户昵称	maxiem	是否通过	通过
代码语言	Pascal	运行时间	0.008 s
提交时间	2009-09-25 16:31:59	内存使用	0.14 MiB

program letter;
var
  w:array [1..100] of string;
  l,k,n,i,j:integer;
  tmp:string;
begin
  assign (input,'letter.in');
  reset (input);
  readln (n);
  for i:=1 to n do readln (w[i]);
  close (input);
  assign (output,'letter.out');
  rewrite (output);
  for i:=1 to n-1 do for j:=i+1 to n do if w[i]>w[j] then begin
    tmp:=w[i];
    w[i]:=w[j];
    w[j]:=tmp;
  end;
  for i:=1 to n do writeln (w[i]);
  close (output);
end.