for[n 1 99][make " ifelse n>9[1][0]pr(word "N= n ",A= int n/(2+20*:)+.5+5*:)]bye