var aux,i,j,n:integer;
a:array[1..500000]of longint;
f,g:text;
begin
assign(f,'algsort.in');reset(f);
assign(g,'algsort.out');rewrite(g);
readln(f,n);
for i:=1 to n do read(f,a[i]);
for i:=1 to n-1 do
for j:=i+1 to n do
if a[i]>a[j] then begin
aux:=a[i];a[i]:=a[j];a[j]:=aux;end;
for i:=1 to n do write(g,a[i],' ');close(g);close(f);end.