Натхненний друком Джорджа Гібсона "Друк табули" .

Ви повинні надрукувати / вивести саме цей текст:

ABCDEFGHIJKLMNOPQRSTUVWXYZ
BBCDEFGHIJKLMNOPQRSTUVWXYZ
CCCDEFGHIJKLMNOPQRSTUVWXYZ
DDDDEFGHIJKLMNOPQRSTUVWXYZ
EEEEEFGHIJKLMNOPQRSTUVWXYZ
FFFFFFGHIJKLMNOPQRSTUVWXYZ
GGGGGGGHIJKLMNOPQRSTUVWXYZ
HHHHHHHHIJKLMNOPQRSTUVWXYZ
IIIIIIIIIJKLMNOPQRSTUVWXYZ
JJJJJJJJJJKLMNOPQRSTUVWXYZ
KKKKKKKKKKKLMNOPQRSTUVWXYZ
LLLLLLLLLLLLMNOPQRSTUVWXYZ
MMMMMMMMMMMMMNOPQRSTUVWXYZ
NNNNNNNNNNNNNNOPQRSTUVWXYZ
OOOOOOOOOOOOOOOPQRSTUVWXYZ
PPPPPPPPPPPPPPPPQRSTUVWXYZ
QQQQQQQQQQQQQQQQQRSTUVWXYZ
RRRRRRRRRRRRRRRRRRSTUVWXYZ
SSSSSSSSSSSSSSSSSSSTUVWXYZ
TTTTTTTTTTTTTTTTTTTTUVWXYZ
UUUUUUUUUUUUUUUUUUUUUVWXYZ
VVVVVVVVVVVVVVVVVVVVVVWXYZ
WWWWWWWWWWWWWWWWWWWWWWWXYZ
XXXXXXXXXXXXXXXXXXXXXXXXYZ
YYYYYYYYYYYYYYYYYYYYYYYYYZ
ZZZZZZZZZZZZZZZZZZZZZZZZZZ

(Так, я набрав це вручну)

Ви можете використовувати всі малі регістри замість усіх великих літер.

Однак ваш вибір справи повинен бути узгодженим у всьому тексті.

Правила / Вимоги

• Кожне подання повинно бути або повною програмою, або функцією. Якщо це функція, її потрібно запускати, лише додаючи виклик функції в нижній частині програми. Все інше (наприклад, заголовки в C), має бути включено.
• Якщо це можливо, надайте посилання на сайт, де можна перевірити вашу програму.
• Ваша програма не повинна нічого писати STDERR.
• Стандартні лазівки заборонені.
• Ваша програма може виводити в будь-якому випадку, але вона повинна бути надрукована (не масив чи подібне).

Оцінка балів

Програми оцінюються за байтами, за замовчуванням у UTF-8 або іншим набором символів на ваш вибір.

Зрештою, відповідь з найменшими байтами переможе.

Подання

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

# Language Name, N bytes

де Nрозмір вашого подання. Якщо ви покращите свій рахунок, ви можете зберегти старі бали у заголовку, прокресливши їх. Наприклад:

# Ruby, <s>104</s> <s>101</s> 96 bytes

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

# Perl, 43 + 2 (-p flag) = 45 bytes

Ви також можете зробити ім'я мови посиланням, яке потім з’явиться у фрагменті таблиць лідерів:

# [><>](http://esolangs.org/wiki/Fish), 121 bytes

Таблиця лідерів

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

/* Configuration */

var QUESTION_ID = 87064; // Obtain this from the url
// It will be like https://XYZ.stackexchange.com/questions/QUESTION_ID/... on any question page
var ANSWER_FILTER = "!t)IWYnsLAZle2tQ3KqrVveCRJfxcRLe";
var COMMENT_FILTER = "!)Q2B_A2kjfAiU78X(md6BoYk";
var OVERRIDE_USER = 48934; // This should be the user ID of the challenge author.

/* App */

var answers = [], answers_hash, answer_ids, answer_page = 1, more_answers = true, comment_page;

function answersUrl(index) {
  return "https://api.stackexchange.com/2.2/questions/" +  QUESTION_ID + "/answers?page=" + index + "&pagesize=100&order=desc&sort=creation&site=codegolf&filter=" + ANSWER_FILTER;
}

