Вы должны написать программу, которая будет выводить исходный код, который

1. Больше, чем оригинальная программа (по характеру)
2. При запуске напечатает другую программу, размер которой больше ее (т.е. новая программа также является верным ответом на этот вызов)

Это код-гольф, поэтому выигрывает самый короткий ответ.

GS2 (8636bd8e) , 0 байт

Это печатает одну новую строку, которая печатает две строки, которая печатает три строки и так далее.

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

H9 + : 1 символ

9

Верно. Один персонаж Выводит текст песни на 99 бутылок пива , что является действительной программой. Все посторонние данные не учитываются, но их там много 9.

Результатом выводимой программы является лирика на 99 бутылок пива 59 раз.

Эта функция дает количество раз, когда текст песни выводится, если вы запускаете время программы n(если мои вычисления верны):

f(n) = 59n-1

GolfScript, 9 символов

{.'.~'}.~

Этот код выводит:

{.'.~'}{.'.~'}.~

какие выводы:

{.'.~'}{.'.~'}{.'.~'}.~

какие выводы:

{.'.~'}{.'.~'}{.'.~'}{.'.~'}.~

и так далее.

Я полагаю, что это самый короткий ответ в «настоящем» языке программирования, полном Тьюринга.

Объяснение:

По сути, оригинальный код выше представляет собой «quine-layer»: он выводит обычный quine, за которым следует сам.

В GolfScript любой литерал блока кода (например {foo}), если его не трогать в стеке, представляет собой квинну. Таким образом, сам по себе, {.'.~'}просто выводит себя, как любой другой кодовый блок.

В .~конце кода берет последний блок кода в стеке, дублирует его и выполняет копию. При выполнении код .'.~'внутри блока кода дублирует самый верхний элемент в стеке (то есть его копию) и добавляет строку .~.

В конце программы интерпретатор GolfScript переводит в строку и выводит все данные в стеке, который, в данном случае, состоит из еще одного {.'.~'}блока, чем на входе, плюс строка .~.

Бонус:

Добавление ]перед первым .(чтобы собрать все блоки кода в стеке в массив до их дублирования) приводит к его экспоненциальному росту:

{].'.~'}.~

выходы:

{].'.~'}{].'.~'}.~

какие выводы:

{].'.~'}{].'.~'}{].'.~'}{].'.~'}.~

какие выводы:

{].'.~'}{].'.~'}{].'.~'}{].'.~'}{].'.~'}{].'.~'}{].'.~'}{].'.~'}.~

и так далее.

Java 7: 0 символов

Сохранить как файл Blank.java. Если вы сохраните его как любой другой файл, замените любой экземпляр Blankс соответствующим именем файла.

Затем запустите в командной строке сначала компиляцию, а затем запуск. Если компиляция не удалась, остановитесь.

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

Первые несколько выходов (выводятся в stderr):

Error: Could not find or load main class Blank

Blank.java:1: error: class, interface, or enum expected
Error: Could not find or load main class Blank
^
Blank.java:1: error: reached end of file while parsing
Error: Could not find or load main class Blank
                                              ^
2 errors

Blank.java:1: error: class, interface, or enum expected
Blank.java:1: error: class, interface, or enum expected
^
Blank.java:1: error:  expected
Blank.java:1: error: class, interface, or enum expected
                          ^
Blank.java:1: error:  expected
Blank.java:1: error: class, interface, or enum expected
                                     ^
Blank.java:1: error: as of release 5, 'enum' is a keyword, and may not be used as an identifier
Blank.java:1: error: class, interface, or enum expected
                                          ^
  (use -source 1.4 or lower to use 'enum' as an identifier)
Blank.java:1: error: = expected
Blank.java:1: error: class, interface, or enum expected
                                               ^
Blank.java:2: error:  expected
Error: Could not find or load main class Blank
     ^
Blank.java:2: error: ';' expected
Error: Could not find or load main class Blank
      ^
