for n=1to 99b=n<11 ?"N=",n,",A=",int(n/2+.5)*b+int(n/22+5.5)*!b next