rebol[]loop 100[x: to-list ask""print[l: to-integer(x/1 * x/3 / x/2 ** .5)x/1 / l x/3 / l]]
Note that non-ascii characters in the above source code will be escaped (such as \x9f).
download
return to the top page