Sum of Divisors for OCaml Golf Competition by Kurata

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

Note that non-ascii characters in the above source code will be escaped (such as \x9f).

download

return to the top page