Вы должны напечатать этот точный текст:

A
ABA
ABCBA
ABCDCBA
ABCDEDCBA
ABCDEFEDCBA
ABCDEFGFEDCBA
ABCDEFGHGFEDCBA
ABCDEFGHIHGFEDCBA
ABCDEFGHIJIHGFEDCBA
ABCDEFGHIJKJIHGFEDCBA
ABCDEFGHIJKLKJIHGFEDCBA
ABCDEFGHIJKLMLKJIHGFEDCBA
ABCDEFGHIJKLMNMLKJIHGFEDCBA
ABCDEFGHIJKLMNONMLKJIHGFEDCBA
ABCDEFGHIJKLMNOPONMLKJIHGFEDCBA
ABCDEFGHIJKLMNOPQPONMLKJIHGFEDCBA
ABCDEFGHIJKLMNOPQRQPONMLKJIHGFEDCBA
ABCDEFGHIJKLMNOPQRSRQPONMLKJIHGFEDCBA
ABCDEFGHIJKLMNOPQRSTSRQPONMLKJIHGFEDCBA
ABCDEFGHIJKLMNOPQRSTUTSRQPONMLKJIHGFEDCBA
ABCDEFGHIJKLMNOPQRSTUVUTSRQPONMLKJIHGFEDCBA
ABCDEFGHIJKLMNOPQRSTUVWVUTSRQPONMLKJIHGFEDCBA
ABCDEFGHIJKLMNOPQRSTUVWXWVUTSRQPONMLKJIHGFEDCBA
ABCDEFGHIJKLMNOPQRSTUVWXYXWVUTSRQPONMLKJIHGFEDCBA
ABCDEFGHIJKLMNOPQRSTUVWXYZYXWVUTSRQPONMLKJIHGFEDCBA
ABCDEFGHIJKLMNOPQRSTUVWXYXWVUTSRQPONMLKJIHGFEDCBA
ABCDEFGHIJKLMNOPQRSTUVWXWVUTSRQPONMLKJIHGFEDCBA
ABCDEFGHIJKLMNOPQRSTUVWVUTSRQPONMLKJIHGFEDCBA
ABCDEFGHIJKLMNOPQRSTUVUTSRQPONMLKJIHGFEDCBA
ABCDEFGHIJKLMNOPQRSTUTSRQPONMLKJIHGFEDCBA
ABCDEFGHIJKLMNOPQRSTSRQPONMLKJIHGFEDCBA
ABCDEFGHIJKLMNOPQRSRQPONMLKJIHGFEDCBA
ABCDEFGHIJKLMNOPQRQPONMLKJIHGFEDCBA
ABCDEFGHIJKLMNOPQPONMLKJIHGFEDCBA
ABCDEFGHIJKLMNOPONMLKJIHGFEDCBA
ABCDEFGHIJKLMNONMLKJIHGFEDCBA
ABCDEFGHIJKLMNMLKJIHGFEDCBA
ABCDEFGHIJKLMLKJIHGFEDCBA
ABCDEFGHIJKLKJIHGFEDCBA
ABCDEFGHIJKJIHGFEDCBA
ABCDEFGHIJIHGFEDCBA
ABCDEFGHIHGFEDCBA
ABCDEFGHGFEDCBA
ABCDEFGFEDCBA
ABCDEFEDCBA
ABCDEDCBA
ABCDCBA
ABCBA
ABA
A

Спекуляции

• Дополнительные трейлинг-строки разрешены в конце вывода.
• В конце каждой строки допускаются дополнительные завершающие пробелы (U + 0020), включая дополнительные завершающие новые строки.
• Вы можете использовать все строчные буквы вместо прописных, но нельзя печатать частично строчные, частично заглавные.
• Вы можете вернуть текст как вывод функции вместо печати в полной программе.

счет

Поскольку это треугольник, и у треугольника есть 3 стороны, а 3 - небольшое число, ваш код должен быть маленьким с точки зрения количества байтов.

Vim, 37 байт

:h<_↵↵↵YZZPP$xqqxYpGP√2G$A♥-€k$q24@qJ

легенда

