var v:array [1..500000] of int64;
    aux:int64;
    i, j, n:longint;
    buf1, buf2:array [1..500000] of char;
    f, g:text;

begin
assign (f, 'algsort.in');
reset (f);
settextbuf (f, buf1);
assign (g, 'algsort.out');
rewrite (g);
settextbuf (g, buf2);

read (f, n);
for i := 1 to n do read (f, v[i]);

for i := 1 to n-1 do
  for j :=i to n do
    begin
    if v[i]>v[j] then begin aux:= v[i];v[i]:=v[j]; v[j]:=aux; end;
    end;

for i := 1 to n do write (g, v[i], ' ');
close (f);
close (g);
end.