ll@n,@w,@x[n],@y[n];
ll d[160],s[2d5+1]{};
rep(i,n){
	REP[d](c,Divisor(x[i],d)){
		s[c]+=y[i];
	}
}
wt(max(((s+w))(2d5+1-w)));