let rec f p i a n=i>0.&f(p*.(n+.9.)/.i)(i-.1.)a(n-.1.);Printf.printf"%d %.f "a p;!0and(!)x=Scanf.scanf"%d %f "(f 1. 9.);;read_int();!0
Note that non-ascii characters in the above source code will be escaped (such as \x9f).
download
return to the top page