var i,j:comp;begin repeat write("AA");for j:=-i to-1do
write(65-j*5," = ",chr(i+j+65));writeln(65);i:=i+1until i>10end.