function commentUrl(index, answers) {
  return "https://api.stackexchange.com/2.2/answers/" + answers.join(';') + "/comments?page=" + index + "&pagesize=100&order=desc&sort=creation&site=codegolf&filter=" + COMMENT_FILTER;
}

function getAnswers() {
  jQuery.ajax({
    url: answersUrl(answer_page++),
    method: "get",
    dataType: "jsonp",
    crossDomain: true,
    success: function (data) {
      answers.push.apply(answers, data.items);
      answers_hash = [];
      answer_ids = [];
      data.items.forEach(function(a) {
        a.comments = [];
        var id = +a.share_link.match(/\d+/);
        answer_ids.push(id);
        answers_hash[id] = a;
      });
      if (!data.has_more) more_answers = false;
      comment_page = 1;
      getComments();
    }
  });
}

function getComments() {
  jQuery.ajax({
    url: commentUrl(comment_page++, answer_ids),
    method: "get",
    dataType: "jsonp",
    crossDomain: true,
    success: function (data) {
      data.items.forEach(function(c) {
        if (c.owner.user_id === OVERRIDE_USER)
          answers_hash[c.post_id].comments.push(c);
      });
      if (data.has_more) getComments();
      else if (more_answers) getAnswers();
      else process();
    }
  });  
}

getAnswers();

var SCORE_REG = /<h\d>\s*([^\n,]*[^\s,]),.*?(\d+)(?=[^\n\d<>]*(?:<(?:s>[^\n<>]*<\/s>|[^\n<>]+>)[^\n\d<>]*)*<\/h\d>)/;

var OVERRIDE_REG = /^Override\s*header:\s*/i;

function getAuthorName(a) {
  return a.owner.display_name;
}

function process() {
  var valid = [];
  
  answers.forEach(function(a) {
    var body = a.body;
    a.comments.forEach(function(c) {
      if(OVERRIDE_REG.test(c.body))
        body = '<h1>' + c.body.replace(OVERRIDE_REG, '') + '</h1>';
    });
    
    var match = body.match(SCORE_REG);
    if (match)
      valid.push({
        user: getAuthorName(a),
        size: +match[2],
        language: match[1],
        link: a.share_link,
      });
    
  });
  
  valid.sort(function (a, b) {
    var aB = a.size,
        bB = b.size;
    return aB - bB
  });

  var languages = {};
  var place = 1;
  var lastSize = null;
  var lastPlace = 1;
  valid.forEach(function (a) {
    if (a.size != lastSize)
      lastPlace = place;
    lastSize = a.size;
    ++place;
    
    var answer = jQuery("#answer-template").html();
    answer = answer.replace("{{PLACE}}", lastPlace + ".")
                   .replace("{{NAME}}", a.user)
                   .replace("{{LANGUAGE}}", a.language)
                   .replace("{{SIZE}}", a.size)
                   .replace("{{LINK}}", a.link);
    answer = jQuery(answer);
    jQuery("#answers").append(answer);

    var lang = a.language;
    if (/<a/.test(lang)) lang = jQuery(lang).text();
    
    languages[lang] = languages[lang] || {lang: a.language, user: a.user, size: a.size, link: a.link};
  });

  var langs = [];
  for (var lang in languages)
    if (languages.hasOwnProperty(lang))
      langs.push(languages[lang]);

  langs.sort(function (a, b) {
    if (a.lang > b.lang) return 1;
    if (a.lang < b.lang) return -1;
    return 0;
  });

  for (var i = 0; i < langs.length; ++i)
  {
    var language = jQuery("#language-template").html();
    var lang = langs[i];
    language = language.replace("{{LANGUAGE}}", lang.lang)
                       .replace("{{NAME}}", lang.user)
                       .replace("{{SIZE}}", lang.size)
                       .replace("{{LINK}}", lang.link);
    language = jQuery(language);
    jQuery("#languages").append(language);
  }

}

body { text-align: left !important}

#answer-list {
  padding: 10px;
  width: 290px;
  float: left;
}

#language-list {
  padding: 10px;
  width: 290px;
  float: left;
}

table thead {
  font-weight: bold;
}

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>

Excel, 19 604 байт

=CHAR(64+MAX(COLUMN(),ROW()))

Вставте цю формулу A1, а потім перетягніть все A1:Z26.

Кількість байтів:

