var x:array[1..30000]of integer;
    i,n:integer;
procedure sort(l,r:integer);
var
  i,j,x1,y1,m: integer;
begin
  i:=l;
  j:=r;
  m:=round ((l+r)/2);
  x1:=x[m];
  repeat
    while x[i]>x1 do inc(i);
    while x[j]<x1 do dec(j);
    if i<=j then
     begin
      y1:=x[i];
      x[i]:=x[j];
      x[j]:=y1;
      inc(i);
      dec(j);
     end;
  until i>j;
  if l<j then sort(l,j);
  if i<r then sort(i,r);
end;

begin
read(n);
for i:=1 to n do
  begin
   read (x[i]);
  end;
sort(1,n);
for i:=1 to n do
writeln(x[i]);
readln;
end.