let rec(^)i s n=if i=0 then s else (i-1^s+(if n mod i=0 then i else 0))n;;while 1=1 do(fun n->Printf.printf"%d: %d
"n((n^0)n))(read_int())done