Вдохновленная ошибкой в решении этой задачи , ваша задача состоит в том, чтобы создать такой точный текст:

                         ZYXWVUTSRQPONMLKJIHGFEDCBA
                        YXWVUTSRQPONMLKJIHGFEDCBA
                       XWVUTSRQPONMLKJIHGFEDCBA
                      WVUTSRQPONMLKJIHGFEDCBA
                     VUTSRQPONMLKJIHGFEDCBA
                    UTSRQPONMLKJIHGFEDCBA
                   TSRQPONMLKJIHGFEDCBA
                  SRQPONMLKJIHGFEDCBA
                 RQPONMLKJIHGFEDCBA
                QPONMLKJIHGFEDCBA
               PONMLKJIHGFEDCBA
              ONMLKJIHGFEDCBA
             NMLKJIHGFEDCBA
            MLKJIHGFEDCBA
           LKJIHGFEDCBA
          KJIHGFEDCBA
         JIHGFEDCBA
        IHGFEDCBA
       HGFEDCBA
      GFEDCBA
     FEDCBA
    EDCBA
   DCBA
  CBA
 BA
A

• В первой строке будет 25 пробелов, затем алфавит в обратном направлении, начиная с 26-й буквы ( ZYXWVUTSRQPONMLKJIHGFEDCBA), затем новая строка.
• Во второй строке будет 24 пробела, затем алфавит в обратном направлении, начиная с 25-й буквы ( YXWVUTSRQPONMLKJIHGFEDCBA), затем новая строка.
• ...
• В последней (26-й) строке не будет пробелов, затем алфавит в обратном порядке, начиная с 1-й буквы ( A), затем новая строка.

Дополнительные правила:

• Ваша программа может использовать любые разрешенные методы вывода.
• Допускается один завершающий символ новой строки и / или один ведущий символ новой строки.
• Между строками должна быть одна новая строка, не более.
• Буквы должны быть заглавными.

Как и в случае с Code-Golf , выигрывает самое короткое представление. Удачи!

Leaderboard:

var QUESTION_ID=141725,OVERRIDE_USER=61563;function answersUrl(e){return"https://api.stackexchange.com/2.2/questions/"+QUESTION_ID+"/answers?page="+e+"&pagesize=100&order=desc&sort=creation&site=codegolf&filter="+ANSWER_FILTER}function commentUrl(e,s){return"https://api.stackexchange.com/2.2/answers/"+s.join(";")+"/comments?page="+e+"&pagesize=100&order=desc&sort=creation&site=codegolf&filter="+COMMENT_FILTER}function getAnswers(){jQuery.ajax({url:answersUrl(answer_page++),method:"get",dataType:"jsonp",crossDomain:!0,success:function(e){answers.push.apply(answers,e.items),answers_hash=[],answer_ids=[],e.items.forEach(function(e){e.comments=[];var s=+e.share_link.match(/\d+/);answer_ids.push(s),answers_hash[s]=e}),e.has_more||(more_answers=!1),comment_page=1,getComments()}})}function getComments(){jQuery.ajax({url:commentUrl(comment_page++,answer_ids),method:"get",dataType:"jsonp",crossDomain:!0,success:function(e){e.items.forEach(function(e){e.owner.user_id===OVERRIDE_USER&&answers_hash[e.post_id].comments.push(e)}),e.has_more?getComments():more_answers?getAnswers():process()}})}function getAuthorName(e){return e.owner.display_name}function process(){var e=[];answers.forEach(function(s){var r=s.body;s.comments.forEach(function(e){OVERRIDE_REG.test(e.body)&&(r="<h1>"+e.body.replace(OVERRIDE_REG,"")+"</h1>")});var a=r.match(SCORE_REG);a&&e.push({user:getAuthorName(s),size:+a[2],language:a[1],link:s.share_link})}),e.sort(function(e,s){var r=e.size,a=s.size;return r-a});var s={},r=1,a=null,n=1;e.forEach(function(e){e.size!=a&&(n=r),a=e.size,++r;var t=jQuery("#answer-template").html();t=t.replace("{{PLACE}}",n+".").replace("{{NAME}}",e.user).replace("{{LANGUAGE}}",e.language).replace("{{SIZE}}",e.size).replace("{{LINK}}",e.link),t=jQuery(t),jQuery("#answers").append(t);var o=e.language;/<a/.test(o)&&(o=jQuery(o).text()),s[o]=s[o]||{lang:e.language,user:e.user,size:e.size,link:e.link}});var t=[];for(var o in s)s.hasOwnProperty(o)&&t.push(s[o]);t.sort(function(e,s){return e.lang>s.lang?1:e.lang<s.lang?-1:0});for(var c=0;c<t.length;++c){var i=jQuery("#language-template").html(),o=t[c];i=i.replace("{{LANGUAGE}}",o.lang).replace("{{NAME}}",o.user).replace("{{SIZE}}",o.size).replace("{{LINK}}",o.link),i=jQuery(i),jQuery("#languages").append(i)}}var ANSWER_FILTER="!t)IWYnsLAZle2tQ3KqrVveCRJfxcRLe",COMMENT_FILTER="!)Q2B_A2kjfAiU78X(md6BoYk",answers=[],answers_hash,answer_ids,answer_page=1,more_answers=!0,comment_page;getAnswers();var SCORE_REG=/<h\d>\s*([^\n,]*[^\s,]),.*?(\d+)(?=[^\n\d<>]*(?:<(?:s>[^\n<>]*<\/s>|[^\n<>]+>)[^\n\d<>]*)*<\/h\d>)/,OVERRIDE_REG=/^Override\s*header:\s*/i;

