Central binomial coefficient by m.ukai

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

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

download

return to the top page