var t,i,j,n:longint;
    a:array[1..99999]of longint;
begin
while not eof do
   begin
  readln(n);
  for i:=1 to n do read(a[i]);
  for i:=1 to n-1 do
   for j:=i+1 to n do
   if a[i]>a[j] then begin t:=a[i]; a[i]:=a[j]; a[j]:=t; end;
  for i:=1 to n do
  begin
  write(a[i],' ');
  end;
  writeln();
 end;
end.
/**************************************************************
	Problem: 2197
	User: admin
	Language: Pascal
	Result: Wrong Answer
****************************************************************/