body{text-align:left!important}#answer-list,#language-list{padding:10px;width:290px;float:left}table thead{font-weight:700}table td{padding:5px}

<script src="https://ajax.googleapis.com/ajax/libs/jquery/2.1.1/jquery.min.js"></script> <link rel="stylesheet" type="text/css" href="//cdn.sstatic.net/codegolf/all.css?v=83c949450c8b"> <div id="answer-list"> <h2>Leaderboard</h2> <table class="answer-list"> <thead> <tr><td></td><td>Author</td><td>Language</td><td>Size</td></tr></thead> <tbody id="answers"> </tbody> </table> </div><div id="language-list"> <h2>Winners by Language</h2> <table class="language-list"> <thead> <tr><td>Language</td><td>User</td><td>Score</td></tr></thead> <tbody id="languages"> </tbody> </table> </div><table style="display: none"> <tbody id="answer-template"> <tr><td>{{PLACE}}</td><td>{{NAME}}</td><td>{{LANGUAGE}}</td><td>{{SIZE}}</td><td><a href="{{LINK}}">Link</a></td></tr></tbody> </table> <table style="display: none"> <tbody id="language-template"> <tr><td>{{LANGUAGE}}</td><td>{{NAME}}</td><td>{{SIZE}}</td><td><a href="{{LINK}}">Link</a></td></tr></tbody> </table>

05AB1E , 7 байтов

Код:

₂žp.s1Λ

Использует кодировку 05AB1E . Попробуйте онлайн!

объяснение

 žp.s      # Get the suffixes of ZYX...CBA
      Λ    # Using the canvas mode, print the
₂          # first 26 elements of the array
     1     # into the upper-right direction

R , 67 55 байт

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

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

Python 2 , 57 байт

i=26
while i:i-=1;print' '*i+bytearray(range(65+i,64,-1))

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

V , 13 , 11 байтов

¬ZAòY>HGpxl

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

HexDump:

00000000: ac5a 41f2 593e 4847 7078 6c              .ZA.Y>HGpxl

Написано с моего телефона: P.

¬ZA         " Insert the alphabet backwards
   ò        " Recursively:
    Y       "   Yank this current line
     >H     "   Add one space to every line
       G    "   Move to the last line in the buffer
        p   "   Paste the line we yanked
         x  "   Delete one character
          l "   Move one character to the right, which will throw an error on 
            "   the last time through, breaking the loop

PowerShell , 42 байта

25..0|%{' '*$_+-join[char[]]((65+$_)..65)}

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

Объяснение:

25..0|%{                                 } # Loop from 25 to 0
                             (65+$_)..65   # Construct a range of the specific ASCII codes
                    [char[]](           )  # Cast that as a character array
               -join                       # that has been joined together into a string
        ' '*$_+                            # Prepended with the correct amount of spaces

Баш + ГНУ Сед, 60

printf %s {Z..A}|sed 'h
s/./ /g
G
s/ \n//
:x
p
s/ \S//
tx
d'

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

/// , 105 97 байт

/:/\\\\*//#/:Z:Y:X:W:V:U:T:S:R:Q:P:O:N:M:L:K:J:I:H:G:F:E:D:C:B:A//\\*/\/\/_____#
\/ //_/     //*#

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

объяснение

/// знает только одну команду, /<pattern>/<substitution>/<text>заменяет все вхождения <pattern>в <text>с <substitution>. Дополнительно \можно использовать для экранирования персонажей.

Сокращенный код для простоты:

