{
Student name: Ena Oster
School name: V. gimnazija, Zagreb, Croatia
Division: Senior
Contest: #1
}

var niz:array [1..11, 1..4] of real;
    e, pla:array [1..11] of real;
    i, po, j:integer;
    p,d,t,c,pet, br, max, min, x:real;

begin
     for i:=1 to 10 do begin
         readln (niz[i][1], niz[i][2], niz[i][3]);
     end;

     t := -1000;
     for i:=1 to 10 do begin
         br := ((1 - (niz[i][1] * 0.03)) * niz[i][2]) + (niz[i][1] * 0.03 * niz[i][3]);
         {e[i] := br /16;
         e[i] := e[i] / niz[i][1];   }
         if (br > t) then begin
            t := br;
            po := i;
         end;
         {if (e[i] < min) then min := e[i];}
     end;
     t := t * 1000000;


     max := niz[1][2] / niz[1][1];
     min := niz[1][2] / niz[1][1];
     for i:=2 to 10 do begin
         if ((niz[i][2] / niz[i][1]) > max) then begin
             max := niz[i][2] / niz[i][1];
         end;
         if ((niz[i][2] / niz[i][1]) < min) then begin
             min := niz[i][2] / niz[i][1];
         end;
     end;
     p := max - min;
     p := p / 16;
     p := p * 1000000;


     d := max + min;
     d := d / 18;
     d := d / 2;
     d := d * 1000000;


     c := 0;
     for i:=1 to 10 do begin
         br := ((1 - (niz[i][1] * 0.03375)) * niz[i][2]) + (niz[i][1] * 0.03375 * niz[i][3]);
         e[i] := br;
         c := c + e[i];
     end;
     c := c / 10;
     c := c * 1000000;


     for i:=1 to 10 do begin
         pla[i] := niz[i][2] / niz[i][1];
     end;
     for i:=1 to 9 do begin
         for j:=i+1 to 10 do begin
             if (pla[i] < pla[j]) then begin
                 x := pla[i];
                 pla[i] := pla[j];
                 pla[j] := x;
             end;
         end;
     end;
     pet := (pla[5] + pla[6]) / 2;
     pet := pet * 1000000;

     writeln (p:0:0);
     writeln (d:0:0);
     writeln (t:0:0, ' by #', po);
     writeln (c:0:0);
     writeln (pet:0:0);

     {for i:=1 to 10 do begin
         writeln (e[i]:0:3);
     end;
     for i:=1 to 10 do begin
         writeln (i, ' ', niz[i][1], ' ', niz[i][2], ' ', niz[i][3]);
     end;}
readln;
end.