Napisz najkrótszy możliwy kod, który daje nieskończony wynik.

To wszystko. Kod zostanie zdyskwalifikowany tylko wtedy, gdy w pewnym momencie przestanie generować dane wyjściowe. Jak zawsze w golfowym kodzie, wygrywa najkrótszy kod.

Oto lista odpowiedzi, które moim zdaniem są naprawdę sprytne, aby mogły uzyskać uznanie:

• Przecinek to zarówno kod, jak i dane
• Nieskończone błędy (które się liczą)
• Nieskończone ostrzeżenia (które również się liczą)
• Co to jest Marbelous?

Tabela liderów

var QUESTION_ID=13152,OVERRIDE_USER=8611;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>

Befunge (1)

.

Wydaje na 0zawsze. Działa, ponieważ w Befunge linie się zawijają, a otrzymasz, 0jeśli wyskoczysz z pustego stosu.

x86 .COM Plik wykonywalny, 7

w hex:

b8 21 0e cd 10 eb fc

Inne potrzebują kilobajtów lub więcej bibliotek systemowych i środowiska wykonawczego. Powrót do podstaw:

$ echo -ne '\xb8!\xe\xcd\x10\xeb\xfc' > A.COM
$ dosbox A.COM

Możesz zmienić drugi bajt ( 0x21lub !), aby zmienić wyjście.

Wykorzystuje przerwanie systemu BIOS do wyjścia; nie potrzebuje DOS-a, ale nie skonfigurowałem QEMU.

Wyjaśnienie

Kod maszynowy odpowiada następującemu zespołowi:

        mov     ax, 0x0e21
again:  int     0x10
        jmp     again

Dane wyjściowe są w intwywołaniu - zgodnie z tym odniesieniem int 0x10 z 0x0e w AH wydrukuje bajt w AL na ekranie.

Wiedząc, że rejestr AX jest 16-bitowym słowem złożonym z AH w wysokim bajcie i AL w niskim bajcie, możemy zaoszczędzić dodatkowe obciążenie (a tym samym bajt w kodzie maszynowym), ładując je razem.

Plik wsadowy Windows, 2 znaki

%0

Nazywa się nieskończenie.

Befunge 98-2

,"

Wydaje „,,,,,,,,,,,” na wieczność.

sh, 3 bajty

yes

wyjścia w ysposób ciągły

Haskell: 8 znaków

Stary wątek, ale fajny jest

 fix show

w Haskell drukuje

\\\\\\\\\\\\\....

na zawsze, ponieważ w zasadzie działa

 let x = show x in x

Wie, że xjest to ciąg znaków, więc pierwszy znak to ", więc należy go uciec \", ale wiem, że \trzeba go uciec \\\x, i tak dalej.

Plik wsadowy Windows, 8 znaków

:a
goto a

Brainfuck, 4

+[.]

Alternatywnie,

-[.]

Java, 54 znaki

Najlepsza próba w Javie:

class A{static{for(int i=0;i<1;)System.out.print(1);}}

Bash, 4 bajty

$0&$

Wysyła w ./forever2.sh: line 1: $: command not foundsposób ciągły.

Ponieważ $0jest w tle, każdy rodzic umiera po niepoprawnym poleceniu $, dlatego stos / pamięć nie zostanie zjedzona i powinno to trwać w nieskończoność.

O dziwo, wydajność z czasem staje się coraz wolniejsza. topzgłasza, że ​​użycie procesora przez system jest bliskie 100%, ale istnieją procesy zapamiętywania pamięci lub procesora. Prawdopodobnie część alokacji zasobów w jądrze staje się coraz mniej wydajna.

LOLCODE (36)

HAI IZ 1<2? VISIBLE "0" KTHX KTHXBYE 

Myślałem, że dam LOLCODE szansę, ma zaskakująco dużą funkcjonalność.

JavaScript: 14

UWAGA: tak naprawdę nie chcesz uruchamiać tego w przeglądarce

for(;;)alert()

Maszyna Turinga - 6 znaków:

#s->1Rs

gdzie #jest pusty symbol (domyślnie na taśmie), sopisuje jedyny istniejący (początkowy) stan, 1drukuje cyfrę, Roznacza przesunięcie w prawo, sna końcu pozostaje w tym samym stanie.

Haskell, 10

print[1..]

Myślę, że jest to najkrótszy kod do

1. Wydrukuj coś.
2. Utwórz nieskończoną Show: zdolną strukturę danych.

Dla zainteresowanych drukuje:

