for i=0to 10a=i*5+65
?"AA",a;
for j=1to i?" = ",chr$(j+64),a-j*5;next
?next