program olympic;
var
  jilu1,jilu2,l,jilu3,i,j,k,p,n,w,answer:longint;
  g,y,t:array[1..15]of longint;
begin
  assign (input,'olympic.in');
  reset (input);
  assign (output,'olympic.out');
  rewrite (output);
    readln (n);
    for i:=1 to n do
      readln (g[i],y[i],t[i]);
    answer:=n;
    for i:=1 to 100 do
      for j:=1 to i do
        for k:=1 to j do
        begin
          l:=i*g[1]+j*y[1]+k*t[1];
          w:=1;
          for p:=2 to n do
            if i*g[p]+j*y[p]+k*t[p]>l then
              w:=w+1;
          if w<answer then
          begin
            jilu1:=i;
            jilu2:=j;
            jilu3:=k;
            answer:=w
          end;
          if w=1 then
          begin
            writeln (jilu1,' ',jilu2,' ',jilu3);
            close (input);
            close (output);
            halt
          end
        end;
    writeln (jilu1,' ',jilu2,' ',jilu3);
  close (input);
  close (output)
end.