let rec f i x s=i>x/2&f 1(read_int(Printf.printf"%d: %d
"x(x+s)))0||f(i+1)x(s+1/(1+x mod i)*i);;f 1(read_int())0