rogram B1;

{$APPTYPE CONSOLE}

uses
  SysUtils;
var
  a, b, a2b, ab2, i, j, i1, j1, j2: integer;
  ok: boolean;
begin
  read (a, b, a2b, ab2);
  if (a = 0) then begin
    i := -999;
    i1 := 999;
  end
  else begin
    i := a;
    i1 := a;
  end;
  if (b = 0) then begin
    j := -999;
    j1 := 999;
  end
  else begin
    j := b;
    j1 := b;
  end;
  j2 := j;
  ok := true;
  for i := i to i1 do begin
   if (ok) then begin
    for j := j2 to j1 do begin
      if (i < j) then
        continue;
      if ((a2b <> 0) and (i * i * j = a2b)) then begin
        if ((ab2 <> 0) and (j * j * i = ab2)) then begin
          write (i, ' ', j, ' ', a2b, ' ', ab2);
          ok := false;
          break;
        end;
      end;
      if ((a2b = 0) and (ab2 <> 0) and (j * j * i = ab2)) then begin
        write (i, ' ', j, ' ', i * i * j, ' ', ab2);
        ok := false;
        break;
      end;
      if ((ab2 = 0) and (a2b <> 0) and (i * i * j = a2b)) then begin
        write (i, ' ', j, ' ', a2b, ' ', j * j * i);
        ok := false;
        break;
      end;
      if ((ab2 = 0) and (a2b = 0)) then begin
        write (i, ' ', j, ' ', i * i * j, ' ', j * j * i);
        ok := false;
        break;
      end;
    end;
   end
   else
    break;
  end;
  readln;
  readln;
end.