1. Формула - 27 байт.
2. Копіювати його потрібно 26 ^ 2 рази. 27 * 26 * 26 = 19604.
3. Я та інші думали, що оцінка повинна бути нижчою, оскільки вам не потрібно вводити формулу знову і знову. Я зараз думаю, що це не має значення - ми рахуємо розмір програми, а не роботу, витрачену на її написання.
4. Для порівняння - див. Цю відповідь на 28 187 символів JS - очевидно, хтось генерував це, а не вводив усе це, але він не змінює свого розміру.

Vim, 43 байти

:h<_↵jjYZZPqqlmaYp`ajyl:norm v0r♥"↵`ajq25@q

Тут ↵представлено Return ( 0x0a) і ♥являє собою Ctrl-R ( 0x12).

Не зовсім така коротка, як моя відповідь Tabula Recta, але ...

Желе, 6 байт

ØA»'j⁷

Спробуйте тут. Якби я вчора не лінувався і втілив цю однобайтову альтернативу j⁷(приєднайтесь до нових рядків) ...

ØA      The uppercase alphabet.
  »'    Table of max(x, y).
    j⁷  Join by newlines.

brainfuck, 103 96 95 91 87 байт

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

Для цього використовується константа Esolangs для мозку 64 . Спробуйте в Інтернеті!

/// , 141 94 92 82 байт

/:/\\\\A//#/:b:c:d:e:f:g:h:i:j:k:l:m:n:o:p:q:r:s:t:u:v:w:x:y:z://:/\/a#
\/a\///A/#

Спробуйте в Інтернеті: Демонстрація

Досить весела мова.

Пояснення:

Скоротіть код, щоб надрукувати квадрат 4х4:

/:/\\\\A//#/:b:c:d://:/\/a#
\/a\///A/#

Перша заміна /:/\\\\A/замінює :на \\A. Це дає:

/#/\\Ab\\Ac\\Ad\\A//\\A/\/a#
\/a\///A/#

Потім /#/\\Ab\\Ac\\Ad\\A//\\A/замінюється #на \Ab\Ac\Ad\A:

/\\A/\/a\Ab\Ac\Ad\A
\/a\///A/\Ab\Ac\Ad\A

Тепер /\\A/\/a\Ab\Ac\Ad\A<newline>\/a\//кожний \Aв наступному коді замінює на /aAbAcAdA<newline>/a/, тому це призводить до:

/A//aAbAcAdA
/a/b/aAbAcAdA
/a/c/aAbAcAdA
/a/d/aAbAcAdA
/a/

Тепер перша частина /A//видаляє всі As.

abcd
/a/b/abcd
/a/c/abcd
/a/d/abcd
/a/

Перші п’ять символів abcd<newline>надрукуються. Наступна команда /a/b/замінює aна b, в результаті чого:

bbcd
/b/c/bbcd
/b/d/bbcd
/b/

Знову bbcd<newline>друкуються перші п’ять символів . Наступна команда /b/c/замінюється bна c:

cccd
/c/d/cccd
/c/

Знову cccd<newline>друкуються перші п’ять символів . Наступна команда /c/d/замінюється cна d:

dddd
/d/

Перші п’ять символів dddd<newline>надрукуються. А наступна команда /d/неповна і тому нічого не робить.

Діалог APL , 11 байт

⎕A[∘.⌈⍨⍳26]

A[... ]виберіть елементи з
    ∘.⌈⍨великого алфавіту відповідно до максимальної таблиці
    ⍳26перших 26 цілих чисел

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

Математика, 69 65 57 байт

^{Збережено 8 байт завдяки @MartinEnder .}

FromCharacterCode[64+Max~Array~{26,26}]~StringRiffle~"
"&

Анонімна функція. Не приймає введення і повертає рядок як вихід. В основному просто бере char('A' + max(x, y))для всіх x , y від 1 до 26.

/// , 348 байт

/|/\/\///v/NNN|u/MMM|t/LLL|s/WXYZ|r/OOO|q/KLMa|p/RRRR|o/QQQQ|n/PPPP|m/SSS|l/EFGc|k/RSTb|j/UUUU|i/TTTT|h/WWW|g/VVV|f/XXXX|e/ZZZZZ|d/YYYYY|c/HIJq|b/UVs
|a/NOPQk/ABCDlBBCDlCCCDlDDDDlEEEElFFFFFFGcGGGGGGGcHHHHHHHcIIIIIIIIIJqJJJJJJJJJJqKKKKKKKKKKqttttMauuuuMavvvvNarrrrrPQknnnnQkooooQkppppRkmmmmmmSTbiiiiibjjjjjbgggggggVs
hhhhhhhWs
ffffffYZ
dddddZ
eeeeeZ

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

