let rec f(n,a,b)= if a>b then n else if b mod a==0 then f(n+a,a+1,b) else f(n,a+1,b);; try while true do let n=read_int()in Printf.printf"%d: %d\n"n(f(0,1,n)); done with _->();;