while 1=1do
let a,n=ref 0,read_int()in
for k=1to n do
n/k*k=n&()=(a:=!a+k)done;Printf.printf"%d: %d
"n!a done