Blank.java:2: error: = expected
Error: Could not find or load main class Blank
                      ^
Blank.java:2: error: = expected
Error: Could not find or load main class Blank
                                   ^
Blank.java:2: error:  expected
Error: Could not find or load main class Blank
                                              ^
Blank.java:3: error: = expected
^
^
Blank.java:3: error: ';' expected
^
 ^
Blank.java:4: error: illegal start of type
Blank.java:1: error: reached end of file while parsing
     ^
Blank.java:4: error: = expected
Blank.java:1: error: reached end of file while parsing
          ^
Blank.java:4: error: illegal start of type
Blank.java:1: error: reached end of file while parsing
           ^
Blank.java:4: error:  expected
Blank.java:1: error: reached end of file while parsing
            ^
Blank.java:4: error: = expected
Blank.java:1: error: reached end of file while parsing
          ^
Blank.java:4: error: illegal start of type
Blank.java:1: error: reached end of file while parsing
           ^
Blank.java:4: error:  expected
Blank.java:1: error: reached end of file while parsing
            ^
Blank.java:4: error: = expected
Blank.java:1: error: reached end of file while parsing
              ^
Blank.java:4: error: ';' expected
Blank.java:1: error: reached end of file while parsing
                   ^
Blank.java:4: error: = expected
Blank.java:1: error: reached end of file while parsing
                                 ^
Blank.java:4: error:  expected
Blank.java:1: error: reached end of file while parsing
                                        ^
Blank.java:4: error: = expected
Blank.java:1: error: reached end of file while parsing
                                         ^
Blank.java:4: error: ';' expected
Blank.java:1: error: reached end of file while parsing
                                              ^
Blank.java:5: error:  expected
Error: Could not find or load main class Blank
     ^
Blank.java:5: error: ';' expected
Error: Could not find or load main class Blank
      ^
Blank.java:5: error: = expected
Error: Could not find or load main class Blank
                      ^
Blank.java:5: error: = expected
Error: Could not find or load main class Blank
                                   ^
Blank.java:5: error:  expected
Error: Could not find or load main class Blank
                                              ^
Blank.java:6: error: = expected
                                              ^
                                              ^
Blank.java:6: error: ';' expected
                                              ^
                                               ^
Blank.java:7: error: reached end of file while parsing
2 errors
        ^
30 errors

HQ9 +, HQ9 ++ и аналогичные, 2 символа

QQ

Это вывод:

QQQQ

Ruby 27

Очень немного измененная версия этого ( через ):

puts <<3*3,3
puts <<3*3,3
3

Количество раз, когда эта putsстрока печатается, растет в геометрической прогрессии.

$ ruby quine.rb | ruby | ruby
puts <<3*3,3
puts <<3*3,3
puts <<3*3,3
puts <<3*3,3
puts <<3*3,3
puts <<3*3,3
puts <<3*3,3
puts <<3*3,3
puts <<3*3,3
puts <<3*3,3
puts <<3*3,3
puts <<3*3,3
puts <<3*3,3
puts <<3*3,3
puts <<3*3,3
3

$ ruby quine.rb | ruby | ruby | ruby | ruby | ruby | ruby | ruby | wc -l
    3283

Лямбда-исчисление - 29

Простой лямбда-термин

(λu.(u u)(u u))(λu.(u u)(u u))

Сокращение этого срока на одну бета-версию

((λu.(u u)(u u))(λu.(u u)(u u)))((λu.(u u)(u u))(λu.(u u)(u u)))

И так далее, и так далее. Это простой вариант классики, (λu.u u)(λu.u u)который представляет собой квин в лямбда-исчислении, здесь двойное самостоятельное применение означает, что мы получаем удвоенный результат.

Сценарий SH, 9

cat $0 $0

Растет по экспоненте.

Либо запустить как, sh whatever.shлибо установить его как исполняемый файл.

Версия для Windows здесь .

DC 11