[1,2,3,4,5,6,7,8,9,10,11,12,13,14,15,16,17,18,19,20,21,22,23,24,25,26,27,28,29,30,31,32,...

Cudowny 4

24MB

Marbelous ma tu zaskakująco dobrze. Spowoduje to opublikowanie nieskończonej ilości znaków dolara $, choć dość szybko osiągnie limit stosu.

Jak to działa.

24 to dosłowny język, który spadnie z planszy i zostanie wydrukowany na STDOUT jako odpowiadający mu znak ascii. MB to nazwa domyślnie nadana płycie głównej, ponieważ płyta główna nie ma danych wejściowych, będzie uruchamiana co tyknięcie. A ponieważ komórki są oceniane od lewej do prawej, literał zawsze będzie drukowany przed następnym wywołaniem rekurencyjnym.

Jest to więc z grubsza odpowiednik tego pseudokodu:

MB() {
    print('$');
    while(true) MB();
}

Rozwiązanie bez nieskończonej rekurencji 11

24@0
@0/\..

Ten działa poprzez zapętlenie literału między dwoma portalami @0, ilekroć 24 trafi w dół @0, jest transportowane do komórki pod górną @0. To ląduje na /\, który jest operatorem klonowania, kładzie jedną kopię marmuru (dosłownie) na jego lewej stronie (z powrotem na portalu), a drugą na prawo. Ta koperta następnie spada z planszy (ponieważ ..jest pustą komórką) i jest drukowana do STDOUT. W pseudokodzie oznaczałoby to:

MB() {
    while(true) print '$'
}

Krótsze rozwiązanie bez nieskończonej rekurencji 9

24
\\/\..

Ten ciągle rzuca marmurem między klonerem a deflektorem, kładąc jeden egzemplarz na prawej komórce, aby go zrzucić z planszy. W pseudokodzie wyglądałoby to tak:

MB() {
    List charlist = ['$'];
    while(true) {
        charlist.add(charlist[0];
        charlist.add(charlist[0];
        charlist.pop();
        print(charlist.pop());
        // Wait, what?
    }
}

Uwaga

Te ..komórki są konieczne z dwóch ostatnich płyt od kulki wylądują z planszy (i wyrzucić) inaczej. Aby uzyskać dodatkową zabawę, zamieniasz 24marmur na, FFa pustą ..komórkę na ??, co zamienia każdy marmur w marmur od 0 do jego bieżącej wartości przed upuszczeniem. Zgadnij, jak by to wyglądało na STDOUT.

C, 23 znaki

Nieco krótszy niż najlepsza jak dotąd odpowiedź C / C ++. Drukuje puste linie w nieskończoność (ale jeśli skompilowane bez optymalizacji, przepełnia stos).

main(){main(puts(""));}

Python 3: 15, 17 lub 18 znaków

Odpowiedź mdeitrick jest dłuższa w Pythonie 3, który zastępuje printinstrukcję wywołaniem funkcji (15 znaków):

while 1:print()

Jest to najkrótszy czas, jaki znalazłem w Pythonie 3. Istnieją jednak bardziej interesujące sposoby drukowania w nieskończonej pętli, które mają tylko kilka znaków dłużej.

• print()zwraca None, co! = 9, co czyni go nieskończoną pętlą; 8jest nie-OP, która zastępuje pass(18 znaków):

  while print()!=9:8
  

• iter(print, 9)definiuje iterowalny, który zwraca wynik print()aż do równości 9(co nigdy się nie zdarza). anyzużywa iterowalne dane wejściowe w poszukiwaniu prawdziwej wartości, która nigdy nie dociera, ponieważ print()zawsze zwraca None. (Możesz również użyć settego samego efektu.)

  any(iter(print,9))
  

• Lub możemy konsumować iterowalny testując, czy zawiera on 8(17 znaków):

  8in iter(print,9)
  

• Lub rozpakuj go za pomocą operatora splat :

  *_,=iter(print,9)
  

• Najdziwniejszy sposób myślałem o to, aby używać splat destructuring wewnątrz wywołania funkcji, function(*iterable). Wygląda na to, że Python próbuje wykorzystać całą iterowalność przed próbą wywołania funkcji - nawet jeśli wywołanie funkcji jest fałszywe. Oznacza to, że nie potrzebujemy nawet prawdziwej funkcji, ponieważ błąd typu zostanie zgłoszony dopiero po wyczerpaniu iterowalności (tj. Nigdy):

  8(*iter(print,9))
  

piet - 3 kody

Wyprowadza nieskończoną liczbę 1

x86 .COM Plik wykonywalny, 5 bajtów

w hex:

40 CD 29 FF E6

w asm:

inc ax
int 0x29
jmp si

Wyjaśnienie:

inc axzwiększa rejestr AX o jeden. int 0x29to procedura „szybkiego umieszczenia znaku” w MSDOS, która po prostu wyświetla wartość w AL (najniższa część AX) i przesuwa kursor o jeden. jmp sito po prostu dziwny sposób powrotu do góry, ponieważ rejestr SI ma wartość 0x100 w prawie każdym systemie operacyjnym podobnym do DOS, czyli tam, gdzie rozpoczyna się program .com;) Zamiast tego można również wykonać krótki skok, który również używa 2 bajtów.

Źródła:

MSDOS Start Values

Kodowanie rozmiaru WIKI

Bitxtreme , 0,25 bajtów

Reprezentacja binarna:

00

Z dokumentacji:

Pierwszy bit każdej pary jest wskaźnikiem do pozycji pamięci, która zawiera wartość do odjęcia od akumulatora. Wynik jest przechowywany w tej samej pozycji pamięci wskazanej przez operand. Jeśli wynik jest ujemny (bity są reprezentacją uzupełnienia dwóch), wówczas drugi bit pary zostanie dodany do bieżącego komputera, moduł 2.

Licznik programu i akumulator są inicjowane do zera; następnie zawartość miejsca pamięci 0 jest odejmowana od akumulatora. Zdarza się, że wynosi 0, pozostawiając akumulator na zero. Ponieważ nie było przeniesienia, drugi bit nie jest dodawany do licznika programu.

Licznik programu jest następnie zwiększany o 2 modulo 2, wysyłając go z powrotem na początek i powodując nieskończoną pętlę. Na każdym etapie specjalna lokalizacja pamięci 0 jest modyfikowana, co powoduje 0zapisanie jej zawartości (a ) na wyjściu.

Można argumentować, że ten program powinien zostać oceniony jako 1 bajt, ponieważ oficjalny interpreter w Pythonie wymaga zerowania. Jednak nie sądzę, że dopełnianie zera jest tak naprawdę kodem .

Podsumowanie: Ruby - 9, Golfscript - 6,> <> - 2, Białe znaki - 19, Perl - 2

Jeden język, który znam, i dwa, których nigdy wcześniej nie używałem: D
EDYCJA: Perl nie działał, kiedy instalowałem Perla, aby go wypróbować :(

Ruby, 9

loop{p 1}

Po prostu drukuje 1 na osobnych liniach w sposób ciągły.

Ponadto kilka alternatyw:

loop{p''} # prints [ "" ]  on separate lines continually
loop{p p} # prints [ nil ] on separate lines continually

10-znakowe rozwiązanie:

p 1while 1

Byłem właściwie zaskoczony, że mogłem usunąć przestrzeń między pierwszym 1a pierwszym while, ale najwyraźniej to działa

Golfscript, 6

{1p}do

Mój pierwszy program Golfscript! : P

> <> ( Ryba ), 2

1n

Biała spacja , 19

lssslssstltlsslslsl

Gdzie sreprezentuje spację, treprezentuje tabulator i llinię.

C, 25 24

main(){main(puts("1"));}

> <> (Ryba) , 2

Kreatywny sposób korzystania z nieskończonego codbox ryb:

"o

Ponieważ wskaźnik instrukcji wraca na początek linii po osiągnięciu końca, ten kod można zasadniczo odczytać jako

"o"o

co oznacza „przeczytaj ciąg„ o ”, a następnie wyślij go”.

Możesz przetestować kod tutaj

perl, 10 znaków

Oto kolejne rozwiązanie 10 znaków z kilkoma różnymi kompromisami. W szczególności nie wymaga flagi -n ani danych wejściowych użytkownika do uruchomienia. Jednak wciąż je pamięć ad infinitum.

warn;do$0

zapisz do pliku, uruchom ten plik, a otrzymasz np .:

Warning: something's wrong at /tmp/foo.pl line 1.
Warning: something's wrong at /tmp/foo.pl line 1.
Warning: something's wrong at /tmp/foo.pl line 1.

dc , 7

[pdx]dx

wypisuje 'pdx \ n' nieskończenie wiele razy.

VBA: 12

Dźwięk jest wyprowadzany, prawda?

do:beep:loop

Umieść to w swoim ulubionym współpracowniku MS Office z obsługą makr, aby uzyskać trochę zabawy!

Private Sub Workbook_Open()
    Do:Beep:Loop
End Sub

Punkty bonusowe, jeśli używają słuchawek.

Ziarno , 4 bajty

99 5

Wypróbuj online! Wysyła 11nieskończenie wiele razy

Generuje następujący program Befunge-98:

[glzgx"Lz^v*M7TW!4:wi/l-[, s44~s;|Sa3zb|u<B/-&<Y a@=nN>Nc%}"gq!kCW $1{2hyzABRj*glr#z(@Zx@xT=>1'.b
/

Wypróbuj online!

Odpowiednia część jest taka:

[>1'.b
/

bprzesuwa 11się na stos i .drukuje go. 1i 49są również wypychane na stos, ale tak naprawdę nigdy nie są drukowane.

Animacja uruchomionego kodu:

C, 26 25 24 (bez rekurencji)

main(){for(;;puts(""));}

Drukuje niekończące się '\n'znaki. Jest to bajt dłuższy niż najkrótsza odpowiedź C, ale nie polega na optymalizacji wywołania ogona, aby uniknąć przepełnienia stosu.

R, 13 znaków

repeat cat(1)

PowerShell 2.0: 17 11 8

Moje wstępne rozwiązanie:

while(1 -eq 1){1}

Dzięki res:

while(1){1}

Myślę, że Danko Durbić ma tutaj zwycięzcę. Nie jestem nawet pewien, dlaczego to powinno działać, ale tak jest i do tej pory nie mogę wymyślić nic krótszego.

for(){1}