main=mapM(putStrLn.(#65))['@'..'J'] '@'#n="AA"++show n c#n=pred c#(n+5)++" = "++c:show n