Достаточно просто:

6579792
dfP

Первая строка повторяется один раз в каждом поколении:

$ dc growing_quine.dc
6579792
6579792
dfP

$ dc growing_quine.dc | dc | dc 
6579792
6579792
6579792
6579792
dfP

Последняя строка состоит из следующих инструкций: dдублирует последнее значение, помещенное в стек (6579792) (так что мы получаем еще одну копию при каждом его запуске), fпечатает весь стек (который является связкой того же числа) и Pпечатает число (6579792) как поток байтов, который отображается как dfP.

красный код (рекурсивное решение)

Это код самого легкого воина, доступного для записи в redcode , известного Imp:

MOV 0, 1

При выполнении код записывает копию своей единственной инструкции по следующему адресу в памяти; затем выполняет его и т. д.

Питон 3 - 55

print(open(__file__).read())
f=lambda:print('f()')
f()

Это можно сделать короче, заменив __ file__ именем файла из одного символа и сохранив файл как таковой, но я чувствовал, что этот ответ больше соответствует духу вопроса. После одной итерации выводится:

print(open(__file__).read())
f=lambda:print('f()')
f()
f()

Smalltalk, 125 61 57

Версия для гольфа выглядит почти нечитаемой, поэтому сначала я объясню (и использую реальные идентификаторы).

Это вариант метода самоизменения «самый странный способ производства переполнения стека».

Метод выводит приветственное сообщение и его текущий источник (только для демонстрации). Затем код модифицируется для вывода более длинной строки и устанавливается. Наконец, новый код вызывается рекурсивно.

Чтобы защитить себя от немедленного побега, он позволяет пользователю подтверждать в каждом цикле.

скомпилировать в объекте:

eatMe_alice
   |msg mySource|

   mySource := thisContext method source.

   '**** Hello Alice' printCR.
   '  ---- my current code is:' printCR.
   mySource printCR.
   '  ---------------' printCR.

   (UserConfirmation confirm:'Again? ') ifTrue:[
       Object compile:
            (mySource
                copyReplaceString:'Hello ','Alice'
                withString:'Hello ','Alice !').
       self eatMe_alice
   ]

начать показ, отправив «eatMe_alice» любому объекту; ноль будет делать:

nil eatMe_alice

Хороший вариант - не вызывать новый код рекурсивно, а вместо этого итеративно, раскручивая стек вызовов и повторно входя в новый метод. Это имеет то преимущество, что не приводит к исключению рекурсии. Для этого замените рекурсивный вызов («self eatMe_alice») на:

thisContext resend

Игра в гольф:

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

x|s|Object compile:(s:=thisContext method source,'""').^s

Сценарий SH, 12 8 7

Сохраните файл с

sed p *

в своем собственном пустом каталоге и запускайте из этого каталога, используя sh [file]или устанавливая исполняемый файл.

Старая альтернатива с 8 символами , но не требует своего собственного каталога. Сохраните файл с

sed p $0

и запустить с помощью sh [file]или установить исполняемый файл.

Старая альтернатива с 12 символами :

sed -i- p $0

Это на самом деле будет выводить в сам файл программы, но место для вывода не указано. Копирует себя по экспоненте.

JavaScript, 41 , 40 символов

function f(){console.log(f+"f(f())")}f()

При первом запуске он выводит себя с другим ;f()в конце. Последующие прогоны вывода приводят к тому, что каждый «входной» источник печатается дважды.

alertбудет короче, console.logно я не считаю, что несколько диалоговых окон предупреждений являются «выходными данными», хотя кажется разумным вызывать несколько строк в консоли в качестве выходных данных.

J , 1 байт

'

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

Открытая цитата дает, очевидно, ошибку открытой цитаты:

|open quote
|   '
|   ^
|[-1] /home/runner/.code.tio

Обратите внимание, что по природе интерпретатора J ошибки выводятся в STDOUT , а не в STDERR.

