Schreiben Sie ein Programm oder eine Funktion, die nachweislich alle ganzen Zahlen genau einmal mit unendlich viel Zeit und Speicher ausgibt.

Mögliche Ausgaben könnten sein:

0, 1, -1, 2, -2, 3, -3, 4, -4, …

0, 1, 2, 3, 4, 5, 6, 7, 8, 9, -1, -2, -3, -4, -5, -6, -7, -8, -9, 10, 11, …

Dies ist keine gültige Ausgabe, da dies niemals negative Zahlen auflisten würde:

0, 1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11,…

• Die Ausgabe muss dezimal erfolgen, es sei denn, Ihre Sprache unterstützt keine dezimalen Ganzzahlen (verwenden Sie in diesem Fall die natürliche Darstellung von Ganzzahlen, die Ihre Sprache verwendet).

• Ihr Programm muss bis zu den Zahlen mit der größten Größe des Standard-Integer-Typs Ihrer Sprache arbeiten.

• Jede Ganzzahl muss durch ein Trennzeichen (ein Leerzeichen, ein Komma, ein Zeilenumbruch usw.) vom nächsten getrennt werden, das weder eine Ziffer noch das negative Vorzeichen Ihrer Sprache ist.

• Das Trennzeichen darf sich an keiner Stelle ändern.

• Das Trennzeichen kann aus mehreren Zeichen bestehen, sofern keines davon eine Ziffer oder ein negatives Vorzeichen ist (z. B. , so gültig wie nur ,).

• Jede unterstützte Ganzzahl muss irgendwann nach einer begrenzten Zeit gedruckt werden.

Wertung

Das ist Code-Golf , also gewinnt die kürzeste Antwort in Bytes

Bestenliste

var QUESTION_ID=93441,OVERRIDE_USER=41723;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>

Sesos , 11 ₃ 3 Bytes

0000000: c4ceb9                                            ...

Probieren Sie es online! Überprüfen Sie Debug , um den generierten SBIN-Code anzuzeigen.

Sesos Montage

Die obige Binärdatei wurde durch Zusammenstellen des folgenden SASM-Codes generiert.

set numout

jmp ; implicitly promoted to nop
    put,   fwd 1
    sub 1, put
    rwd 1, add 1
; jnz (implicit)

Haskell, 19 Bytes

do n<-[1..];[1-n,n]