/:/\\\\*//#/:E:D:C:B:A//\\*/\/\/__#
\/ //_/  //*#

Первая команда /:/\\\\*/заменяет :с \\*в следующем коде. Это дает:

/#/\\*E\\*D\\*C\\*B\\*A//\\*/\/\/__#
\/ //_/  //*#

Затем /#/\\*E\\*D\\*C\\*B\\*A/заменяется #на \*E\*D\*C\*B\*A:

/\\*/\/\/__\*E\*D\*C\*B\*A
\/ //_/  //*\*E\*D\*C\*B\*A

Затем /\\*/\/\/__\*E\*D\*C\*B\*A<newline>\/ /заменяется \*на //__*E*D*C*B*A<newline>/:

/_/  //*//__*E*D*C*B*A
/ E//__*E*D*C*B*A
/ D//__*E*D*C*B*A
/ C//__*E*D*C*B*A
/ B//__*E*D*C*B*A
/ A

Обратите внимание: я должен был использовать \*для замены. Так *как также является частью подстановки, он будет генерировать бесконечный цикл, если я только заменю *.

Затем команда /_/ /заменяется _пробелами и /*//удаляет все *:

EDCBA
/ E//    EDCBA
/ D//    EDCBA
/ C//    EDCBA
/ B//    EDCBA
/ A

Следующая команда ничего не /#//заменяет #. Поскольку #в коде его нет, он ничего не делает. Это как раз здесь, чтобы удалить два //начала из начала кода. Это оставляет

EDCBA
/ E//    EDCBA
/ D//    EDCBA
/ C//    EDCBA
/ B//    EDCBA
/ 

Затем команда / E//удаляет <space>E, так что это оставит код

    EDCBA
   DCBA
/ D//   DCBA
/ C//   DCBA
/ B//   DCBA
/ 

Подобное / D//удаляет <space>D:

    EDCBA
   DCBA
  CBA
/ C//  CBA
/ B//  CBA
/ 

/ C//:

    EDCBA
   DCBA
  CBA
 BA
/ B// BA
/ 

/ B//:

    EDCBA
   DCBA
  CBA
 BA
A
/ 

И последняя команда является неполной, поэтому она ничего не делает:

    EDCBA
   DCBA
  CBA
 BA
A

Haskell, 53 52 байта

f(a:b)=(b>>" ")++a:b++'\n':f b
f x=x
f['Z','Y'..'A']

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

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

f['Z','Y'..'A']        -- call f with the full backwards alphabet

f(a:b)=                -- let `a` be the first char and `b` the rest. Return
   (b>>" ") ++         -- replace each char in b with a space, followed by
   a:b ++              -- the input string, followed by
   '\n' :              -- a newline, followed by
   f b                 -- a recursive call of `f` with `b`
f x=x                  -- stop on an empty input string

Python 2 , 66 64

i=26
while i:i-=1;print' '*i+'ZYXWVUTSRQPONMLKJIHGFEDCBA'[25-i:]

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

JavaScript (ES6), 83 77 76 байт

f=(n=0,p='')=>n<26?f(++n,p+' ')+p+`ZYXWVUTSRQPONMLKJIHGFEDCBA
`.slice(~n):''

o.innerText = f()

<pre id=o>

Желе , 12 байт

ØAµ⁶ṁḊ;ṚµƤṚY

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

ØAµ⁶ṁḊ;ṚµƤṚY  Main Link
ØA            "ABC...XYZ"
         Ƥ    For each prefix,
  µ⁶ṁḊ;Ṛµ     Monadic Link
   ⁶          ' '
    ṁ         (with automatic repetition) molded to the shape of
     Ḋ        All but the first letter of the input (repeat - 1)
      ;       With the input          appended to it
       Ṛ                     reversed
           Y  Join on newlines

-3 байта благодаря милям

брейкфук , 105 байт

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

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

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

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

Читаемая версия:

[
  pre-initialize the tape with the values 10 90 32 >26<
  C_NEWLINE: 10
  V_ALPHA: 90
  C_SPACE: 32
  V_COUNTER: 26

AS:

  10 = 8 *  1 + 2
  90 = 8 * 11 + 2
  32 = 8 *  4 + 0
  26 = 8 *  3 + 2
]

8 ++++++++ [
  *  1 >+
  * 11 >+++++++++++
  *  4 >++++
  *  3 >+++
<<<<-]
PLUS 2 >++
PLUS 2 >++
PLUS 0 >
PLUS 2 >++

UNTIL V_COUNTER == 0 [
  COPY V_COUNTER to RIGHT and RIGHT_RIGHT
  [->+>+<<]
  TAPE: 10 V_ALPHA 32 >0< V_COUNTER_R V_COUNTER_RR
  V_COUNTER_R SUB 1 TIMES: >-[-
     PRINT C_SPACE <<.
  >>]
  TAPE: 10 V_ALPHA 32 0 >0< V_COUNTER_RR
  V_COUNTER_RR TIMES: >[-
    PRINT V_ALPHA <<<<.
    DECREMENT V_ALPHA -
    INCREMENT V_COUNTER_R >>>+
  >]
  TAPE: 10 V_ALPHA 32 0 V_COUNTER_R(26) >0<
  V_COUNTER_R SUB 1 TIMES: <-[-
    INCREMENT V_COUNTER <+
    INCREMENT V_ALPHA <<+
  >>>]
  PRINT C_NEWLINE <<<<.
>>>]

Октава , 53 49 46 45 байт

1 байт удален благодаря @Sanchises

for k=25:-1:0,disp([blanks(k) 65+k:-1:65])end

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

Поэтический , 601 байт

one night i camped a bit
throughout all the forest now
the sweet sights
i saw giant things
i saw little small things
here i am
seated around all my trees i saw
i sleep
i sle-e-p
sleep in a cabin
i am sleep-y
i sleep a bit
i awaken in bed
i stand
i walk
i am ready
i saw a vision of a dragon
i am fooled
i know i am
should i f-ight
i f-light
i did f-light
i did a flight
go away,i do imply
i*m afraid
i run
i leave
i flee
i am timid
i*m just a person,not toughie-tough-guy
no,never
i*m waste
i am stupid
a quitter i was
i am stupid
i*m turning around
i do not appreciate camping
i cry
i am crying
no
no

Poetic - это esolang, который я создал в 2018 году для проекта класса, и это производная от мозгового меха, в которой длины слов соответствуют командам мозгового меха (а команды +, -,> и <каждая имеют аргументы из 1 цифры).

Тот факт, что только длина слова диктует команды, означает, что я технически мог бы создать программу, целиком составленную из не-слов (то есть буквы X столько раз, сколько нужно, с пробелами между словами), но я хотел сделать интересный стихотворение свободного стиха из этого, не добавляя ненужные байты.

Если вы хотите попробовать его в Интернете (что, в первую очередь, составляет половину цели проекта), обратитесь к моему онлайн-переводчику !

05AB1E , 10 байтов

žpDvÐg<ú,¦

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

Пояснения:

žpDvÐg<ú,¦
žp           Push the uppercased alphabet, reversed
  D          Duplicate
   v         For each letter (we just want to loop 26 times, so we use the 
                already pushed alphabet for that purpose)
    Ð        Triplicate
     g<      Length of the string - 1
       ú     Add that number of spaces at the beginning of the string
        ,    Print with newline
         ¦   Remove the 1st element of the remaining copy of the string

Perl 6 , 37 байт

Сохранено 9 байт благодаря @Massa.

say " "x$_,chrs $_+65...65 for 25...0

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

Пояснение: 25...0 это диапазон от 25 до 0 (как и ожидалось). Мы перебираем этот диапазон, говоря (= печать с новой строкой), что много пробелов и строка символов, которые имеют коды ASCII ( chrs) от 65 + это число ( $_+65...65).

Древесный уголь , 19 11 байт

-8 байт благодаря ASCII-только.

Ｆ²⁶«Ｐ⮌…α⊕ι↗

Попробуйте онлайн! Ссылка на подробную версию.

Perl 5 , 36 байт

35 байт код + 1 для -p.

$\=$"x$-++.($a=$_.$a).$/.$\for A..Z

Примечание : TIO не поддерживает пустой ввод , поэтому предоставляется новая строка, это приводит к лишнему переводу строки, но при запуске в командной строке с пустым вводом это не отображается.

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

Рубин , 54 52 байта

25.downto 0{|n|puts' '*n+[*?A..?Z][0..n].reverse*''}

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

Cubix , 43 46 байт

$/\;u:\s/':(!$u;:'@^!@Wu;oSU;o+<u(;;oN;(!|

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

Cubified

      $ / \
      ; u :
      \ s /
'  : ( ! $ u ; : ' @ ^
! @ W u ; o S U ; o + <
u ( ; ; o N ; ( ! | . .
      . . .
      . . .
      . . .

Смотреть это беги

Удалось побрить еще немного из этого, но это оказалось немного сложнее, чем я думал. После первой цитаты есть замещающий символ, который дает мне 26.

• '<sub> нажмите 26 на стек в качестве базового числа
• :(! дубликат базы как счетчик, декремент, проверка на правдивость
• uна истину пропустить $команду и разворот направо
  • So;u нажмите 32, выведите как символ, нажмите 32 и поверните направо на декремент
• $при ложном прыжке следующая uкоманда
• ;:'@^ выдвиньте, продублируйте базовый номер, вставьте 64 в стек и перенаправьте на извилистый маршрут
• $\s/:\/u;$это порядок шагов на верхней грани. Это сводится к тому, чтобы поменять счетчик с 64. Заканчивается пропуском через редирект, который поместил его здесь.
• <+o;U перенаправить, чтобы добавить, вывод символа, поп, разворот налево
• (!декремент, проверка на правдивость. Если true начинается на пути, который попадает в разворот и возвращается к перенаправлению.
• |(;No ложь, отражение, избыточный тест, избыточный декремент, pop, push 10 и выходной символ
• ;;(u!@Wнажмите на базовое число, уменьшите, поверните направо на правдивый тест, остановите, если false, в противном случае измените полосу на дубликат в начале. Промыть и повторить.

Python, 83 байта

[print(' '*i+''.join([chr(64+i)for i in range(i+1,0,-1)]))for i in range(25,-1,-1)]

Мой первый ответ на Codegolf :)

sed 4.2.2 + Bash , 50 байт

s/^/printf %25s;printf %s {Z..A}/e
:
p
s/ \S//
t
d

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

Баш + седь 4.2.2 , 51 байт

printf %s {Z..A}|sed 'h
s/./ /g
G
:
s/ [^ ]//p
t
d'

Опираясь на ответ @ DigitalTrauma .

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

Vim, 43 нажатия клавиш

:h<_<CR>jjYZZPVgUxjpqqy$-i <Esc>lpl"aDYPD"ap+q25@q

Вы можете увидеть это в действии в этом GIF, сделанном с использованием скрипта Lynn's Python.

JavaScript, 75 74 байта

1 байт сохранен благодаря Рику Хичкоку

f=(a=65,b='',c)=>a>90?'':f(a+1,b+' ',c=String.fromCharCode(a)+[c])+`
`+b+c

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

Perl 5 , 49 байт

$_=$"x26 .join'',reverse A..Z,Z;say while s/ \S//

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

Пайк , 8 байт

G_.<XFo}h-

Попробуй это здесь!

           -  o = 0
G_         -    reversed(alphabet)
  .<       -   suffixes(^)
    XF     -  for i in ^:
      o    -      o++
       }   -     ^ * 2
        h  -    ^ + 1
         - -   i.lpad(" ", ^)
           - for i in reversed(^):
           -  print i

Я вижу правильный язык, делающий это в 6 байтах, если у них есть встроенная функция, prepend n spaces to stringа также то, что делает Pyke

PHP ( 63 58 55 байт)

Возможно, это мой любимый странный угол PHP, угол, который он наследует от Perl:

for($c=A;$c!=AA;$q="$s$z 
$q",$s.=" ")$z=$c++.$z;echo$q;

Это выводит завершающий символ новой строки, как явно разрешено. Это можно запустить, php -rчтобы сохранить отверстие, <?phpнеобходимое для помещения в файл.

Объяснение: когда переменная, содержащая строку 'A', увеличивается в PHP, она становится, 'B'а затем 'C'и так далее до тех пор, пока не 'Z'станет 'AA'. В 'A'этой алгебре madcap нет ни одной цифры, с которой нужно начинать, и оператор декремента не отменяет ее, поэтому мы сохраняем пошагово обращенный алфавит в $z(по умолчанию, NULLкогда он объединяется со строкой, он ведет себя как пустая строка - то же самое происходит с $sи $q). Пробелы накапливаются, $sа вся строка накапливается в переменной в обратном направлении, $qчто означает, что мы должны повторить его в конце.

Спасибо Титу за то, что он играл в гольф с моих фигурных скобок и сказал мне, что мне не нужно брать штраф за такие флаги, как встроенные оценки -r.

SOGL V0.12 , 10 8 байтов

Z±{Xf}⁰¼

Попробуй здесь!

Common Lisp, 84 82 байта

(dotimes(i 26)(format t"~v@{ ~}~a
"(- 25 i)(subseq"ZYXWVUTSRQPONMLKJIHGFEDCBA"i)))

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

На два байта меньше благодаря @ Ascii-only!

Python 2 , 72 67 байт

i=26
while-~i:print' '*i+''.join(map(chr,range(65,91)))[i::-1];i-=1

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