Когда вышеприведенный код запускается как код, он печатает:

|open quote
|   |   '
|       ^
|[-2] /home/runner/.code.tio

затем

|open quote
|   |   |   '
|           ^
|[-2] /home/runner/.code.tio

и так далее. Каждый раз, когда код выполняется, вторая строка заполняется слева четырьмя байтами |   , выполняя требование этой задачи.

J , правильный вариант Quine, 25 байтов

echo,~'echo,:~(,quote)'''

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

Выходы

echo,:~(,quote)'echo,:~(,quote)'

И затем он выводит себя дважды, в отдельных строках:

echo,:~(,quote)'echo,:~(,quote)'
echo,:~(,quote)'echo,:~(,quote)'

тогда

echo,:~(,quote)'echo,:~(,quote)'
echo,:~(,quote)'echo,:~(,quote)'
echo,:~(,quote)'echo,:~(,quote)'
echo,:~(,quote)'echo,:~(,quote)'

и так далее.

Первый вывод - это простой вариант стандарта J quine . Добавленное ,:~объединяет себя вертикально, где результирующий 2D-массив печатается в виде двух строк одной и той же строки.

Windows .BAT, 25

@COPY %~nx0+%~nx0 CON>NUL

Растет по экспоненте.

Эквивалентная версия SH здесь .

сетчатый, 11 байтов, неконкурентный

"'34'coo1o;

Это стандартная структура quine, за исключением того, что 1после каждой итерации печатается дополнительная . Попробуйте онлайн!

Первые несколько выходов:

"'34'coo1o;
"'34'coo1o;1
"'34'coo1o;11
"'34'coo1o;111

Microscript II, 6 байт

Неконкурентоспособный язык затрудняет задачу.

"qp"qp

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

Рунические чары , 6 байт

"'<S@>

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

Это было странно. Все, что мне нужно было сделать, это удалить ~из оригинальной лебеды, найденной Джо Кингом .

Каждый дополнительный прогон добавляет другой <в конец, например:

"'<S@><<<<<<<<<

Все из которых ничего не делают.

EcmaScript 6 (51 байт):

(_=x=>'(_='+_+Array(x++).join(','+_)+')('+x+')')(2)

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

PHP, 38

<?echo fgets(fopen(__FILE__,'r')).';';

Это добавит точку с запятой при каждом запуске.

ECMAScript 6 (38 знаков)

(f=_=>'(f='+f+')();(f='+f+')();')();

Какие выводы:

(f=_=>'(f='+f+')();(f='+f+')();')();(f=_=>'(f='+f+')();(f='+f+')();')();

редактировать

Вы можете сделать (28 символов):

(f=_=>'(f='+f+')();'+f())();

Однако он будет повторяться бесконечно и никогда ничего не вернет ... но это можно решить, выполнив что-то вроде этого (42 символа):

(f=_=>_?'(f='+f+')('+_+');'+f(_-1):'')(3);

Который будет выводить:

(f=_=>_?'(f='+f+')('+_+');'+f(_-1):'')(3);(f=_=>_?'(f='+f+')('+_+');'+f(_-1):'')(2);(f=_=>_?'(f='+f+')('+_+');'+f(_-1):'')(1);

Common Lisp, 16 символов

(print `(or ,-))

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

Что было бы действительно интересно, так это то, что взрывается быстрее всех. Может быть что-то вроде

(print `(progn ,@(loop repeat (length -) collect -)))

Юлия, 66 символов

x="print(\"x=\$(repr(x))\\n\$x;\"^2)";print("x=$(repr(x))\n$x;"^2)

Выход (134 символа):

x="print(\"x=\$(repr(x))\\n\$x;\"^2)"
print("x=$(repr(x))\n$x;"^2);x="print(\"x=\$(repr(x))\\n\$x;\"^2)"
print("x=$(repr(x))\n$x;"^2);

Результат выполнения результата (268 символов):

