for n=1to 99b=n>9
?"N=",n,",A=",int(n/(2+20*b)+.5+5*b)next