↵ = Return
√ = Ctrl+V
♥ = Ctrl+R
€ = Escape

Логотип, 232 207 196 190 байт

Кто-то говорил треугольники?

Вытащите свой компас и транспортир, и давайте сделаем это графическим способом. Геометрия использует равносторонний треугольник для выравнивания результатов. Раньше у меня был равнобедренный треугольник, но он занимал слишком много десятичных знаков. Это изменение также уплотняло вывод, уменьшая количество экранной подготовки и смены шрифта, которые я должен был сделать.

Я использовал онлайн-переводчик Calormen, чтобы уточнить это. Если вам не хватает экранной недвижимости, она обернется, но вы также можете поиграть с некоторыми цифрами, чтобы позаботиться об этом. Я использовал полноэкранный режим «F11» в своем браузере.

ht
pu
to r:n:b:l repeat:n[rt:b label char 90-:n lt:b fd:l] end
to t:s
fd 12 rt 120 bk 6
repeat 2[r:s 90 12]
repeat 2[rt 120 r:s 90-heading 24]
end
rt 90 label "Z lt 210
repeat 25[t repcount]

rПроцедура рисует линию nсимволов. Символ определяется автоматически в зависимости от того, сколько сегментов ему сказано использовать. bПараметр рассказывает , сколько временно повернуть так, чтобы буквы указывают в правильном направлении. lПараметр определяет линейное расстояние между буквами.

В tШаги процедуры на следующую позицию и вызывает rфункцию в четыре раза , чтобы создать треугольник, вращающийся в случае необходимости. Я назвал его дважды для вертикальной стороны, потому что это заняло меньше байтов, чем один раз для специальной обработки. Конец процедуры устанавливает черепашку для начала следующего треугольника, на один шаг выше.

ZЭто особый случай, поэтому мы просто печатаем его напрямую и вращаем, как будто мы только что закончили треугольник. Наконец, tвызывается 25 раз.

Haskell, 58 байт

f x=init x++reverse x
t=unlines$f[f['A'..c]|c<-['A'..'Z']]

Определяет функцию, tкоторая возвращает вывод в виде строки.

f x=               define a helper function
init x             take the argument minus its last element
++                 and concatenate it with
reverse x          the argument reversed, producing ex. [a,b,c,b,a] from [a,b,c]

t=                                    define the main function
           [         |c<-['A'..'Z']]  for every char c from 'A' to 'Z'...
             ['A'..c]                 generate the range from 'A' to c
            f                         call the helper function to "reflect" it
          f                           call the helper function on the entire list
  unlines$                            join on newlines

Желе , 16 13 байт

Ṗ;Ṛ
ØAḣJÇ€Çj⁷

Спасибо @LeakyNun за игру в 3 байта!

Попробуйте онлайн!

Как это устроено

Ṗ;Ṛ        Helper link. Argument: A (array)

Ṗ          Pop; yield A without its last element.
  Ṛ        Reversed; yield A with inverted order.
 ;         Concatenate the results to both sides.


ØAḣJÇ€Çj⁷  Main link. No arguments.

