var i, n, x: integer;
c: array [-100..100] of byte;
begin
for i := -100 to 100 do c[i] := 0;
readln(n);
for i := 1 to n do
begin
read(x);
inc(c[x])
end;
readln;
for i := -100 to 100 do
for n := 1 to c[i] do
write(i, ' ')
end.