bzoj2749

根绝欧拉函数的计算式，欧拉函数次方每次就是不断把2消掉，并把其他质因子不断变出2，最终弄成1
显然我们先预处理每个数会被弄出多少个2出来，次方=弄出来的2的总数-[一开始是否有2]
（因为一开始没2的话是要先次方一下，无法消掉1个2）

 var p,w:array[..] of longint;
     f:array[..] of boolean;
     t,i,j,n,x,y:longint;
     ans:int64;
     ch:boolean;

 begin
   w[]:=;
   for i:= to  do
   begin
     if w[i]= then
     begin
       inc(t);
       p[t]:=i;
       w[i]:=w[i-];
     end;
     for j:= to t do
     begin
       if i*p[j]> then break;
       w[i*p[j]]:=w[i]+w[p[j]];
       if i mod p[j]= then break;
     end;
   end;
   readln(t);
   while t> do
   begin
     dec(t);
     readln(n);
     ans:=;
     for i:= to n do
     begin
       readln(x,y);
       if x= then dec(ans);
       ans:=ans+int64(w[x])*int64(y);
     end;
     writeln(ans);
   end;
 end.