ØA         Alphabet; set link argument and return value to "A...Z".
   J       Indices; yield [1, ..., 26].
  ḣ        Head; take the first, the first two, etc. elements of the alphabet.
           This yields ["A", AB", ..., "A...Z"].
    ǀ     Apply the helper link to each string.
      Ç    Apply the helper link to the array itself.
       j⁷  Join, separating by linefeeds.

Python, 74 байта

def f(x=66,s='A'):
 t=s+s[-2::-1];print t
 if x<91:f(x+1,s+chr(x));print t

Функция Python 2, которая печатает и не принимает аргументов. Ключевой идеей является создание треугольного паттерна туда-сюда с рекурсией. Сначала рассмотрим эту более простую функцию, которая печатает буквы «А» до «Z» и вниз до «А»:

def f(x=65):
 t=chr(x);print t
 if x<90:f(x+1);print t 

Функция сначала печатает «A» (код символа 65), затем возвращается к «B» (66) и так далее до «Z» (90). Оттуда он перестает повторяться. По пути возврата обратно в рекурсивный стек он печатает любой символ, tнапечатанный на том же слое, от «Y» до «A».

Основной код делает то же самое, за исключением того, что он накапливается в sцепочку букв и печатает строку вверх и вниз s+s[-2::-1].

Спасибо xsot за 2 байта.

В Python 3 то же самое происходит на один байт короче (73 байта), помещая все в одну строку.

def f(x=66,s='A'):t=s+s[-2::-1];print(t);x>90or[f(x+1,s+chr(x)),print(t)]

брейнфук, 1733 121 119 байт

----[---->+<]>++.<++++++++++.<+++++[<+++++>-]<+>>>.<[>>[>.]<[>+>+<<-]>+.>[<<+> >-]<[<.]<-]>>[>[>]<[-]<[<]>>[.>]<<[.<]>]

Чуть более читаемая версия:

----[---->+<]>++.<
++++++++++.<
+++++[<+++++>-]<+
>>
>.<
[
  >>[>.]<
  [>+>+<<-]
  >+.>
  [<<+>>-]
  <[<.]<
  -
]
>>
[
  >[>]<
  [-]
  <[<]>
  >[.>]<<[.<]>
]

Объяснение возможно приехать.

05AB1E , 20 13 12 6 байтов

Сохранено 2 байта благодаря Аднану.
Сохранено 6 байт благодаря Magic Octopus Urn и некоторым новым языковым функциям.

Aη€ûû»

Попробуйте онлайн!

объяснение

Aη       # push prefixes of alphabet
  €û     # palendromize each prefix
    û    # palendromize the whole list
     »   # join on newlines

J, 26 23 22 байта

f(f=:,1}.|.)\u:65+i.26

объяснение

,1}.|.  Monad f: Input: A
    |.  Reverse the items in A
 1}.    Drop the first item in the reversed A
,       Join A and the previous

f(f=:,1}.|.)\u:65+i.26
                  i.26  Create the range [0, 1, ..., 25]
               65+      Add 65 to each
             u:         Convert to characters to get 'A..Z'
  f=:,1}.|.             Define a verb f
 (         )\           Call f monadically on each prefix of 'A..Z'
f                       Call f again on that result

Python 3, 97 байт

s="ABCDEFGHIJKLMNOPQRSTUVWXYZ"
a=[s[:x]+s[x::-1]for x in range(26)]
print('\n'.join(a+a[24::-1]))

Идео это!

Рубин, 71 байт

Попробуйте это на repl.it

s=*?A..?Y
s+=[?Z]+s.reverse
puts s.map{|e|k=[*?A...e]*'';k+e+k.reverse}

> <> , 60 байт

1"AA"1[v
?v:1-:}>:5d*=
o>l  ?!v
{$-}:1[\ao]{:}+::"@Z"@=?;=2*

Попробуйте онлайн!

C 272 247 234 230 144 137 байт:

( Сохранено много байтов ( 272 -> 230) в моем предыдущем методе благодаря отличным подсказкам и трюкам от sigalor ! )

( Сохранено почти 100 байт ( 230 -> 144) путем переключения на лучший метод. )

main(q,i,e,x){for(q=0;q<51;q++){i=q>25 ? 25-(q-25):q;for(e=65;e<66+i;e++)printf("%c",e);for(x=64+i;x>64;x--)printf("%c",x);printf("\n");}}

Мой первый ответ когда - либо в C. Я только недавно начал самообучаться, так что давайте посмотрим, как это происходит.

С этим в действии! (Ideone)

JavaScript (ES6), 81 байт

[...'ZYXWVUTSRQPONMLKJIHGFEDCBA'].reduce((p,c)=>c+`
`+p.replace(/^|$/gm,c)+`
`+c)

Mathematica 59 байт