Erzeugt die unendliche Liste [0,1,-1,2,-2,3,-3,4,-4,5,-5,6,-6,7,-7...

Haskell erlaubt unendlich viele Listen von Haus aus. Wenn Sie eine solche Liste drucken, werden die Elemente für immer einzeln gedruckt.

Brainfuck, 6 Bytes

Dies nutzt den Zellenumbruch und gibt alle möglichen Werte aus. In Brainfuck ist die native Ganzzahldarstellung ein Bytewert .

.+[.+]

Probieren Sie es online!

Cubix , 14 12 Bytes

.(.\OSo;?.>~

Online testen! Sie können die Geschwindigkeit jetzt anpassen, wenn Sie möchten, dass sie schneller oder langsamer läuft.

Wie es funktioniert

Als erstes entfernt der Interpreter alle Leerzeichen und füllt den Code mit No-Ops auf, .bis er perfekt auf einen Würfel passt. Das bedeutet, dass der obige Code auch so geschrieben werden kann:

    . (
    . \
O S o ; ? . > ~
. . . . . . . .
    . .
    . .

Jetzt wird der Code ausgeführt. Der IP (Anweisungszeiger) beginnt in der oberen linken Ecke der linken Seite und zeigt nach Osten. Im Folgenden sind die Pfade aufgeführt, die während der Ausführung des Programms erforderlich sind:

Die IP beginnt auf dem roten Pfad ganz links im Bild. Es wird dann ausgeführt OSo;, was Folgendes bewirkt:

• ODrucken Sie die TOS (Top-of-Stack) als Ganzzahl. Zu Beginn des Programms enthält der Stapel unendlich viele Nullen, sodass dieser ausgegeben wird 0.
• SDrücken Sie 32den Zeichencode für das Leerzeichen.
• oDrucken Sie die Nutzungsbedingungen als Zeichen. Dies druckt ein Leerzeichen.
• ;Pop die AGB. Entfernt die 32vom Stapel.

Jetzt trifft die IP die ?, die sie je nach Vorzeichen des TOS nach links, rechts oder gerade leitet. Im Moment ist die TOS 0, also geht es geradeaus. Das ist der blaue Weg; .tut nichts und die IP trifft den Pfeil >, der sie wieder entlang des roten Pfades nach Osten lenkt. ~Nimmt das bitweise NOT des TOS und ändert es in -1.

Hier erreicht die IP den rechten Rand des Netzes, der es nach links zurückwickelt; Dies druckt erneut die TOS (diesmal -1) und ein Leerzeichen.

Jetzt trifft die IP die ?wieder. Diesmal ist die TOS -1; da dies negativ ist, biegt die IP nach links ab und nimmt den grünen Pfad. Der Spiegel \lenkt die IP zu um (, wodurch die TOS dekrementiert und in geändert werden -2. Es kommt zurück und trifft den Pfeil; ~nimmt bitweise NICHT wieder auf und dreht den -2auf 1.

Wieder wird die TOS ausgegeben und ein Leerzeichen gedruckt. Dieses Mal, wenn die IP das trifft ?, ist die TOS 1; da dies positiv ist, biegt die IP nach rechts ab und nimmt den gelben Pfad. Der erste Operator, dem es begegnet, ist das SDrücken einer zusätzlichen 32Taste. das ;knallt es, bevor es irgendwelche Probleme verursachen kann.

Jetzt kehrt die IP zum Pfeil zurück und führt ihre Routine aus, ~indem sie die TOS in ändert -2und sie Odruckt. Da die TOS wieder negativ ist, geht die IP erneut den grünen Weg. Und es fährt immer so weiter *: rot, grün, rot, gelb, rot, grün, rot, gelb ... und druckt im folgenden Zyklus:

0 -1 1 -2 2 -3 3 -4 4 -5 5 -6 6 -7 7 -8 8 -9 9 -10 10 ...

TL; DR

Dieses Programm durchläuft wiederholt diese 3 einfachen Schritte:

1. Geben Sie die aktuelle Nummer und ein Leerzeichen aus.
2. Wenn die aktuelle Zahl negativ ist, verringern Sie sie um 1.
3. Nimm bitweise NICHT die aktuelle Nummer.

Nicht getrennte Version, 6 Bytes

nO?~>~

Das Entfernen der Trennung vereinfacht das Programm so sehr, dass es auf einen Einheitswürfel passen kann:

  n
O ? ~ >
  ~

* Hinweis : Kein Programm ist wirklich unendlich, da es nur bis zu 2 ^{52 zählt} (wobei JavaScript beginnt, die Ganzzahlgenauigkeit zu verlieren).

MATL , 8 Bytes

0`@_@XDT

Dies verwendet den Standarddatentyp von MATL, dh double, es funktioniert 2^53absolut. Die Ausgabe ist

0
-1
1
-2
2
···

Probieren Sie es online!

Erläuterung

0            % Push 0
  `     T    % Do...while true: infinite loop
   @_        % Push iteration index and negate
     @       % Push iteration index
      XD     % Display the whole stack

Shakespeare-Programmiersprache , 227 Bytes

.
Ajax,.
Puck,.
Act I:
Scene I:
[Enter Ajax,Puck]
Puck:You ox!
Ajax:Be me without myself.Open thy heart.
Scene II:      
Ajax:Be thyself and ash.Open thy heart.Be me times you.Open thy heart.Be me times you.Let us return to scene II.

Natürlich ist diese Antwort bei weitem nicht erfolgreich, aber ich fand es gut, dass dies ein Anwendungsfall ist, für den die SPL vergleichsweise gut geeignet ist.

Erklärt:

// Everything before the first dot is the play's title, the parser treats it as a comment.
.

// Dramatis personae. Must be characters from Shakespeare's plays, again with a comment.
Ajax,.
Puck,.

// Acts and scenes serve as labels. Like the whole play, they can have titles too,
// but for the sake of golfing I didn't give them any.
Act I:

// This scene would've been named "You are nothing"
Scene I:

// Characters can talk to each other when on stage
[Enter Ajax,Puck]

// Characters can assign each other values by talking. Nice nouns = 1, ugly nouns = -1.
Puck: You ox!                 // Assignment: $ajax = -1;
Ajax: Be me without myself.   // Arithmetic: $puck = $ajax - $ajax;
      Open thy heart.         // Standard output in numerical form: echo $puck;

// Working title "The circle of life"
Scene II:

// Poor Ajax always doing all the work for us
Ajax: Be thyself and ash.          // $puck = $puck + (-1);
      Open thy heart.              // echo $puck;
      Be me times you.             // $puck *= $ajax;  (remember $ajax==-1 from scene I)
      Open thy heart.              // echo $puck;
      Be me times you.             // negate again
      Let us return to scene II.   // infinite goto loop

Wie Sie sehen können, wenn Sie diesen Code mit meiner Antwort auf die damit verbundene Herausforderung vergleichen, für immer zu zählen (dh alle natürlichen Zahlen zu drucken), nimmt die Länge des SPL-Codes ziemlich stark zu, wenn das Problem größer wird ...

Python 2, 27 Bytes

n=0
while 1:print~n,n,;n+=1

Druckt -1 0 -2 1 -3 2 -4 3 ...

05AB1E , 9 6 Bytes

3 Bytes gespart dank Adnan

[ND,±,

Probieren Sie es online!

Drucke 0, -1, 1, -2, 2 ...getrennt durch Zeilenumbrüche.

GNU sed, 189 + 2 (rn Flags) = 191 Bytes

Dies ist höchstwahrscheinlich die längste Lösung, da sed keine ganzzahligen oder arithmetischen Operationen hat. Daher musste ich einen Inkrementoperator mit beliebiger Größe nur mit regulären Ausdrücken emulieren .

s/^/0/p
:
:i;s/9(@*)$/@\1/;ti
s/8(@*)$/9\1/
s/7(@*)$/8\1/
s/6(@*)$/7\1/
s/5(@*)$/6\1/
s/4(@*)$/5\1/
s/3(@*)$/4\1/
s/2(@*)$/3\1/
s/1(@*)$/2\1/
s/0(@*)$/1\1/
s/^@+/1&/;y/@/0/
s/^/-/p;s/-//p
t

Lauf:

echo | sed -rnf all_integers.sed

Ausgabe:

0
-1
1
-2
2
-3
3
etc.

Brainfuck, 127 Bytes

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

Probieren Sie es online!

Bei einem unendlichen Band würde das theoretisch für immer laufen.

0,1,-1,2,-2,3,-3,4,-4,5,-5,6,-6,7,-7,8,-8,9,-9,10,-10,11,-11,12,-12,13,-13,14,-14,15,-15,16,-16,17,-17,18,-18,19,-19,20,-20,21,-21,22,-22,23,-23,24,-24,25,-25,26,-26,27,-27,28,-28,29,-29,30,-30,31,-31,32,-32,33,-33,34,-34,35,-35,36,-36,37,-37,38,-38,39,-39,40,-40,41,-41,42,-42,43,-43,44,-44,45,-45,46,-46,47,-47,48,-48,49,-49,50,-50,51,-51,52,-52,53,-53,54,-54,55,-55,56,-56,57,-57,58,-58,59,-59,60,-60,61,-61,62,-62,63,-63,64,-64,65,-65,66,-66,67,-67,68,-68,69,-69,70,-70,71,-71,72,-72,73,-73,74,-74,75,-75,76,-76,77,-77,78,-78,79,-79,80,-80,81,-81,82,-82,83,-83,84,-84,85,-85,86,-86,87,-87,88,-88,89,-89,90,-90,91,-91,92,-92,93,-93,94,-94,95,-95,96,-96,97,-97,98,-98,99,-99,...

Unkomprimiert

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

ShadyAsFuck , 3 Bytes

FVd

Erläuterung:

F     prints the current cell value (0) and increases it by 1
 V    starts a loop and prints the current value
  d   increases the current value and ends the loop

Dies nutzt den Zellenumbruch und gibt alle möglichen Werte aus. In SAF ist die native Ganzzahldarstellung ein Bytewert .

R, 25 24 Bytes

Dank @JDL ein Byte Golf gespielt.

repeat cat(-F,F<-F+1,'')

Probieren Sie es online!

Beispielausgabe:

0 1 -1 2 -2 3 -3 4 -4 5 -5 6 -6 7 -7 8 -8 9 -9 10 

Stapel, 56 Bytes

@set n=0
:l
@echo %n%
@set/an+=1
@echo -%n%
@goto l

Ausgabe:

0
-1
1
-2
2
-3

usw. Funktioniert bis 2147483647; 58 Bytes, wenn Sie (-) 2147483648 in der Ausgabe möchten:

@set n=0
:l
@echo %n:-=%
@set/an-=1
@echo %n%
@goto l

44 Byte, wenn alle unterstützten positiven Ganzzahlen gedruckt werden, dann sind alle unterstützten negativen Ganzzahlen zulässig und werden endlos wiederholt:

@set n=0
:l
@echo %n%
@set/an+=1
@goto l

Java 7, 151 134 122 118 Bytes

import java.math.*;void c(){for(BigInteger i=BigInteger.ONE,y=i;;i=i.add(y))System.out.println(y.subtract(i)+"\n"+i);}

12 Bytes gespart dank @flawr (und @xnor indirekt)

Nach Regeländerung .. ( 59 56 63 Bytes)

void c(){for(int i=0;i>1<<31;)System.out.println(~--i+"\n"+i);}

Da 2147483647 + 1 = -2147483648wir in Java nicht einfach i++unendlich weitermachen können, bestand die Herausforderung darin, alle Zahlen einmal zu drucken. Mit dem obigen Code mit zusätzlichem Bereich, wird es stattdessen alle ganzen Zahlen eines Druck von -2147483648bis 2147483647jeweils einmal, in der folgenden Reihenfolge: 0, -1, 1, -2, 2, -3, 3, -4, ..., 2147483646, -2147483647, 2147483647, -2147483648. Vielen Dank an @ OlivierGrégoire für den Hinweis auf Javas Verhalten in Bezug auf MIN_VALUE-1/ MAX_VALUE+1. Probieren Sie es hier aus.

Ungolfed & Testcode:

Probieren Sie es hier aus - dies führt zu einem Laufzeitfehler

import java.math.*;
class M{
  static void c() {
    for(BigInteger i = BigInteger.ONE, y = i; ; i = i.add(y)){
      System.out.println(y.subtract(i) + "\n" + i);
    }
  }

  public static void main(String[] a){
    c();
  }
}

Ausgabe:

0
1
-1
2
-2
3
-3
4
-4
5
-5
...

DC (GNU oder OpenBSD) - 16 Bytes

Diese Version ist nicht kürzer als die unten stehende Version, sollte aber in der Lage sein, ohne dass der Stack in Ihrem PC explodiert. Trotzdem wird unendlich viel Speicherplatz in Anspruch genommen ... irgendwann ...

Wegen des rBefehls benötigt es GNU-DC oder OpenBSD-DC .

0[rp1+45Pprdx]dx

Prüfung:

$ dc -e '0[rp1+45Pprdx]dx' | head
0
-1
1
-2
2
-3
3
-4
4
-5

DC - 16 Bytes

Ein bisschen gemein jetzt. ;-)

Diese Version missbraucht die Stapellänge als Zähler, während der Stapel wächst.

z[pz45Ppllx]dslx

Prüfung:

$ dc -e 'z[pz45Ppllx]dslx' | head
0
-1
1
-2
2
-3
3
-4
4
-5

DC - 17 Bytes

Ohne schmutzige Tricks.

0[p1+45Ppllx]dslx

Prüfung:

$ dc -e '0[p1+45Ppllx]dslx' | head
0
-1
1
-2
2
-3
3
-4
4
-5

C # 74 Bytes

class P{void Main(){for(var x=0m;;System.Console.Write(x+++","+-x+","));}}

class P
{
    void Main()
    {
        for(var x = 0m; ; System.Console.Write(x++ + "," + -x + ","));
    }
}

Ausgabe:

0,-1,1,-2,2,-3,3,-4,4,-5,5,-6,6,-7,7,-8,8,-9,9,-10,10,...

Versuch es:

dotnetfiddle.net (limitiert auf 1000)

Ruby, 26 22 19 16 Bytes

Druckt durch Zeilenumbrüche getrennte Zahlen. -3 Bytes von @manatwork. -3 Bytes von @ m-chrzan.

0.step{|n|p~n,n}

JavaScript, 29 26 Bytes

Nicht unendliche Version, 26 Bytes

3 Bytes gespart dank ETHproductions

for(n=1;;)alert([1-n,n++])

Zeigt alle Ganzzahlen zwischen -9007199254740991 und 9007199254740992 an.

Unendliche Version (ES6), 114 112 Bytes

2 Bytes gespart dank ETHproductions

for(n=[-1];1;alert(n[a||n.unshift(1),0]?(x=n.join``)+' -'+x:0))for(i=n.length,a=0;i--;a=(n[i]+=1-a)>9?n[i]=0:1);

zeigt alle ganzen Zahlen an, gegebene unendliche Zeit und Gedächtnis.

> <> , 19 15 Bytes

1::1$-naonao1+!

Daraufhin wird Folgendes gedruckt:

0
1
-1
2
-2
3
-3

... und so weiter. Das Trennzeichen ist eine Newline.

Nach dem Lesen der Antwort von @ xnor neu geschrieben, um eine Version dieses Algorithmus zu verwenden. Beginnend mit n=1, gibt das Programm vor dem Inkrementieren 1-nund njeweils gefolgt von einem Zeilenumbruch aus n. Nach dem Überlaufen des Maximalwertes endet das Programm mit einem Fehler von something smells fishy.... Wann genau dies geschieht, hängt von der Implementierung des Interpreters ab.

Vorherige Version:

0:nao0$-:10{0(?$~+!

Ab 0 wird das Programm auf unbestimmte Zeit wiederholt. In jeder Schleife wird der aktuelle Wert zusammen mit einer neuen Zeile gedruckt. Es wird dann negiert und erhöht, wenn es positiv ist.

Bash + GNU-Dienstprogramme, 26

seq NaN|sed '1i0
p;s/^/-/'

bc, 17 16 Bytes

Edit: 1 Byte weniger dank Digital Trauma .

Neben der Vielfalt der bisher verwendeten Sprachen präsentiere ich eine bc-Lösung, die mit Ganzzahlen beliebiger Größe funktioniert . Nach dem Code ist eine neue Zeile erforderlich, die in der Gesamtzahl der Bytes gezählt wird.

for(;;){i;-++i}

In der ersten Iteration iist nicht definiert, aber das Drucken gibt 0 zu meiner Überraschung.

Labyrinth , 9 Bytes

!`
\:"
 (

Probieren Sie es online!

Dies funktioniert auch und ist im Wesentlichen dasselbe:

 "
`:(
\!

Erläuterung

Der Kontrollfluss in diesem Code ist ziemlich lustig. Denken Sie daran, dass der Anweisungszeiger (IP) in einem Labyrinth-Programm dem Pfad von Nicht-Leerzeichen folgt und den oberen Rand des Stapels an einer beliebigen Kreuzung untersucht, um zu entscheiden, welchen Pfad Sie verwenden möchten:

• Wenn die Oberseite des Stapels positiv ist, biegen Sie rechts ab.
• Wenn die Spitze des Stapels Null ist, fahren Sie geradeaus weiter.
• Wenn die Oberseite des Stapels negativ ist, biegen Sie links ab.

Wenn die IP eine Sackgasse erreicht, dreht sie sich um (der Befehl wird am Ende nur einmal ausgeführt). Und die IP beginnt in der oberen linken Ecke und bewegt sich nach Osten. Beachten Sie auch, dass der Stapel implizit mit einer unendlichen Anzahl von Nullen gefüllt ist.

Das Programm startet mit diesem kurzen Bit:

!    Print top of stack (0).
`    Multiply by -1 (still 0).
:    Duplicate.

Jetzt befindet sich die IP an der relevanten Kreuzung und bewegt sich geradeaus auf die, (die die Oberseite des Stapels dekrementiert -1. Die IP stößt in eine Sackgasse und dreht sich um. :dupliziert die Oberseite des Stapels noch einmal. Jetzt ist die Oberseite des Stapels negativ und die IP dreht sich nach links (nach Westen). Wir führen nun eine weitere Iteration der Hauptschleife durch:

\   Print linefeed.
!   Print top of stack (-1).
`   Multiply by -1 (1).
:   Duplicate.

Diesmal ist die Oberseite des Stapels positiv, also dreht sich IP nach rechts (nach Westen) und führt sofort eine weitere Iteration der Hauptschleife aus, bei der der Stapel gedruckt wird 1. Dann, nachdem es wieder negiert wurde, schlagen wir :mit -1auf den Stapel.

Diesmal dreht sich die IP nach links (nach Osten). Das "ist nur ein No-Op und die IP dreht sich in der Sackgasse um. :macht eine weitere Kopie und dieses Mal dreht sich die IP nach Süden. (Dekrementiert den Wert auf -2, dreht sich die IP wieder um. Wenn die Spitze des Stapels immer noch negativ ist, dreht sich die IP nun nach Westen :und führt die nächste Iteration der Hauptschleife durch.

Auf diese Weise iteriert die IP nun zwischen einer Iteration mit enger Schleife, bei der eine positive Zahl gedruckt wird, und einer Iteration, bei der beide Sackgassen durchlaufen werden, um den Wert zu dekrementieren, bevor eine negative Zahl gedruckt wird.

Sie könnten sich fragen, warum es das "in der zweiten Zeile gibt, wenn es eigentlich nichts tut: Wenn die IP-Adresse :einen negativen Wert erreicht, kann sie nicht nach links (Osten) abbiegen, sodass sie stattdessen nach rechts (Westen) abbiegen würde (Als Faustregel gilt: Wenn die übliche Richtung an einer Kreuzung nicht verfügbar ist, nimmt die IP die entgegengesetzte Richtung). Das bedeutet, dass die IP auch niemals (den unteren Rand erreichen würde und wir nicht zwischen positiven und negativen Iterationen unterscheiden könnten.

JavaScript (ES5), 32 31 30 29 Byte

for(i=0;;)[i++,-i].map(alert)

Druckt 0 -1 1 -2 2 -3 3 -4 4 -5 5 ...

Dank Patrick Roberts 1 Byte gespart! 2 Bytes gespart dank Conor O'Brien!

Java, 65 54 Bytes

i->{for(;;)System.out.print(i+++" "+(-i<i?-i+" ":""));

Ungolfed-Testcode

public static void main(String[] args) {
    Consumer<Integer> r = i -> {
        for (;;) {
            System.out.print(i++ + " " + (-i < i ? -i + " " : ""));
        }
    };

    r.accept(0);
}

C #, 83 Bytes

void f(){for(decimal n=0;;n++){Console.Write(n+",");if(n>0)Console.Write(-n+",");}}

Ungolfed:

void f()
{
  for (decimal n=0;;n++)
  {
    Console.Write(n + ",");
    if (n > 0) Console.Write(-n + ",");
   }
}

Ausgänge:

0,1,-1,2,-2,3,-3,4,-4,5,-5,6,-6.......

C # 86 66 Bytes

Neue Antwort:

void b(){for(var i=0;;i++)Console.Write(i==0?","+i:","+i+",-"+i);}

Klar:

void b() 
{
    for(var i=0;;i++)
        Console.Write(i == 0 ? "," + i : "," + i + ",-" + i);
}

Alte Antwort (86 Bytes):

void a(){Console.Write(String.Join(",",Enumerable.Range(int.MinValue,int.MaxValue)));}

Ungolfed:

void a()
{
    Console.Write(String.Join(",", Enumerable.Range(int.MinValue, int.MaxValue)));
}

J, 25 Bytes

([:$:1:`-`(1+-)@.*[echo)0

Funktioniert weiter der Online-Site , kann aber noch nicht auf dem Computer überprüft werden. Druckt Zahlen wie:

0
1
_1
2
_2
3
_3
4

usw.

Powershell, 20 19 18 Bytes

Verbessert durch schamloses Stehlen von TimmyDs Antwort

0;for(){-++$i;$i}

Ausgabe:

0
-1
1
-2
2
-3
3
-4
4

Alte Version:

for(){-$i;$i++;$i}

Nicht sicher, warum tbh, aber - nicht deklarierte Variable (oder - $ null) wird als 0 ausgewertet, was uns in dieser Version 2 Bytes erspart hat ...

Pyke , 7 2 Bytes

~I

Probieren Sie es hier aus!

7 Bytes

oDID_)r

Probieren Sie es hier aus!

Wenn das Drucken von + -0 in Ordnung ist, oD_r

Brachylog , 2 Bytes

ẉ⊥

Probieren Sie es online!

ẉ     Print with a newline
      the input,
 ⊥    then try again.

Da das Programm keine Eingabe erhält, bleibt die Eingabevariable des Hauptprädikats uneingeschränkt. Zuerst wird angenommen, dass es 0 ist, aber wenn die Ausführung trifft ⊥, wird zum einzig möglichen Fehlerpunkt zurückgegangen: der Wahl des Werts für die Eingabevariable. Dann wird 1, -1 und jede andere Ganzzahl ausprobiert, wobei jede durch Zeilenumbrüche getrennte Zahl für ⊥immer gedruckt wird, da immer ein Zurückverfolgen erzwungen wird , und der Effekt von ẉwird sofort ausgeführt.