Sum of Divisors for OCaml Golf Competition by xsd

let(!)n=Printf.printf"%d: %d\n"n(let r=ref 0in for i=1to n do if n mod i=0then r:=!r+i done;!r)let()=while 0=0do!(read_int())done

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

download

return to the top page