x="print(\"x=\$(repr(x))\\n\$x;\"^2)"
print("x=$(repr(x))\n$x;"^2);x="print(\"x=\$(repr(x))\\n\$x;\"^2)"
print("x=$(repr(x))\n$x;"^2);x="print(\"x=\$(repr(x))\\n\$x;\"^2)"
print("x=$(repr(x))\n$x;"^2);x="print(\"x=\$(repr(x))\\n\$x;\"^2)"
print("x=$(repr(x))\n$x;"^2);

следующий результат (536 символов):

x="print(\"x=\$(repr(x))\\n\$x;\"^2)"
print("x=$(repr(x))\n$x;"^2);x="print(\"x=\$(repr(x))\\n\$x;\"^2)"
print("x=$(repr(x))\n$x;"^2);x="print(\"x=\$(repr(x))\\n\$x;\"^2)"
print("x=$(repr(x))\n$x;"^2);x="print(\"x=\$(repr(x))\\n\$x;\"^2)"
print("x=$(repr(x))\n$x;"^2);x="print(\"x=\$(repr(x))\\n\$x;\"^2)"
print("x=$(repr(x))\n$x;"^2);x="print(\"x=\$(repr(x))\\n\$x;\"^2)"
print("x=$(repr(x))\n$x;"^2);x="print(\"x=\$(repr(x))\\n\$x;\"^2)"
print("x=$(repr(x))\n$x;"^2);x="print(\"x=\$(repr(x))\\n\$x;\"^2)"
print("x=$(repr(x))\n$x;"^2);

Следующий результат (1072 символа):

x="print(\"x=\$(repr(x))\\n\$x;\"^2)"
print("x=$(repr(x))\n$x;"^2);x="print(\"x=\$(repr(x))\\n\$x;\"^2)"
print("x=$(repr(x))\n$x;"^2);x="print(\"x=\$(repr(x))\\n\$x;\"^2)"
print("x=$(repr(x))\n$x;"^2);x="print(\"x=\$(repr(x))\\n\$x;\"^2)"
print("x=$(repr(x))\n$x;"^2);x="print(\"x=\$(repr(x))\\n\$x;\"^2)"
print("x=$(repr(x))\n$x;"^2);x="print(\"x=\$(repr(x))\\n\$x;\"^2)"
print("x=$(repr(x))\n$x;"^2);x="print(\"x=\$(repr(x))\\n\$x;\"^2)"
print("x=$(repr(x))\n$x;"^2);x="print(\"x=\$(repr(x))\\n\$x;\"^2)"
print("x=$(repr(x))\n$x;"^2);x="print(\"x=\$(repr(x))\\n\$x;\"^2)"
print("x=$(repr(x))\n$x;"^2);x="print(\"x=\$(repr(x))\\n\$x;\"^2)"
print("x=$(repr(x))\n$x;"^2);x="print(\"x=\$(repr(x))\\n\$x;\"^2)"
print("x=$(repr(x))\n$x;"^2);x="print(\"x=\$(repr(x))\\n\$x;\"^2)"
print("x=$(repr(x))\n$x;"^2);x="print(\"x=\$(repr(x))\\n\$x;\"^2)"
print("x=$(repr(x))\n$x;"^2);x="print(\"x=\$(repr(x))\\n\$x;\"^2)"
print("x=$(repr(x))\n$x;"^2);x="print(\"x=\$(repr(x))\\n\$x;\"^2)"
print("x=$(repr(x))\n$x;"^2);x="print(\"x=\$(repr(x))\\n\$x;\"^2)"
print("x=$(repr(x))\n$x;"^2);

Я надеюсь, что это в соответствии с правилами.

Он производит больший вывод, а сам вывод является допустимым исходным кодом, который снова производит больший вывод.

05AB1E, 15 байтов, неконкурентный

0"DÐ34çý"DÐ34çý

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

