program mccme;
{$APPTYPE CONSOLE}
uses
  SysUtils;
type t=record
  fm,im,kl,dr:string;
end;
var del:array[1..1000]of t;
    i,n,j,k:integer;
    c:char;
    m:real;
    s:string;
function swap(a,b:t):integer;
begin
swap:=0;
if(a.kl<b.kl)and(length(a.kl)>=length(b.kl))then swap:=1
else if(a.kl=b.kl)and(a.fm<b.fm)then swap:=1
else swap:=0;
end;
begin
readln(n);
for i:=1 to n do with del[i] do begin
  readln(fm);
  readln(im);
  readln(kl);
  readln(dr);
end;
for i:=2 to n do
  for j:=n downto i do if(swap(del[j],del[j-1])=1)then begin
    s:=del[j].fm;
    del[j].fm:=del[j-1].fm;
    del[j-1].fm:=s;

    s:=del[j].im;
    del[j].im:=del[j-1].im;
    del[j-1].im:=s;

    s:=del[j].kl;
    del[j].kl:=del[j-1].kl;
    del[j-1].kl:=s;

    s:=del[j].dr;
    del[j].dr:=del[j-1].dr;
    del[j-1].dr:=s;
  end;
for i:=1 to n do with del[i] do writeln(kl,' ',fm,' ',im,' ',dr);
readln;
end.