let rec($)m?(w=m*m*m)j n=n<763&m=n&(j=6&()=Printf.printf"%d
"n;2$0)(n+1);(m+1$j+n/m*m/n-n/w*w/n)n;;(2$0)9