Отпечатки 0"DÐ34çý"DÐ34çý"DÐ34çý"DÐ34çý,
которые печатает 0"DÐ34çý"DÐ34çý"DÐ34çý"DÐ34çý"DÐ34çý"DÐ34çý"DÐ34çý"DÐ34çýи
т. Д.

Evoloop, 9 × 9 прямоугольник (81 ячейка)

Клеточный автомат Evoloop в комплекте с Golly поддерживает шаблоны , которые копируют себя в «Куин-как» путь. В частности, каждый из этих шаблонов содержит «программу»; шаблон воспроизводит себя, сначала выполняя программу (которая создает «тело» дочери), а затем копируя программу в дочку.

Вышесказанное относится к более известному клеточному автомату "Langton's Loops", а также к Evoloop, но у Evoloop есть интересное отличие, заключающееся в том, что легко создать шаблон, который растет в каждом последующем поколении.

(Гораздо более интересным, на мой взгляд, является тот факт , что Evoloop простой клеточный автомат , который содержит модели , которые воспроизводят себя и развиваться в очень жизненной манере! Я думаю , что единственный известный клеточные автоматы , которые делают это, Evoloop и его потомки Недостатком Evoloop, однако, является то, что существует один конкретный «лучший» геном; эволюция всегда в конечном итоге сходится к этому одному геному.)

Теперь у этого представления есть два недостатка. Во-первых, неясно, каков «выход» клеточного автомата. Но я думаю, что самовоспроизводящийся автомат "достаточно близок" к тому, чтобы быть квинем; это конечно не менее интересно! Другим недостатком является то, что эти шаблоны не просто создают одну копию себя; каждая копия исходного шаблона пытается создать бесконечно много своих копий, и эти копии в конечном итоге разрушительно взаимодействуют друг с другом. Итак, я думаю, что я выполнил требования этой задачи по духу, но не по букве.

Без дальнейших церемоний, картина такова:

022222220
270170172
212222202
202000212
272000272
212000202
202222212
271041032
022222250

Вот снова образец в формате, который можно скопировать и вставить в Golly:

x = 9, y = 9, rule = Evoloop
.7B$BG.AG.AGB$BA5B.B$B.B3.BAB$BGB3.BGB$BAB3.B.B$B.5BAB$BGA.DA.CB$.6BE
!

Хорошо, но как это выглядит? Это выглядит так:

В приведенной выше анимации вы можете видеть, как первоначальный шаблон создает большую дочь, которая создает большую внучку, затем большую правнучку и, наконец, еще большую пра-пра-внучку, которая начинает строить еще большую треть-пра-внучку. внучка. Если бы вы использовали этот паттерн в течение долгого времени, он продолжал бы продолжаться так же вечно (или, возможно, они в конечном итоге будут настигнуты развитыми организмами, которые способны размножаться гораздо быстрее; я не уверен).

Дозатор, 26

Поместите этот код в любой файл .bat, и он продолжит выполнение (в бесконечном цикле), и файл также будет расти.

echo echo %0 ^>^> %0 >> %0

PYG (6)

P(Q,Q)

Печатает собственный исходный код, разделенный символом новой строки. Второе поколение будет

P(Q,Q)
P(Q,Q)

и так далее.

НЕФТЬ , 83 байта

0
0
1
1
1
4
1
11
4
1
11
1
2
2
1
12
18
10
18
1
32
22
1
18
26
4
26
8
18
11
6
17
4
26

Сначала он печатает две строки с нулем в них, а затем сравнивает каждую строку со строкой 1, если они равны (что имеет место при исчерпании файла), мы печатаем то, что находится в ячейке 26. Результирующий вывод будет выглядеть как то же самое, за исключением добавления 33, которое ничего не делает. В следующий раз будет добавлена ​​еще одна строка и так далее.

Помогите, WarDoq! 1 байт.

ЧАС

Печать Hello, World!.

Другие символы, кроме H, являются действительным (и безопасным) исходным кодом (который печатает другие варианты Hello World).