type bil=record
     bile,min:longint;
     end;
var  a:array[1..100000] of bil;
     minu:array[1..100000] of longint;
     s,i,j,n,min,p:longint;
     f,g:text;
begin
assign(f,'bilute.in');reset(f);
assign(g,'bilute.out');rewrite(g);
readln(f,n);
s:=0;
for i:=1 to n do begin
    readln(f,a[i].bile,a[i].min);
    s:=s+a[i].bile*a[i].min;
end;
for i:=1 to n do begin
    minu[i]:=0;
    minu[i]:=s-(a[i].bile*a[i].min);
    for j:=1 to i-1 do
    minu[i]:=minu[i]+a[j].bile*(i-j);
    for j:=i+1 to n do
    minu[i]:=minu[i]+a[j].bile*(j-i);
    if (minu[i]<min) or (i=1) then  begin min:=minu[i];
                                          p:=i;
    end;
end;
writeln(g,p,' ',min);
close(g);
end.