Column@FromCharacterCode[#@#@26+64]&[#-Abs@Range[1-#,#-1]&]

Дьялог АПЛ, 18 байт

↑(⊣,⌽)(⊣,1↓⌽)¨,\⎕a

R, 63 61 59 байт

for(i in c(1:26,25:1))cat(LETTERS[c(1:i,i:1-1)],"
",sep="")

Полезно LETTTERS[0]не возвращает никаких символов.

Редактировать: потерял один благодаря @leakynun

Изменить: еще два благодаря @plannapus

TSQL, 159 байт

DECLARE @ varchar(52)='ABCDEFGHIJKLMNOPQRSTUVWXY',@o varchar(max)SELECT @+='Z'+REVERSE(@)+'
',@o=@
WHILE''<@
SELECT @=STUFF(@,LEN(@)/2,2,''),@o=@+@o+@
PRINT @o

скрипка

Javascript (с использованием внешней библиотеки-Enumerable), 135 байт

_.Range(1,51).WriteLine(x=>(g=_.Range(65,x>25?52-x:x)).Write("",y=>(w=String.fromCharCode)(y))+(g.Reverse().Skip(1).Write("",y=>w(y))))

Ссылка на библиотеку: https://github.com/mvegh1/Enumerable

Объяснение кода: Создайте диапазон целых чисел, начиная с 1, для количества 51. Для каждого напишите строку в соответствии со сложным пред. Сделайте некоторое волшебство JS с глобальными переменными и кэшированием ... и вуаля. Для каждого int в WriteLine мы создаем левый диапазон целых чисел и сохраняем его в глобальном «g», а также String Joining (Write) с ""разделителем и отображаем каждое int в String, сопоставляя код int. Затем мы объединяем правую часть, беря обращение этой последовательности (и пропуская первый элемент, потому что он будет соответствовать последнему элементу исходного порядка ...), записывая с той же логикой. РЕДАКТИРОВАТЬ: Обновлены внутренние записи в библиотеке. Пустая последовательность теперь напишет пустую строку вместо нуля. Это также побрило 15 байтов от ответа

Powershell, 61 52 байта

Спасибо TimmyD за сохранение 9 байтов!

65..90+89..65|%{-join[char[]]((65..$_-ne$_)+$_..65)}

Прокручивает значения ASCII для заглавных букв вперед, затем назад. Для каждого числа создается массив первых чисел X, удаляется номер X-1, затем добавляется обратная сторона первых чисел X, которые затем преобразуются в символы и объединяются в строку.

Чеддер , 102 96 79 69 67 байт

17 байтов благодаря Downgoat и вдохновение для еще 10.

"A"+(2@"27+@"(25|>1)).bytes.map(i->65@"(64+i)+@"((64+i)|>65)).vfuse

Тот факт, что строки могут объединять, но не массивы, означает, что мне придется преобразовать два диапазона в строки, объединить, а затем преобразовать обратно в массивы.

Кроме того, тот факт, что vfuseсоздаются ведущие newliens, означает, что мне нужно будет сгенерировать первую строку вручную, а затем сопоставить с остальными.

@" как диада (функция с двумя аргументами) может преобразовывать в строку напрямую, но не работает для обратного диапазона (если первый аргумент больше, чем второй).

Диапазон был наполовину включен. После исправления ошибки это стало включительно.

использование

cheddar> "A"+(2@"27+@"(25|>1)).bytes.map(i->(65@"(64+i)+@"((64+i)|>65))).vfuse
"A
ABA
ABCBA
ABCDCBA
ABCDEDCBA
ABCDEFEDCBA
ABCDEFGFEDCBA
ABCDEFGHGFEDCBA
ABCDEFGHIHGFEDCBA
ABCDEFGHIJIHGFEDCBA
ABCDEFGHIJKJIHGFEDCBA
ABCDEFGHIJKLKJIHGFEDCBA
ABCDEFGHIJKLMLKJIHGFEDCBA
ABCDEFGHIJKLMNMLKJIHGFEDCBA
ABCDEFGHIJKLMNONMLKJIHGFEDCBA
ABCDEFGHIJKLMNOPONMLKJIHGFEDCBA
ABCDEFGHIJKLMNOPQPONMLKJIHGFEDCBA
ABCDEFGHIJKLMNOPQRQPONMLKJIHGFEDCBA
ABCDEFGHIJKLMNOPQRSRQPONMLKJIHGFEDCBA
ABCDEFGHIJKLMNOPQRSTSRQPONMLKJIHGFEDCBA
ABCDEFGHIJKLMNOPQRSTUTSRQPONMLKJIHGFEDCBA
ABCDEFGHIJKLMNOPQRSTUVUTSRQPONMLKJIHGFEDCBA
ABCDEFGHIJKLMNOPQRSTUVWVUTSRQPONMLKJIHGFEDCBA
ABCDEFGHIJKLMNOPQRSTUVWXWVUTSRQPONMLKJIHGFEDCBA
ABCDEFGHIJKLMNOPQRSTUVWXYXWVUTSRQPONMLKJIHGFEDCBA
ABCDEFGHIJKLMNOPQRSTUVWXYZYXWVUTSRQPONMLKJIHGFEDCBA
ABCDEFGHIJKLMNOPQRSTUVWXYXWVUTSRQPONMLKJIHGFEDCBA
ABCDEFGHIJKLMNOPQRSTUVWXWVUTSRQPONMLKJIHGFEDCBA
ABCDEFGHIJKLMNOPQRSTUVWVUTSRQPONMLKJIHGFEDCBA
ABCDEFGHIJKLMNOPQRSTUVUTSRQPONMLKJIHGFEDCBA
ABCDEFGHIJKLMNOPQRSTUTSRQPONMLKJIHGFEDCBA
ABCDEFGHIJKLMNOPQRSTSRQPONMLKJIHGFEDCBA
ABCDEFGHIJKLMNOPQRSRQPONMLKJIHGFEDCBA
ABCDEFGHIJKLMNOPQRQPONMLKJIHGFEDCBA
ABCDEFGHIJKLMNOPQPONMLKJIHGFEDCBA
ABCDEFGHIJKLMNOPONMLKJIHGFEDCBA
ABCDEFGHIJKLMNONMLKJIHGFEDCBA
ABCDEFGHIJKLMNMLKJIHGFEDCBA
ABCDEFGHIJKLMLKJIHGFEDCBA
ABCDEFGHIJKLKJIHGFEDCBA
ABCDEFGHIJKJIHGFEDCBA
ABCDEFGHIJIHGFEDCBA
ABCDEFGHIHGFEDCBA
ABCDEFGHGFEDCBA
ABCDEFGFEDCBA
ABCDEFEDCBA
ABCDEDCBA
ABCDCBA
ABCBA
ABA
A"

Чеддер, 55 байтов (неконкурентный)

В последней версии со всеми исправлениями ответ таков:

(|>25+24|>0).map(i->65@"(65+i)+(i?(64+i)@"65:"")).vfuse

но это было сделано после вызова.

C, 93 байта

Звоните f()без аргументов.

g(l,n){putchar(l);n?g(l+1,--n),putchar(l):0;}f(n){for(n=-26;++n<26;puts(""))g(65,25-abs(n));}

Попробуйте это на Ideone .

VBA, 94 байта

Function T:For j=-25To 25:k=25-Abs(j):For i=-k To k:T=T &Chr(65+k-Abs(i)):Next:T=T &vbLf:Next

Позвонить в ближайшее окно с? T

Просто чтобы объяснить, что происходит: я использую функцию Abs дважды, чтобы отразить как перемещение по алфавиту, так и длину строки. Он хорошо подходит для этой задачи из-за единственного экстремального значения в обоих случаях, которое соответствует пересечению нуля переменной pre-Abs.

В качестве простого набора команд в окне VBA Immediate, а не программы или функции, для следующего потребуется 72 байта:

For j=-25To 25:k=25-Abs(j):For i=-k To k:?Chr(65+k-Abs(i));:Next:?:Next

(с благодарностью @GuitarPicker)

Python, 73 71 байт

Спасибо @xnor за рекурсию

f=lambda x=66,s='A',t='':x/92*t or t+f(x+1,s+chr(x),s+s[-2::-1]+"\n")+t

объяснение

• Параметры :
  • x является значением ASCII следующей буквы в алфавите
  • s это аккумулятор для алфавита
  • tэто линия в треугольнике (то есть s+ s backwards)
• Возвращение :t если алфавит сделан (то есть мы в центре)
• Остальное : t+f(...)+tс:
  • x порядковым
  • s сопровождается следующим письмом
  • tсброс на s+ s backwards+\n

Обновить

• -2 [16-08-05] Удалите начальные \n(+1) и сокращенные условные (-3) все благодаря @xnor

HTML + CSS, 884 символа

(763 символа HTML + 121 символ CSS)

Просто расширение Дырявый Nun «s комментарий о MonkeyZeus » s ответ . (Хотя я могу неправильно прочитать комментарий ...)

p{margin:0}p:before{content:"ABCDEFGH"}p:after{content:"HGFEDCBA"}a:before{content:"IJKLMNOP"}a:after{content:"PONMLKJI"}

<pre>A
ABA
ABCBA
ABCDCBA
ABCDEDCBA
ABCDEFEDCBA
ABCDEFGFEDCBA
ABCDEFGHGFEDCBA
<p>I</p><p>IJI</p><p>IJKJI</p><p>IJKLKJI</p><p>IJKLMLKJI</p><p>IJKLMNMLKJI</p><p>IJKLMNONMLKJI</p><p>IJKLMNOPONMLKJI</p><p><a>Q</p><p><a>QRQ</p><p><a>QRSRQ</p><p><a>QRSTSRQ</p><p><a>QRSTUTSRQ</p><p><a>QRSTUVUTSRQ</p><p><a>QRSTUVWVUTSRQ</p><p><a>QRSTUVWXWVUTSRQ</p><p><a>QRSTUVWXYXWVUTSRQ</p><p><a>QRSTUVWXYZYXWVUTSRQ</p><p><a>QRSTUVWXYXWVUTSRQ</p><p><a>QRSTUVWXWVUTSRQ</p><p><a>QRSTUVWVUTSRQ</p><p><a>QRSTUVUTSRQ</p><p><a>QRSTUTSRQ</p><p><a>QRSTSRQ</p><p><a>QRSRQ</p><p><a>QRQ</p><p><a>Q</a></p><p>IJKLMNOPONMLKJI</p><p>IJKLMNONMLKJI</p><p>IJKLMNMLKJI</p><p>IJKLMLKJI</p><p>IJKLKJI</p><p>IJKJI</p><p>IJI</p><p>I</p>ABCDEFGHGFEDCBA
ABCDEFGFEDCBA
ABCDEFEDCBA
ABCDEDCBA
ABCDCBA
ABCBA
ABA
A

Брахилог , 37 29 байт

Кредиты Fatalize для его помощи во всем.

4 байта благодаря Fatalize и вдохновение для еще 4 байтов.

@A:1&e:"a"yr:1&cw@Nw\
:Lc.r.!

Попробуйте онлайн!

Предикат 0 (Основной предикат)

@A:1&e:"a"yr:1&cw@Nw\
@A:1&                  Apply predicate 1 to @A, which is
                       basically "abcdefghijklmnopqrstuvwxyz"
     e                 Choose one element from the result (choice point)
      :"a"yr               generate substring from element to "a"
            :1&            apply predicate 1
               c           concatenate
                w          write to STDOUT
                 @Nw       write "\n" to STDOUT
                    \  Backtrack to last choice point to choose
                       another element until there is no more
                       choice left, then halt.

Предикат 1 (Вспомогательный предикат)

Это в основном строит палиндром из заданной строки.

:Lc.r.!
:Lc.     output is [input:L]
   .r.   output reversed is still output
      !  stop searching after the first output

R 127 125 байт

k=cat;L=LETTERS;for(i in 1:26)k(c(L[1:i],L[(i-1):0],"\n"));for(i in 1:26)k(c(L[0:(26-i)],L[ifelse((25-i)>=0,25-i,0):0],"\n"))

Не полностью удовлетворен этим решением, особенно двумя forпетлями, но не мог прийти с чем-то лучшим!
LETTERSсодержит заглавные буквы

Ungolfed:

for(i in 1:26){
  cat(c(LETTERS[1:i],LETTERS[(i-1):0],"\n"))
               }

for(i in 1:26){
  cat(c(LETTERS[0:(26-i)],LETTERS[ifelse((25-i)>=0,25-i,0):0],"\n"))
               }

ifelseэто более короткий путь для unsing if... else...и работает следующим образом:ifelse(condition,action if TRUE, action if FALSE)

Другое решение 125 байтов:

for(i in 1:26)(k=cat)(c((L=LETTERS)[1:i],L[(i-1):0],"\n"));for(i in 1:26)k(c(L[0:(26-i)],L[ifelse((25-i)>=0,25-i,0):0],"\n"))

Java 131 байт

Без использования строки (131 байт)

public static void main(String[] args) {
    for(int i = 0 ,k=1; i>-1; i+=k){
        for(int c= 65, d = 1; c>64;){
            d = d>-1 & c < 65+i?1:-1;
            System.out.print((char)c+((c+=d)<65?"\n":""));
        }
        k = k>-1 & i < 25?1:-1;
    }
}

Codegolfed

for(int i=0,k=1;i>-1;k=k>-1&i<25?1:-1,i+=k)for(int c=65,d=1;c>64;d=d>-1&c<65+i?1:-1,System.out.print((char)c+((c+=d)<65?"\n":"")));

Со строкой (173 байта)

String a="abcdefghijklmnopqrstuvwxyz";
for(int i = 1 ,k=1; i>0; i+=k==1?1:-1){
    System.out.println(a.substring(0,i)+new StringBuilder(a).reverse().substring(27-i));
    k = k>-1 & i < 26?1:-1;
}

Codegolfed

String a="abcdefghijklmnopqrstuvwxyz";for(int i=1,k=1;i>0;k=k>-1&i<26?1:-1,System.out.println(a.substring(0,i)+new StringBuilder(a).reverse().substring(27-i)),i+=k==1?1:-1);

Благодаря манатворку и Кевину Круйссену

мозговой трах, 79 байт

+<++<<--------[>+++++>>[+++<+<]>]<+[[>+>+.<<-]>-[<+>>-.<-]>->.>[->]<<<[<<++>]<]

отформатирован:

+<++<<
--------[>+++++>>[+++<+<]>]
<+
[
  [>+>+.<<-]
  >-[<+> >-.<-]
  >->.>[->]
  <<<[<<++>]
  <
]

Попробуйте онлайн

Sesos , 27 байт

0000000: a85ab9 ac5daa f8b1c7 785f9b b961f7 665c1b 73ccfc  .Z..]....x_..a.f\.s..
0000015: c01ecb 987303                                     ....s.

