const n=10;
var A:array[1..n] of integer;
t,e,i,j:integer;
begin
for i:=1 to n do
begin
A[i]:=Random(26)-15;
Write(A[i]:4);
end;
Writeln;
t:=0;
e:=0;
repeat
Inc(e);
if A[e]=0 then Inc(t);
if t=2 then break;
if e=n then break;
until (t=2) or (e=n);
if t<2 then Writeln('Nevozmozhno')
else
begin
for i:=e+1 to n-1 do
for j:=e+1 to n-1 do
if a[j]<A[j+1] then
begin
t:=A[j];
A[j]:=A[j+1];
A[j+1]:=t;
end;
for i:=1 to n do Write(A[i]:4);
end;
Readln;
end.