var a,b:comp;begin
for a:=-12to 12do for b:=-12to 12do write(chr(abs(a)+abs(b)+65):2,^j:ord(b=12))end.