Натхненний помилкою у вирішенні цього завдання , ваше завдання полягає в тому, щоб створити такий точний текст:

                         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), потім нового рядка.

Додаткові правила:

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

Як і у випадку з кодом-гольф , виграє найкоротше подання. Удачі!

Табло:

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

Bash + GNU sed, 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

Пітон 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 - це езоланг, який я створив у 2018 році для класового проекту, і це похідна мозкових записів, у якій довжини слів відповідають командам brainfuck (а команди +, -,> та <мають однозначні аргументи).

Той факт, що команди визначають лише довжину слів, означає, що я технічно міг створити програму, повністю складену з не-слів (тобто літеру 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;(!|

Спробуйте в Інтернеті!

Кубіфікований

      $ / \
      ; 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 перенаправлення на додавання, виведення символу, поп, поворот ліворуч
• (!декремент, тест на truthy. Якщо true починається з шляху, який влучить у поворот, повертається до переадресації.
• |(;No на помилковому, відбиваючому, надмірному тесті, надмірному скороченні, поп, натисканні 10 та вихідному символі
• ;;(u!@Wспливати до базового номера, декременту, повернути праворуч на тест на правду, зупинити, якщо помилково інакше змінити смугу на дублікат на початку. Промийте і повторіть.

Пітон, 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

Спробуйте в Інтернеті!

Bash + sed 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, зробленому за допомогою сценарію python Lynn

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}⁰¼

Спробуйте тут!

Лист звичайний, 84 82 байт

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

Спробуйте в Інтернеті!

На два байти менше завдяки @ Ascii!

Python 2 , 72 67 байт

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

Спробуйте в Інтернеті!