var
  min, min2, max, max2, a: integer;

begin
  max := 0;
  max2 := 0;
  min := 30001;
  min2 := 30002;
  repeat
    readln(a);
    if (a < min) and (a <> 0) then begin
      min2 := min;
      min := a;
    end;
    if (a > min) and (a <> 0) and (a < min2) then begin
      min2 := a;
    end;
    if (a > max) and (a > max2) then begin
      max2 := max;
      max := a;
    end;
    if (a < max) and (a > max2) then
      max2 := a;
  until a = 0;
  writeln(max2 + max, ' ', min + min2)
end.