Tulis sebuah program atau fungsi yang akan mencetak semua bilangan bulat dengan tepat sekali waktu dan memori yang tak terbatas.

Output yang mungkin bisa:

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, …

Ini bukan output yang valid, karena ini tidak akan pernah menyebutkan angka negatif:

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

• Outputnya harus dalam desimal, kecuali bahasa Anda tidak mendukung bilangan bulat desimal (dalam hal ini gunakan representasi alami dari bilangan bulat yang digunakan bahasa Anda).

• Program Anda harus bekerja dengan angka-angka dengan besarnya terbesar dari tipe integer standar bahasa Anda.

• Setiap bilangan bulat harus dipisahkan dari yang berikutnya menggunakan pemisah apa pun (spasi, koma, linebreak, dll.) Yang bukan digit atau tanda negatif bahasa Anda.

• Pemisah tidak boleh berubah kapan saja.

• Pemisah dapat terdiri dari beberapa karakter, selama tidak ada dari mereka yang merupakan digit atau tanda negatif (mis. , Sama validnya dengan adil ,).

• Setiap bilangan bulat yang didukung pada akhirnya harus dicetak setelah waktu yang terbatas.

Mencetak gol

Ini adalah kode-golf , jadi jawaban tersingkat dalam byte menang

Papan peringkat

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 byte

0000000: c4ceb9                                            ...

Cobalah online! Periksa Debug untuk melihat kode SBIN yang dihasilkan.

Perakitan Sesos

File biner di atas telah dihasilkan dengan merakit kode SASM berikut.

set numout

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

Haskell, 19 byte

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

