let rec f()=Scanf.scanf"%f "((2.$1.)1.)and($)i k j l=i*.i>l&f(Printf.printf"%.f "(k*.max(l-.1.)j))||mod_float l i=0.&(i$j*.k)i(l/.i)||(i+.1.$k)i l;;f()
Note that non-ascii characters in the above source code will be escaped (such as \x9f).
download
return to the top page