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.