Попробуйте онлайн! Проверьте Debug, чтобы увидеть сгенерированный код SBIN.

Сесос сборка

Двоичный файл выше был сгенерирован путем сборки следующего кода SASM.

add 65, rwd 1, add 10, rwd 2, add 25
jmp
    fwd 3
    jmp
        put, fwd 1
    jnz
    rwd 1
    jmp
        fwd 1, add 1, fwd 1, add 1, rwd 2, sub 1
    jnz
    fwd 2
    jmp
        rwd 2, add 1, fwd 2, sub 1
    jnz
    rwd 1, add 1, rwd 2
    jmp
        put, rwd 1
    jnz
    rwd 1, sub 1
jnz
fwd 3
jmp
    jmp
        put, fwd 1
    jnz
    rwd 1, get, rwd 1
    jmp
        put, rwd 1
    jnz
    fwd 2
; jnz (implicit)

/// , 208 байт

/'/\/\///+/BA
AB'-/DC+CD'&/FE-EF')/HG&GH'=/JI)IJ'|/LK=KL'7/NM|MN'1/PO7OP'q/RQ1QR'p/TSqST'6/VUpUV'[/XW6WX/A
A+C+C-E-E&G&G)I)I=K=K|M|M7O7O1Q1QqSqSpUpU6W6W[Y[YZY[Y[W6W6UpUpSqSqQ1Q1O7O7M|M|K=K=I)I)G&G&E-E-C+C+A
A

Конечно, не победа, но вот она, предшествующая Мартину Эндеру ...