s,m,i,j;f(x,y,z){j=y=x;for(z=2;j%z<1?j/=z,y-=j%z?y/z:0:z*z++