Menghasilkan daftar tanpa batas [0,1,-1,2,-2,3,-3,4,-4,5,-5,6,-6,7,-7...

Haskell memungkinkan daftar tak terbatas secara asli. Mencetak daftar semacam itu akan mencetak elemen-elemennya satu kali untuk selamanya.

Brainfuck, 6 byte

Ini memanfaatkan pembungkus sel dan mencetak semua nilai yang mungkin. Dalam Brainfuck, representasi integer asli adalah dengan nilai byte .

.+[.+]

Cobalah online!

Cubix , 14 12 byte

.(.\OSo;?.>~

Uji secara online! Anda sekarang dapat menyesuaikan kecepatan jika Anda ingin berlari lebih cepat atau lebih lambat.

Bagaimana itu bekerja

Hal pertama yang dilakukan oleh interpreter adalah menghapus semua spasi dan pad kode dengan no-ops .sampai cocok di sebuah kubus. Itu berarti bahwa kode di atas juga dapat ditulis seperti ini:

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

Sekarang kodenya dijalankan. IP (penunjuk instruksi) dimulai di sudut kiri atas wajah paling kiri, menunjuk ke timur. Inilah jalur yang dibutuhkan selama menjalankan program:

IP dimulai pada jejak merah di paling kiri gambar. Itu kemudian berjalan OSo;, yang melakukan hal berikut:

• OCetak TOS (top-of-stack) sebagai bilangan bulat. Di awal program, tumpukan berisi nol tanpa batas, jadi ini dicetak 0.
• STekan 32, kode karakter untuk karakter spasi.
• oCetak TOS sebagai karakter. Ini mencetak spasi.
• ;Pop TOS. Menghapus 32dari tumpukan.

Sekarang IP mengenai ?, yang mengarahkannya ke kiri, kanan, atau lurus tergantung pada tanda KL. Saat ini, TOS-nya 0begitu lurus. Ini adalah jalur biru; .tidak melakukan apa-apa, dan IP menyentuh panah >, yang mengarahkannya ke timur di sepanjang jalur merah lagi. ~mengambil BOT bitwise dari TOS, mengubahnya menjadi -1.

Di sini IP mencapai tepi kanan jaring, yang membungkusnya kembali ke kiri; ini lagi mencetak TOS (kali ini -1) dan spasi.

Sekarang IP mengenai ?lagi. Kali ini, KL adalah -1; karena ini negatif, IP belok kiri, mengambil jalur hijau. Cermin \membelokkan IP ke (, yang menurunkan TOS, mengubahnya menjadi -2. Muncul kembali dan mengenai panah; ~Dibutuhkan bitwise TIDAK lagi, memutar -2ke 1.

Sekali lagi, TOS dikeluarkan dan spasi dicetak. Kali ini ketika IP mencapai ?, TOS adalah 1; karena ini positif, IP berbelok ke kanan, mengambil jalur kuning. Operator pertama yang ditemui adalah S, mendorong tambahan 32; yang ;muncul sebelum dapat menyebabkan masalah.

Sekarang IP kembali ke panah dan melakukan rutinitasnya, ~mengubah TOS -2dan Omencetaknya. Karena TOS negatif lagi, IP mengambil jalur hijau sekali lagi. Dan itu terus berputar seperti itu selamanya *: merah, hijau, merah, kuning, merah, hijau, merah, kuning ..., mencetak dalam siklus berikut:

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

TL; DR

Program ini berulang kali melalui 3 langkah mudah ini:

1. Keluarkan nomor saat ini dan spasi.
2. Jika angka saat ini negatif, kurangi dengan 1.
3. Ambil bitwise BUKAN dari nomor saat ini.

Versi tidak terpisahkan, 6 byte

nO?~>~

Menghapus pemisahan menyederhanakan program sehingga bisa masuk ke dalam unit cube:

  n
O ? ~ >
  ~

* Catatan : Tidak ada program yang benar-benar tidak terbatas, karena hanya menghitung hingga ⁵²² (di mana JavaScript mulai kehilangan presisi bilangan bulat).

MATL , 8 byte

0`@_@XDT

Ini menggunakan tipe data default MATL, yaitu double, sehingga berfungsi hingga 2^53dalam nilai absolut. Outputnya adalah

0
-1
1
-2
2
···

Cobalah online!

Penjelasan

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

Bahasa Pemrograman Shakespeare , 227 byte

.
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.

Jelas, jawaban ini sama sekali tidak menang, tetapi saya suka bahwa ini adalah kasus penggunaan yang cocok untuk SPL.

Dijelaskan:

// 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

Seperti yang Anda lihat ketika membandingkan kode ini dengan jawaban saya terhadap tantangan terkait untuk menghitung selamanya (yaitu mencetak semua nomor alami), panjang kode SPL tumbuh agak buruk ketika ukuran masalah meningkat ...

Python 2, 27 byte

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

Cetakan -1 0 -2 1 -3 2 -4 3 ...

05AB1E , 9 6 byte

Disimpan 3 byte berkat Adnan

[ND,±,

Cobalah online!

Cetakan 0, -1, 1, -2, 2 ...dipisahkan oleh baris baru.

GNU sed, 189 + 2 (rn flags) = 191 byte

Ini kemungkinan merupakan solusi terpanjang, karena sed tidak memiliki tipe integer atau operasi aritmatika. Karena itu, saya harus meniru operator peningkatan ukuran sewenang - wenang menggunakan ekspresi reguler saja.

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

Lari:

echo | sed -rnf all_integers.sed

Keluaran:

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

Brainfuck, 127 byte

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

Cobalah online!

Diberikan rekaman tak terbatas secara teoritis akan berjalan selamanya.

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,...

Tidak terkompresi

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

ShadyAsFuck , 3 byte

FVd

Penjelasan:

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

Ini memanfaatkan pembungkus sel dan mencetak semua nilai yang mungkin. Dalam SAF, representasi integer asli adalah dengan nilai byte .

R, 25 24 byte

Golf satu byte berkat @JDL.

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

Cobalah online!

Contoh output:

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

Batch, 56 byte

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

Keluaran:

0
-1
1
-2
2
-3

dll. Bekerja hingga 2147483647; 58 byte jika Anda ingin (-) 2147483648 di output:

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

44 byte jika mencetak semua bilangan bulat positif yang didukung, maka semua bilangan bulat negatif yang didukung, kemudian diulang tanpa henti, dapat diterima:

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

Java 7, 151 134 122 118 byte

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 byte disimpan berkat @ flawr (dan @xnor secara tidak langsung)

Setelah perubahan peraturan .. ( 59 56 63 byte)

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

Karena di Jawa 2147483647 + 1 = -2147483648, kita tidak bisa begitu saja melakukan i++dan melanjutkan tanpa batas, karena tantangannya adalah mencetak semua angka satu kali. Dengan kode di atas dengan kisaran menambahkan, hal itu malah akan mencetak semua bilangan bulat dari -2147483648ke 2147483647masing-masing sekali, dengan urutan sebagai berikut: 0, -1, 1, -2, 2, -3, 3, -4, ..., 2147483646, -2147483647, 2147483647, -2147483648. Terima kasih kepada @ OlivierGrégoire karena menunjukkan perilaku Java tentang MIN_VALUE-1/ MAX_VALUE+1. Coba di sini.

Tidak digabungkan & kode uji:

Coba di sini - menghasilkan kesalahan runtime

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();
  }
}

Keluaran:

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

DC (rasa GNU atau OpenBSD) - 16 byte

Versi ini tidak lebih pendek dari versi di bawah ini tetapi harus dapat berjalan tanpa tumpukan meledak di PC Anda. Namun demikian, jumlah besar yang tak terbatas akan memakan banyak memori ... terkadang ...

Karena rperintah itu diperlukan GNU-DC atau OpenBSD-DC .

0[rp1+45Pprdx]dx

Uji:

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

DC - 16 byte

Sedikit kejam sekarang. ;-)

Versi ini menyalahgunakan panjang tumpukan sebagai penghitung sementara membiarkan tumpukan tumbuh.

z[pz45Ppllx]dslx

Uji:

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

DC - 17 byte

Tanpa trik kotor.

0[p1+45Ppllx]dslx

Uji:

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

C # 74 byte

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 + ","));
    }
}

Keluaran:

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

Cobalah:

dotnetfiddle.net (terbatas hingga 1000)

Ruby, 26 22 19 16 byte

Mencetak angka yang dipisahkan oleh baris baru. -3 byte dari @manatwork. -3 byte dari @ m-chrzan.

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

JavaScript, 29 26 byte

Versi tidak terbatas, 26 byte

Disimpan 3 byte berkat produk ETH

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

akan menampilkan semua bilangan bulat antara -9007199254740991 dan 9007199254740992.

Versi tak terbatas (ES6), 114 112 byte

Disimpan 2 byte berkat produk ETH

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);

akan menampilkan semua bilangan bulat, mengingat waktu dan memori yang tidak terbatas.

> <> , 19 15 byte

1::1$-naonao1+!

Ini mencetak yang berikut ini:

0
1
-1
2
-2
3
-3

... dan seterusnya. Pemisah adalah baris baru.

Ditulis ulang setelah membaca jawaban xnor untuk menggunakan versi algoritma itu. Mulai dari n=1, program mencetak 1-ndan n, masing-masing diikuti oleh baris baru, sebelum ditambahkan n. Setelah meluap nilai maksimum program akan berakhir dengan kesalahan something smells fishy.... Tepat kapan ini akan terjadi tergantung pada implementasi juru bahasa.

Versi sebelumnya:

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

Mulai dari 0, loop program tanpa batas. Pada setiap loop, nilai saat ini dicetak bersama dengan baris baru. Ini kemudian dinegasikan, dan bertambah jika positif.

Utilitas Bash + GNU, 26

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

bc, 17 16 byte

Sunting: 1 byte lebih sedikit berkat Digital Trauma .

Menambah keragaman bahasa yang digunakan sejauh ini, saya menyajikan solusi bc yang bekerja dengan bilangan bulat ukuran sewenang - wenang . Baris baru diperlukan setelah kode dan dihitung dalam total byte.

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

Di iterasi pertama i tidak ditentukan, tetapi mencetaknya memberikan 0 kejutan saya.

Labirin , 9 byte

!`
\:"
 (

Cobalah online!

Ini juga berfungsi dan pada dasarnya sama:

 "
`:(
\!

Penjelasan

Aliran kontrol dalam kode ini agak lucu. Ingat bahwa penunjuk instruksi (IP) dalam program Labirin mengikuti jalur karakter non-spasi dan memeriksa bagian atas tumpukan di persimpangan mana pun untuk memutuskan jalur mana yang akan diambil:

• Jika bagian atas tumpukan positif, belok kanan.
• Jika bagian atas tumpukan nol, terus bergerak lurus ke depan.
• Jika bagian atas tumpukan negatif, belok kiri.

Ketika IP menemui jalan buntu, berbalik (mengeksekusi perintah di akhir hanya sekali). Dan IP dimulai di sudut kiri atas bergerak ke timur. Perhatikan juga bahwa tumpukan secara implisit diisi dengan jumlah nol yang tidak terbatas untuk memulai.

Program dimulai dengan bit pendek ini:

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

Sekarang IP berada di persimpangan yang relevan dan bergerak lurus ke depan ke (mana mengurangi bagian atas tumpukan -1. IP mencapai jalan buntu dan berbalik. :menggandakan bagian atas tumpukan sekali lagi. Sekarang bagian atas tumpukan negatif dan IP belok kiri (barat). Kami sekarang menjalankan satu iterasi lagi dari loop utama:

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

Kali ini, bagian atas tumpukan positif, sehingga IP berbelok ke kanan (barat) dan segera menjalankan iterasi lain dari loop utama, yang mencetak 1. Kemudian setelah dinegasikan lagi, kita memukul :dengan-1 pada stack.

Kali ini IP belok kiri (timur). Ini "hanya no-op dan IP berbalik di jalan buntu. :membuat salinan lain dan kali ini IP berbelok ke selatan. (mengurangi nilai -2, IP berbalik lagi. Dengan bagian atas tumpukan masih negatif, IP sekarang berubah ke barat pada :dan melakukan iterasi berikutnya dari loop utama.

Dengan cara ini, IP sekarang akan beralih antara iterasi loop ketat, mencetak angka positif, dan iterasi yang melewati kedua jalan buntu untuk mengurangi nilai sebelum mencetak angka negatif.

Anda mungkin bertanya pada diri sendiri mengapa ada di "baris kedua jika tidak benar-benar melakukan apa-apa: tanpanya, ketika IP mencapai :nilai negatif, itu tidak bisa berbelok ke kiri (timur) sehingga akan berbelok ke kanan (barat) sebagai gantinya (sebagai aturan praktis, jika arah biasa di persimpangan tidak tersedia, IP akan mengambil arah yang berlawanan). Itu berarti IP juga tidak akan pernah mencapai (bagian bawah dan kami tidak dapat membedakan iterasi positif dan iterasi negatif.

JavaScript (ES5), 32 31 30 29 byte

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

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

Disimpan 1 byte berkat Patrick Roberts! Disimpan 2 byte berkat Conor O'Brien!

Java, 65 54 byte

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

Kode tes tidak digabungkan

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

    r.accept(0);
}

C #, 83 byte

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

Tidak Disatukan:

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

Output:

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

C # 86 66 byte

Jawaban baru:

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

Bersih:

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

Jawaban lama (86 byte):

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

Tidak Disatukan:

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

J, 25 byte

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

Bekerja di situs online , tetapi saya belum dapat memverifikasinya di komputer. Mencetak angka seperti:

0
1
_1
2
_2
3
_3
4

dll.

Powershell, 20 19 18 byte

Diperbaiki dengan mencuri tanpa malu-malu dari jawaban TimmyD

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

Keluaran:

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

Versi lama:

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

Tidak yakin mengapa tbh, tetapi - variabel yang tidak dideklarasikan (atau - $ nol) dievaluasi sebagai 0, yang menyelamatkan kami 2 byte dalam versi ini ...

Pyke , 7 2 byte

~I

Coba di sini!

7 byte

oDID_)r

Coba di sini!

Jika pencetakan + -0 ok, oD_r

Brachylog , 2 byte

ẉ⊥

Cobalah online!

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

Karena program tidak diberi input, variabel input predikat utama dibiarkan tidak dibatasi. Pada awalnya, diasumsikan 0, tetapi ketika eksekusi berhasil ⊥, ia akan kembali ke satu-satunya titik kegagalan: pilihan nilai untuk variabel input. Maka ia mencoba 1, dan -1, dan setiap bilangan bulat lainnya, mencetak masing-masing dipisahkan oleh baris baru selamanya karena ⊥selalu memaksa mundur, dan efek ẉdieksekusi segera.