let rec f x=Printf.printf"%d "(truncate x);x>0.9&f(x-.10.**(floor(log10(x-.0.1))));;f(read_float())
Note that non-ascii characters in the above source code will be escaped (such as \x9f).
download
return to the top page