for[n 1 99][make " ifelse n>9[1][0]pr(word "N= n ",A= int n/(2+20*:)+.5+5*:)]bye
Note that non-ascii characters in the above source code will be escaped (such as \x9f).
download
return to the top page