Я використовував ту саму методику, щоб будувати це, як і для моєї /// відповіді на виклик, на якому ґрунтувався . Однак мені довелося виправити скрипт CJam, оскільки він неправильно обробляв підрядки, які можуть перекривати себе.

Сітківка , 41 байт

Кількість байтів передбачає кодування ISO 8859-1. Провідна передача ліній є значною.

26$*Z
{`^[^A].+
$&¶$&
}T0-2`L`_L`^(.)\1+

Пояснення

26$*Z

Встановіть рядок на 26 копій Z. Потім {...}доручіть Retina виконати дві інші інструкції в циклі, поки рядок не перестане змінюватися.

{`^[^A].+
$&¶$&

Дублюйте перший рядок, якщо він не починається з A.

}T0-2`L`_L`^(.)\1+

Це стадія транслітерації. Він застосовується лише в тому випадку, якщо рядок починається щонайменше з двох копій одного і того ж символу. Якщо так, усі, крім останнього, символи зменшуються. Декрементація відбувається шляхом зіставлення L(верхнього алфавіту великого регістру) до _L(порожній, а потім алфавіт верхнього регістру). Значення "всі, крім останнього" позначається лімітом, -2який говорить Ретіні лише транслітерацію всіх символів до другого до останнього в матчі.

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

Haskell, 35 байт

a=['A'..'Z']
unlines$(<$>a).max<$>a

Python 2, 59 байт

n=0;exec'print bytearray([n+65]*n+range(n+65,91));n+=1;'*26

Перевірте це на Ideone .

R, 58 байт

l=LETTERS;for(i in 1:26){l[2:i-1]=l[i];cat(l,"\n",sep="")}

Завдяки перевазі оператора 2:i-1еквівалентно 1:(i-1). Використовується вбудована константа, LETTERSяка містить алфавіт у верхньому регістрі. Все інше досить зрозуміле.
Використання:

> l=LETTERS;for(i in 1:26){l[2:i-1]=l[i];cat(l,"\n",sep="")}
ABCDEFGHIJKLMNOPQRSTUVWXYZ
BBCDEFGHIJKLMNOPQRSTUVWXYZ
CCCDEFGHIJKLMNOPQRSTUVWXYZ
DDDDEFGHIJKLMNOPQRSTUVWXYZ
EEEEEFGHIJKLMNOPQRSTUVWXYZ
FFFFFFGHIJKLMNOPQRSTUVWXYZ
GGGGGGGHIJKLMNOPQRSTUVWXYZ
HHHHHHHHIJKLMNOPQRSTUVWXYZ
IIIIIIIIIJKLMNOPQRSTUVWXYZ
JJJJJJJJJJKLMNOPQRSTUVWXYZ
KKKKKKKKKKKLMNOPQRSTUVWXYZ
LLLLLLLLLLLLMNOPQRSTUVWXYZ
MMMMMMMMMMMMMNOPQRSTUVWXYZ
NNNNNNNNNNNNNNOPQRSTUVWXYZ
OOOOOOOOOOOOOOOPQRSTUVWXYZ
PPPPPPPPPPPPPPPPQRSTUVWXYZ
QQQQQQQQQQQQQQQQQRSTUVWXYZ
RRRRRRRRRRRRRRRRRRSTUVWXYZ
SSSSSSSSSSSSSSSSSSSTUVWXYZ
TTTTTTTTTTTTTTTTTTTTUVWXYZ
UUUUUUUUUUUUUUUUUUUUUVWXYZ
VVVVVVVVVVVVVVVVVVVVVVWXYZ
WWWWWWWWWWWWWWWWWWWWWWWXYZ
XXXXXXXXXXXXXXXXXXXXXXXXYZ
YYYYYYYYYYYYYYYYYYYYYYYYYZ
ZZZZZZZZZZZZZZZZZZZZZZZZZZ

Сесос , 25 байт

0000000: 2829c0 756fc6 aecae2 aecd9c 39e09e 099c63 7d8e3d  ().uo.......9....c}.=
0000015: 65a7c0 39                                         e..9

Спробуйте в Інтернеті! Поставте прапорець Налагодження, щоб побачити створений код SBIN.

Збірка Sesos

Бінарний файл, описаний вище, був сформований шляхом складання наступного коду SASM.

add 26
jmp
    jmp
        rwd 1, add 1, rwd 1, add 1, fwd 2, sub 1
    jnz
    rwd 2, add 64
    jmp
        fwd 2, add 1, rwd 2, sub 1
    jnz
    fwd 1, sub 1
jnz
fwd 1
jmp
    jmp
        rwd 1, add 1, fwd 1, sub 1
    jnz
    nop
        rwd 1
    jnz
    fwd 1
    jmp
        put, add 1, fwd 1
    jnz
    fwd 1
    jmp
        put, fwd 1
    jnz
    add 10, put, get
    nop
        rwd 1
    jnz
    fwd 1
; jnz (implicit)

Як це працює

Почнемо з ініціалізації стрічки до ABCDEFGHIJKLMNOPQRSTUVWXYZ. Це так.

Запишіть 26 у клітинку, залишивши стрічку в наступному стані.

                                                       v
0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 26 0

Поки комірка під головою даних не дорівнює нулю, робимо наступне.

Скопіюйте номер у дві клітинки зліва та додайте 64 до крайньої лівої копії.

                                                   v
0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 90 26 0 0

Перемістіть крайню ліву копію до початкового місця, а потім відніміть 1 від крайньої правої копії.

                                                     v
0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 25 90 0

Процес зупиняється після 26 ітерацій, оскільки до цього часу найправіша копія дорівнює 0 . Переміщаємо комірку праворуч, тому остаточний стан стрічки після ініціалізації наступний.

     v
0 0 65 66 67 68 69 70 71 72 73 74 75 76 77 78 79 80 81 82 83 84 85 86 87 88 89 90 0

Тепер ми готові генерувати вихід, повторюючи наступний процес, поки комірка під головою даних не дорівнює нулю.

Спочатку переміщуємо вміст комірки під головою даних на один блок ліворуч, потім переміщуємо ліворуч до останньої комірки з ненульовим вмістом.

   v
0 65 0 66 67 68 69 70 71 72 73 74 75 76 77 78 79 80 81 82 83 84 85 86 87 88 89 90 0

Тепер ми друкуємо всі комірки, починаючи з тієї, що знаходиться під головою даних, і рухаємося правою до тих пір, поки не знайдемо комірку 0 , збільшуючи кожну друковану комірку після її друку. Після друку Aстрічка виглядає наступним чином.

     v
0 66 0 66 67 68 69 70 71 72 73 74 75 76 77 78 79 80 81 82 83 84 85 86 87 88 89 90 0

Тепер ми рухаємося праворуч, знову друкуючи всі комірки, поки не з’явиться 0- ячейка. Після друку BCDEFGHIJKLMNOPQRSTUVWXYZстрічка виглядає наступним чином.

                                                                                  v
0 66 0 66 67 68 69 70 71 72 73 74 75 76 77 78 79 80 81 82 83 84 85 86 87 88 89 90 0

Тепер ми записуємо 10 до поточної комірки, друкуємо відповідний символ (linefeed) та нуль комірки із закликом до getпустого вводу, залишаючи стрічку незмінною.

Нарешті, переходимо до останнього ненульового зліва, готуючи стрічку до наступної ітерації.

        v
0 66 0 66 67 68 69 70 71 72 73 74 75 76 77 78 79 80 81 82 83 84 85 86 87 88 89 90 0

Наступна ітерація схожа. Спочатку переміщаємо 66 однієї комірки вліво, друкуємо обидві 66 комірок ( BB) і збільшуємо їх до 67 , потім друкуємо інші ненульові комірки праворуч ( CDEFGHIJKLMNOPQRSTUVWXYZ) і, нарешті, розміщуємо дані голови на 67 , залишаючи стрічку наступним чином .

           v
0 66 66 0 67 68 69 70 71 72 73 74 75 76 77 78 79 80 81 82 83 84 85 86 87 88 89 90 0

Після ще 24 повторень і після друку ZZZZZZZZZZZZZZZZZZZZZZZZZZта подачі ліній стрічки залишаються в наступному стані.

                                                                                  v
0 91 91 91 91 91 91 91 91 91 91 91 91 91 91 91 91 91 91 91 91 91 91 91 91 91 91 0 0

Переміщення головки даних ліворуч до наступної ненульової комірки залишить її у своєму поточному положенні, тому комірка під нею дорівнює 0 і цикл закінчується.

J, 13 байт

u:65+>./~i.26

Онлайн-перекладач .

Пояснення

u:65+>./~i.26
         i.26  generate [0 1 ... 25]
       /~      build a table...
     >.        ...of maximum
  65+          add 65 to each element
u:             convert to unicode

Матлаб / Октава, 43 39 байт

1 байт вилучено завдяки ідеї @ beaker використовувати [...,'']для перетворення в char.

@()[91-rot90(gallery('minij',26),2),'']

Це анонімна функція, яка повертає двовимірний масив символів.

Спробуйте це на Ideone .

Пояснення

gallery('minij',...) дає матрицю, в якій кожен запис дорівнює мінімуму індексів його рядків і стовпців:

 1     1     1     1  ...
 1     2     2     2
 1     2     3     3
 1     2     3     4
 ...

Це повертається на 180 градусів за допомогою rot90(...,2):

26    25    24    23  ...
25    25    24    23
24    24    24    23
23    23    23    23
...  

91-...Операція дає ASCII - коди прописних літер:

65    66    67    68
66    66    67    68
67    67    67    68
68    68    69    68 ...
...

Нарешті [...,'']об'єднується горизонтально з порожнім рядком. Це призводить до перетворення в char.

PowerShell v2 +, 76 52 40 байт

65..90|%{-join[char[]](,$_*$i+++$_..90)}

Петлі від 65до 89. Кожна ітерація, ми побудувавши масив з допомогою коми-оператору , який складається з поточного числа , $_помноженого на пост-збільшенні змінних хелперів $i++, зчеплений з масивом поточного числа $_до 90. Це інкапсульовано у складі масиву char та масиву та -joinразом у рядку. Наприклад, для першої ітерації цей масив був би еквівалентним 65..90або цілому алфавіту. Другою ітерацією було б 66+66..90або весь алфавіт з Bповторним і ні A.

Усі вони залишилися на конвеєрі в кінці програми (як масив), а друк на консолі неявний (за замовчуванням .ToString()для масиву відокремлюється новий рядок, тому ми отримуємо це безкоштовно).

PS C:\Tools\Scripts\golfing> .\print-the-l-phabet.ps1
ABCDEFGHIJKLMNOPQRSTUVWXYZ
BBCDEFGHIJKLMNOPQRSTUVWXYZ
CCCDEFGHIJKLMNOPQRSTUVWXYZ
DDDDEFGHIJKLMNOPQRSTUVWXYZ
EEEEEFGHIJKLMNOPQRSTUVWXYZ
FFFFFFGHIJKLMNOPQRSTUVWXYZ
GGGGGGGHIJKLMNOPQRSTUVWXYZ
HHHHHHHHIJKLMNOPQRSTUVWXYZ
IIIIIIIIIJKLMNOPQRSTUVWXYZ
JJJJJJJJJJKLMNOPQRSTUVWXYZ
KKKKKKKKKKKLMNOPQRSTUVWXYZ
LLLLLLLLLLLLMNOPQRSTUVWXYZ
MMMMMMMMMMMMMNOPQRSTUVWXYZ
NNNNNNNNNNNNNNOPQRSTUVWXYZ
OOOOOOOOOOOOOOOPQRSTUVWXYZ
PPPPPPPPPPPPPPPPQRSTUVWXYZ
QQQQQQQQQQQQQQQQQRSTUVWXYZ
RRRRRRRRRRRRRRRRRRSTUVWXYZ
SSSSSSSSSSSSSSSSSSSTUVWXYZ
TTTTTTTTTTTTTTTTTTTTUVWXYZ
UUUUUUUUUUUUUUUUUUUUUVWXYZ
VVVVVVVVVVVVVVVVVVVVVVWXYZ
WWWWWWWWWWWWWWWWWWWWWWWXYZ
XXXXXXXXXXXXXXXXXXXXXXXXYZ
YYYYYYYYYYYYYYYYYYYYYYYYYZ
ZZZZZZZZZZZZZZZZZZZZZZZZZZ

C #, 147 байт

void e(){for(int i=0,j=97;i<26;i++,j++)Console.WriteLine(new string((char)j,i)+new string(Enumerable.Range(j,26-i).Select(n=>(char)n).ToArray()));}

інколи мені цікаво, чому я навіть намагаюся

редагувати: виправити

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

MATL, 10 байт

lY2t!2$X>c

Демонстрація в Інтернеті (Якщо у вас є проблеми з цим перекладачем, пінг мені в чаті MATL . Також, ось посилання TIO, якщо у вас є проблеми)

Пояснення

lY2     % Push an array of characters to the stack: 'AB...Z'
t!      % Duplicate and transpose
2$X>    % Take the element-wise maximum between these two (with expansion)
c       % Explicitly convert back to characters
        % Implicitly display the result.

Python 2, 76 70 68 байт

a=range(65,91)
i=0
for c in a:a[:i]=[c]*i;i+=1;print'%c'*26%tuple(a)

Дуже схожа на мою відповідь на пов'язане питання .

Збережено 2 байти завдяки @xnor (знову)!

Октава, 26 байт

disp([max(L=65:90,L'),''])

Зразок запущений на ideone .

05AB1E , 9 байт

Код:

AAv¬N×?=¦

Пояснення:

AA         # Push the alphabet twice.
  v        # For each in the alphabet.
   ¬       # Get the first character and
    N×     # multiply by the iteration variable.
      ?    # Pop and print.
       =   # Print the initial alphabet without popping.
        ¦  # Remove the first character of the initial alphabet and repeat.

Використовує кодування CP-1252 . Спробуйте в Інтернеті! .

Javascript ES6, 81 байт

x=>[...a='ABCDEFGHIJKLMNOPQRSTUVWXYZ'].map((x,y)=>x.repeat(y)+a.slice(y)).join`
`

Самопояснення.

R, 56 байт

Не майте жодного коментаря, але відповідь @plannapus можна трохи переграти:

for(i in 1:26)cat({L=LETTERS;L[1:i]=L[i];L},"\n",sep="")

в результаті виходить однаковий вихід:

ABCDEFGHIJKLMNOPQRSTUVWXYZ
BBCDEFGHIJKLMNOPQRSTUVWXYZ
CCCDEFGHIJKLMNOPQRSTUVWXYZ
DDDDEFGHIJKLMNOPQRSTUVWXYZ
EEEEEFGHIJKLMNOPQRSTUVWXYZ
FFFFFFGHIJKLMNOPQRSTUVWXYZ
GGGGGGGHIJKLMNOPQRSTUVWXYZ
HHHHHHHHIJKLMNOPQRSTUVWXYZ
IIIIIIIIIJKLMNOPQRSTUVWXYZ
JJJJJJJJJJKLMNOPQRSTUVWXYZ
KKKKKKKKKKKLMNOPQRSTUVWXYZ
LLLLLLLLLLLLMNOPQRSTUVWXYZ
MMMMMMMMMMMMMNOPQRSTUVWXYZ
NNNNNNNNNNNNNNOPQRSTUVWXYZ
OOOOOOOOOOOOOOOPQRSTUVWXYZ
PPPPPPPPPPPPPPPPQRSTUVWXYZ
QQQQQQQQQQQQQQQQQRSTUVWXYZ
RRRRRRRRRRRRRRRRRRSTUVWXYZ
SSSSSSSSSSSSSSSSSSSTUVWXYZ
TTTTTTTTTTTTTTTTTTTTUVWXYZ
UUUUUUUUUUUUUUUUUUUUUVWXYZ
VVVVVVVVVVVVVVVVVVVVVVWXYZ
WWWWWWWWWWWWWWWWWWWWWWWXYZ
XXXXXXXXXXXXXXXXXXXXXXXXYZ
YYYYYYYYYYYYYYYYYYYYYYYYYZ
ZZZZZZZZZZZZZZZZZZZZZZZZZZ

Хоча, якщо відповідь як матриця дозволена ( тобто як тут ), ми могли б зробити 49 байт:

sapply(1:26,function(l){L=LETTERS;L[1:l]=L[l];L})

R , 42 41 байт

write(outer(L<-LETTERS,L,pmax),'',26,,'')

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

Наступний найкоротший R відповідь ще трохи занадто довго , так як він виводить через підрядник. Раніше сьогодні я думав над іншим питанням і зрозумів, що для цього можливий набагато коротший підхід: я генерую матрицю відразу за допомогою outerі pmax(паралельний максимум), а потім друкую її (*) за один крок write.

(*) технічно його транспонірують, але він, на щастя, симетричний по всій його діагоналі.

Haskell, 53 46 байт

unlines[(i<$['B'..i])++[i..'Z']|i<-['A'..'Z']]

Повертає один рядок з L-фабетом.

пройдіть через символи iвід Aдо Zта складіть список (length ['B'..i])копій, за якими iслідує [i..'Z']. Об’єднайте елементи між новими рядками.

Python 3, 71 65 байт

Завдяки @LeakyNun за -6 байт

r=range(26)
for i in r:print(''.join(chr(max(i,x)+65)for x in r))

Повна програма, яка друкує на STDOUT.

Як це працює

Задамо коди символів буквах алфавіту, з 0за Aв 25протягом Z. Програма циклічно проходить інтервал [0, 25]за допомогою лічильника ліній i, який визначає поточний символ, який потрібно повторити, і довжину повторного розділу, і символьний індекс x. При виклику max(i,x)всі символи нижче повторюваного символу затискаються на код символу того самого. Додавання 65та виклик chrперетворює отримані коди символів у їх еквіваленти ASCII; ''.joinоб'єднує символи, і кожен рядок друкується до STDOUT.

Спробуйте це на Ideone

𝔼𝕊𝕄𝕚𝕟, 12 символів / 15 байт

ᶐⓢ⒨Ċ_+ᶐč_)ü⬬

Try it here (Chrome Canary only).

В основному порт моєї відповіді ES6.

R, 54 байти

v=L=LETTERS;for(i in 2:26){L[1:i]=L[i];v=cbind(v,L)};v

У цьому рішенні використовується вбудована константа RLETTERS , яка ... добре ... перераховує великі літери. Існує також константа lettersдля малих літер.

C, 78 70 67 байт

f(i,j){for(;++i<27;puts(""))for(j=0;++j<27;putchar((i>j?i:j)+64));}

У коді використовуються такі методи гольфу для C:

• пропустити базовий включає (як stdio.h)
• опускати (повертати) типи функцій та змінних, роблячи їх за замовчуванням int
• використовувати потрійний оператор замість блоків if-else
• використовувати ASCII код листа замість його символічного подання (тобто 65замість 'A')
• використовувати putcharдля виведення одного символу
• зловживання аргументом аргументу
• використовувати puts("")для виведення нового рядка

Також правило If it is a function, it must be runnable by only needing to add the function call to the bottom of the program.не забороняє викликати функцію з параметрами (завдяки ABcDexter!).

Спробуйте це на Ideone

Нерозроблена версія (без жодних попереджень з gcc) виглядатиме так:

#include <stdio.h>

#define MAX(x, y) (x>y ? x : y)

int main()
{
    for(int i=0; i<26; i++)
    {
        for(int j=0; j<26; j++)
            printf("%c", MAX(i, j) + 'A');
        printf("\n");
    }
    return 0;
}

Чеддар, 90 байт

(|>26).map(i->String.letters.chars.map((j,k,l)->k<i?l[i]:j).fuse).vfuse.slice(1)

Це String.lettersзанадто довго: /

Довелося додати, .slice(1)тому що введення нового рядка заборонено

Пояснення

(|>26)       // Range from [0, 26)
.map(i->     // Loop through that range
 String.letters.chars // Alphabet array
  .map(               // Loop through alphabet
  (j,k,l) ->          // j = letter, j = index, l = alphabet
    k<i?l[i]:j        // Basically `l[max(k,i)]` 
  ).fuse     // Collapse the array
).vfuse      // Join on newlines

Чеддар, 65 байт (неконкурентоспроможний)

(|>26).map(i->String.letters.map((j,k,l)->k<i?l[i]:j).fuse).vfuse

Працює з нічним відділенням . Неконкуруюча ... сумна частина полягає в тому, що у мене вже були зміни ... просто ніколи не вчинялися; _;