let rec(@)i?(n=read_int())p=n<i+i&1@0=Printf.printf"%d: %d
"n(p+n);(@)(i+1)~n(p+n/i*i/n*i);;1@0