(loop for N from 1 to 99 do(format t"N=~a,A=~a "N(floor(/(if(> N 9)(+(/ N 11)11)(1+ N))2))))