var
  N, temp: integer;
  A      : array[1..1001] of integer;
begin
  readln(N);
  temp := 0;
  for var i := 1 to N do begin
    read(A[i]);
    if (A[i] > 0) then
      temp := i;
  end;
  A[temp] := A[2];
  for var i := 1 to N do
     write(A[i], ' ');
end.