#Mathematica, (削除) 82 (削除ここまで)(削除) 75 (削除ここまで)(削除) 67 (削除ここまで) 66 bytes
Mathematica, (削除) 82 (削除ここまで)(削除) 75 (削除ここまで)(削除) 67 (削除ここまで) 66 bytes
Print@FromCharacterCode@PadLeft[{},26,{i-1,i}~Mod~26+65]~Do~{i,26}
Technically shorter, although it prints in lowercase instead of uppercase:
#Mathematica, 64 bytes
Mathematica, 64 bytes
Print[""<>FromLetterNumber@Table[{i-1,i}~Mod~26+1,13]]~Do~{i,26}
#Mathematica, (削除) 82 (削除ここまで)(削除) 75 (削除ここまで)(削除) 67 (削除ここまで) 66 bytes
Print@FromCharacterCode@PadLeft[{},26,{i-1,i}~Mod~26+65]~Do~{i,26}
Technically shorter, although it prints in lowercase instead of uppercase:
#Mathematica, 64 bytes
Print[""<>FromLetterNumber@Table[{i-1,i}~Mod~26+1,13]]~Do~{i,26}
Mathematica, (削除) 82 (削除ここまで)(削除) 75 (削除ここまで)(削除) 67 (削除ここまで) 66 bytes
Print@FromCharacterCode@PadLeft[{},26,{i-1,i}~Mod~26+65]~Do~{i,26}
Technically shorter, although it prints in lowercase instead of uppercase:
Mathematica, 64 bytes
Print[""<>FromLetterNumber@Table[{i-1,i}~Mod~26+1,13]]~Do~{i,26}
#Mathematica, (削除) 82 (削除ここまで) (削除) 75 (削除ここまで) 67(削除) 67 (削除ここまで) 66 bytes
Do[Print@FromCharacterCode@PadLeft[Print@FromCharacterCode@PadLeft[{},26,{i-1,i}~Mod~26+65]~Mod~26+65]~Do~{i,26}
Technically shorter, although it prints in lowercase instead of uppercase:
#Mathematica, 64 bytes
Print[""<>FromLetterNumber@Table[{i-1,i}~Mod~26+1,13]]~Do~{i,26}]
#Mathematica, (削除) 82 (削除ここまで) (削除) 75 (削除ここまで) 67 bytes
Do[Print@FromCharacterCode@PadLeft[{},26,{i-1,i}~Mod~26+65],{i,26}]
#Mathematica, (削除) 82 (削除ここまで) (削除) 75 (削除ここまで) (削除) 67 (削除ここまで) 66 bytes
Print@FromCharacterCode@PadLeft[{},26,{i-1,i}~Mod~26+65]~Do~{i,26}
Technically shorter, although it prints in lowercase instead of uppercase:
#Mathematica, 64 bytes
Print[""<>FromLetterNumber@Table[{i-1,i}~Mod~26+1,13]]~Do~{i,26}
#Mathematica, (削除) 82 (削除ここまで) 75(削除) 75 (削除ここまで) 67 bytes
Print/@FromCharacterCode/@Table[PadLeft[Do[Print@FromCharacterCode@PadLeft[{},26,{i-1,i}~Mod~26+65],{i,26}];]
#Mathematica, (削除) 82 (削除ここまで) 75 bytes
Print/@FromCharacterCode/@Table[PadLeft[{},26,{i-1,i}~Mod~26+65],{i,26}];
#Mathematica, (削除) 82 (削除ここまで) (削除) 75 (削除ここまで) 67 bytes
Do[Print@FromCharacterCode@PadLeft[{},26,{i-1,i}~Mod~26+65],{i,26}]