ll@N,P[4]{};rep(i,N){ll@(A,B),t=0;while(~A&1&&t<3)t++,A/=2;P[t]+=B;}wt(P[3]+(P[1]<P[2]?P[1]+P[2]/2:P[2]+P[1]/3));