เขียนโปรแกรมที่นับตลอดไปเริ่มจากโปรแกรมหนึ่ง

กฎ:

• โปรแกรมของคุณต้องเข้าสู่ระบบSTDOUTหรือเป็นทางเลือกที่ยอมรับได้หากSTDOUTไม่สามารถใช้ได้
• โปรแกรมของคุณจะต้องเป็นโปรแกรมที่รันได้เต็มรูปแบบไม่ใช่ฟังก์ชันหรือตัวอย่าง
• โปรแกรมของคุณจะต้องแสดงผลแต่ละหมายเลขด้วยอักขระคั่นระหว่าง (ขึ้นบรรทัดใหม่เว้นวรรคแท็บหรือเครื่องหมายจุลภาค) แต่สิ่งนี้จะต้องสอดคล้องกับตัวเลขทั้งหมด
• คุณอาจจะพิมพ์ตัวเลขในทศนิยมในเอกหรือในฐาน 256 ซึ่งแต่ละหลักจะถูกแทนด้วยค่าไบต์
• โปรแกรมของคุณจะต้องนับอย่างน้อยเท่ากับ 2 ¹²⁸ (รวม) โดยไม่มีปัญหาและไม่มีหน่วยความจำไม่เพียงพอบนเดสก์ท็อปพีซีที่เหมาะสม โดยเฉพาะอย่างยิ่งซึ่งหมายความว่าหากคุณใช้เอกภาพคุณไม่สามารถเก็บการแสดงหมายเลขปัจจุบันในหน่วยความจำได้

• แตกต่างจากกฎทั่วไปของเราอย่าลังเลที่จะใช้ภาษา (หรือรุ่นภาษา) แม้ว่าจะใหม่กว่าความท้าทายนี้ ภาษาที่เขียนขึ้นเพื่อส่งคำตอบแบบ 0 ไบต์ต่อความท้าทายนี้เป็นเกมที่ยุติธรรม แต่ไม่น่าสนใจเป็นพิเศษ

  โปรดทราบว่าจะต้องมีล่ามเพื่อให้สามารถส่งการทดสอบได้ ได้รับอนุญาต (และสนับสนุนให้) เขียนล่ามนี้ด้วยตัวคุณเองสำหรับภาษาที่ยังไม่ได้ใช้งานมาก่อน

• นี่ไม่ได้เกี่ยวกับการค้นหาภาษาด้วยวิธีแก้ปัญหาที่สั้นที่สุดสำหรับเรื่องนี้ (มีบางโปรแกรมที่โปรแกรมเปล่าทำเคล็ดลับ) - สิ่งนี้เกี่ยวกับการค้นหาวิธีแก้ปัญหาที่สั้นที่สุดในทุกภาษา ดังนั้นจะไม่มีการทำเครื่องหมายคำตอบว่าเป็นที่ยอมรับ

แค็ตตาล็อก

สแต็คส่วนย่อยที่ด้านล่างของโพสต์นี้สร้างแคตตาล็อกจากคำตอบ a) เป็นรายการคำตอบสั้นที่สุดต่อภาษาและ b) เป็นลีดเดอร์บอร์ดโดยรวม

เพื่อให้แน่ใจว่าคำตอบของคุณปรากฏขึ้นโปรดเริ่มคำตอบด้วยหัวข้อโดยใช้เทมเพลต 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

<style>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; }</style><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="language-list"> <h2>Shortest Solution 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> <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> <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><script>var QUESTION_ID = 63834; var ANSWER_FILTER = "!t)IWYnsLAZle2tQ3KqrVveCRJfxcRLe"; var COMMENT_FILTER = "!)Q2B_A2kjfAiU78X(md6BoYk"; var OVERRIDE_USER = 39069; var answers = [], answers_hash, answer_ids, answer_page = 1, more_answers = true, comment_page; function answersUrl(index) { return "//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 "//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,<]*(?:<(?:[^\n>]*>[^\n<]*<\/[^\n>]*>)[^\n,<]*)*),.*?(\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, }); else console.log(body); }); 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; lang = jQuery('<a>'+lang+'</a>').text(); languages[lang] = languages[lang] || {lang: a.language, lang_raw: lang.toLowerCase(42), 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_raw > b.lang_raw) return 1; if (a.lang_raw < b.lang_raw) 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); } }</script>

เขาวงกต 5 ไบต์

):
\!

IP IP ในรหัสนั้นวนไปเรื่อย ๆ round

คำแนะนำที่เกี่ยวข้อง:

)       Increment top of stack (stack has infinite zeroes at bottom)
:       Duplicate top of stack
!       Output top of stack
\       Output newline

> <> , 8 ไบต์

01+:nao!

ขั้นตอน:

• กด 0 บนสแต็ก
• เพิ่ม 1 ให้กับองค์ประกอบสแต็คด้านบน
• ทำซ้ำองค์ประกอบสแต็กด้านบน
• เอาต์พุตด้านบนของสแต็กเป็นตัวเลข
• ขึ้นบรรทัดใหม่
• ไปที่ขั้นตอนที่ 2 โดยล้อมรอบและกระโดดคำสั่งถัดไป (ขั้นตอนที่ 11)

(หน่วยความจำที่มีประสิทธิภาพน้อย (ที่ไม่ถูกต้องด้วยเหตุนี้) โปรแกรมllnao.)

Haskell, 21 ไบต์

main=mapM_ print[1..]

จำนวนเต็มและรายการอนันต์ที่มีความแม่นยำตามอำเภอใจทำให้เป็นเรื่องง่าย :-)

โชคดีที่mapM_อยู่ในบทโหมโรง ถ้าData.Traversableเป็นเช่นนั้นเรายังสามารถลดขนาดมันเป็น 19 ไบต์:

main=for_[1..]print

Gol> <> , 3 ไบต์

P:N

ขั้นตอน:

• เพิ่ม 1 ไปยังองค์ประกอบสแต็คด้านบน (เมื่อเริ่มต้นมันเป็น 0 โดยนัย)
• ทำซ้ำองค์ประกอบสแต็กด้านบน
• แสดงและส่งด้านบนสุดของสแต็กเป็นตัวเลขและขึ้นบรรทัดใหม่
• ล้อมรอบไปยังขั้นตอนที่ 1 เมื่อเราถึงจุดสิ้นสุดของบรรทัด

Marbelous , 11450 4632 bytes

การพิมพ์ทศนิยมเป็นความเจ็บปวด !!

ไม่ชนะอย่างแน่นอนกับเรื่องนี้ แต่ฉันคิดว่าฉันจะให้มันยิง ฉันหวังว่ามันโอเคที่จะเอาท์พุทเป็นศูนย์ 40 (พอดี 2 ^ 128)

00@0..@1..@2..@3..@4..@5..@6..@7..@8..@9..@A..@B..@C..@D..@E..@F..@G..@H..@I..@J
\\++..00..00..00..00..00..00..00..00..00..00..00..00..00..00..00..00..00..00..00
..EhunEhunEhunEhunEhunEhunEhunEhunEhunEhunEhunEhunEhunEhunEhunEhunEhunEhunEhunEhun
....AddtAddtAddtAddtAddtAddtAddtAddtAddtAddtAddtAddtAddtAddtAddtAddtAddtAddtAddt
..&7..&7..&7..&7..&7..&7..&7..&7..&7..&7..&7..&7..&7..&7..&7..&7..&7..&7..&7..&7\/
../\&8..........................................................................
....@0..........................................................................
....../\&8......................................................................
....//..@1......................................................................
........../\&8..................................................................
......////..@2..................................................................
............../\&8..............................................................
........//////..@3..............................................................
................../\&8..........................................................
..........////////..@4..........................................................
....................../\&8......................................................
............//////////..@5......................................................
........................../\&8..................................................
..............////////////..@6..................................................
............................../\&8..............................................
................//////////////..@7..............................................
................................../\&8..........................................
..................////////////////..@8..........................................
....................................../\&8......................................
....................//////////////////..@9......................................
........................................../\&8..................................
......................////////////////////..@A..................................
............................................../\&8..............................
........................//////////////////////..@B..............................
................................................../\&8..........................
..........................////////////////////////..@C..........................
....................................................../\&8......................
............................//////////////////////////..@D......................
........................................................../\&8..................
..............................////////////////////////////..@E..................
............................................................../\&8..............
................................//////////////////////////////..@F..............
................................................................../\&8..........
..................................////////////////////////////////..@G..........
....................................................................../\&8......
....................................//////////////////////////////////..@H......
........................................................................../\&8..
......................................////////////////////////////////////..@I..
............................................................................../\&8
........................................//////////////////////////////////////..@J
&9&9&9&9&9&9&9&9&9&9&9&9&9&9&9&9&9&9&9&9
Sixteenbytedecimalprintermodulewitharegi

:Sixteenbytedecimalprintermodulewitharegi
}J}J}I}I}H}H}G}G}F}F}E}E}D}D}C}C}B}B}A}A}9}9}8}8}7}7}6}6}5}5}4}4}3}3}2}2}1}1}0}00A
/A%A/A%A/A%A/A%A/A%A/A%A/A%A/A%A/A%A/A%A/A%A/A%A/A%A/A%A/A%A/A%A/A%A/A%A/A%A/A%A
%A..%A..%A..%A..%A..%A..%A..%A..%A..%A..%A..%A..%A..%A..%A..%A..%A..%A..%A..%A..
+O+O+O+O+O+O+O+O+O+O+O+O+O+O+O+O+O+O+O+O+O+O+O+O+O+O+O+O+O+O+O+O+O+O+O+O+O+O+O+O..
+O+O+O+O+O+O+O+O+O+O+O+O+O+O+O+O+O+O+O+O+O+O+O+O+O+O+O+O+O+O+O+O+O+O+O+O+O+O+O+O..

:/A
..}0..}0..
..>>}0....
..>>>>\\..
....//..//
../\>>\\..
....>>..//
....>>\\..
....>>....
\\>>//....
..>>......
..>>......
../\......
..../\<<..
......<<..
..\\<<//..
....~~....
....++....
....\\..//
\\....>9\/
..\\..?0..
......++..
....\\....
......{0..

:%A
@0..
}0..
<A-A
{0@0

:Eg
}0}0}0}0}0}0}0}0
^7^6^5^4^3^2^1^0
~~....~~~~..~~~~
^0^0^0^0^0^0^0^0
{0{0{0{0{0{0{0{0

:Ehun
}0..}0
Eg..&0
=8&0{0
&1\/00
0100&0
&1&1{1
{1{0

:Addt
}0}1
{1{1

C (สถาปัตยกรรม 64- บิตเท่านั้น), 53 ไบต์

อาศัยพอยน์เตอร์อย่างน้อย 64 บิตและพิมพ์เป็น hex โดยใช้ตัว%pระบุ โปรแกรมจะกลับมาทันทีเมื่อกดปุ่ม 2 ^ 128

char*a,*b;main(){for(;++b||++a;)printf("%p%p ",a,b);}

Hexagony , 12 11 10 7 ไบต์

ขอบคุณ alephalpha สำหรับการติดตั้งรหัสในด้านยาว 2

10})!';

กางออก:

 1 0
} ) !
 ' ;

อันนี้ค่อนข้างง่าย 10เขียน 10 คือ linefeed ไปที่ขอบหน่วยความจำเริ่มต้น จากนั้น})!';จะถูกดำเนินการซ้ำ ๆ ในลูป:

• } ย้ายไปที่ขอบหน่วยความจำถัดไป
• ) เพิ่มขึ้น
• ! พิมพ์เป็นจำนวนเต็ม
• ' ย้ายกลับไปที่ 10
• ; พิมพ์เป็นตัวอักษร

ฉันเชื่อว่านี่เป็นสิ่งที่ดีที่สุด (แม้ว่าจะไม่ได้โดดเด่น) ผมได้แจ้งให้สคริปต์กำลังดุร้ายผมเขียนสำหรับคำตอบนี้การค้นหาสำหรับการแก้ปัญหา 6 ไบต์ภายใต้สมมติฐานว่ามันจะต้องมีอย่างน้อยหนึ่งแต่ละ;และ!และทั้ง(หรือ)และจะไม่ประกอบด้วย?, ,หรือ@และมันไม่ได้ ค้นหาวิธีแก้ปัญหาใด ๆ

Pyth, 4 ไบต์

.V1b

คำอธิบาย:

.V1    for b in range(1 to infinity):
   b      print b

bc, 10

for(;;)++i

แปลกที่สั้นกว่าbcdc

จากman bc:

รายละเอียด

bc เป็นภาษาที่รองรับตัวเลขความแม่นยำโดยพลการ

Java, 139 138 127 123 ไบต์

class K{public static void main(String[]a){java.math.BigInteger b=null;for(b=b.ZERO;;)System.out.println(b=b.add(b.ONE));}}

Mathematica ขนาด 22 ไบต์

i=0;While[Echo[++i]>0]

Echo เป็นฟังก์ชั่นใหม่ใน Mathematica 10.3

Ruby, 15 12 ไบต์

loop{p$.+=1}

• pเมื่อได้รับจำนวนเต็มให้พิมพ์จำนวนเต็มตาม - คือ (ความอนุเคราะห์ของ@philomory )
• $.เป็นตัวแปรมหัศจรรย์ที่ถือจำนวนบรรทัดที่อ่านจาก stdin เห็นได้ชัดว่าถูกกำหนดค่าเริ่มต้นเป็น 0 และกำหนดได้ด้วย :)

Python 3, 33 25 ไบต์

เท่าที่ฉันเข้าใจจำนวนเต็ม Pythons เป็นความแม่นยำโดยพลการและprint()สร้างบรรทัดใหม่โดยอัตโนมัติ

ขอบคุณสำหรับ @Jakub และ @ Sp3000 และ @wnnmaw! ฉันไม่รู้จักงูหลามมากนักเพียง แต่ฉันคิดว่าฉันรู้ว่ามันรองรับจำนวนเต็มขนาดโดยพลการ =)

k=1
while 1:print(k);k+=1

กำลังประมวลผล , 95 85 71 ไบต์

java.math.BigInteger i;{i=i.ZERO;}void draw(){println(i=i.add(i.ONE));}

ฉันพยายามบางสิ่งบางอย่างด้วยการวนรอบ แต่มันทำให้การประมวลผลทั้งหมดล้มเหลวดังนั้นฉันจะติดกับเรื่องนี้ในตอนนี้

(ขอบคุณ @ SuperJedi224 และ @TWiStErRob สำหรับคำแนะนำ)

ซามัว 2 ไบต์

N)

คำอธิบาย:

N     push the infinite list [0 1 2 ...] onto the stack
 )    increase by 1

เมื่อเอาต์พุตของโปรแกรมเป็นรายการวงเล็บเหลี่ยมด้านนอกจะถูกตัดออก

JavaScript (ES6), 99 94 67 ไบต์

for(n=[i=0];;)(n[i]=-~n[i++]%10)&&alert([...n].reverse(i=0).join``)

alertเป็นSTDOUTเทียบเท่าที่ยอมรับกันโดยทั่วไปสำหรับ JavaScript แต่การใช้หมายความว่าหมายเลขที่ต่อเนื่องกันจะถูกคั่นโดยอัตโนมัติ ฉันคิดว่าการแสดงผลอักขระหลังจากตัวเลขไม่จำเป็นเพราะสิ่งนี้

Matlab, 132 ไบต์

a=0;while 1;b=a==9;n=find(cumsum(b)-(1:numel(b)),1);a(n)=a(n)+1;a(1:n-1)=0;if ~numel(n);a=[0*a,1];end;disp([a(end:-1:1)+'0','']);end

ตกลงฉันคิดว่านี่เป็นคำตอบแรกที่จริงจังที่ทำให้งานนี้สำเร็จโดยไม่ต้องมีจำนวนเต็มขนาดเล็กน้อย โปรแกรมนี้ใช้จำนวนเต็มขนาดโดยพลการเป็นอาร์เรย์ของจำนวนเต็ม จำนวนเต็มแต่ละค่าจะอยู่ระหว่าง 0 ถึง 9 ดังนั้นองค์ประกอบแต่ละอาร์เรย์จะแทนหนึ่งหลักทศนิยม ขนาดอาร์เรย์ wil 999จะเพิ่มขึ้นโดยหนึ่งเร็วที่สุดเท่าที่เราอยู่ที่เช่น ขนาดหน่วยความจำไม่มีปัญหาที่นี่เนื่องจาก2^128ต้องการอาเรย์ที่มีความยาว 39 เท่านั้น

a=0;
while 1
    b=a==9;
    %first number that is not maxed out
    n=find(cumsum(b)-(1:numel(b)),1);
    %increase that number, and sett all maxed out numbers to zero
    a(n)=a(n)+1; 
    a(1:n-1)=0;
    if ~numel(n) %if we maxed out all entries, add another digit
        a=[0*a,1];
    end    
    disp([a(end:-1:1)+'0',''])%print all digits
end

C ++, 146 141 138 ไบต์

การใช้ไลบรารี bigint มาตรฐานอาจเป็นวิธีที่น่าเบื่อที่สุดในการตอบคำถามนี้ แต่มีบางคนต้องทำ

#include<stdio.h>
#include<boost/multiprecision/cpp_int.hpp>
int main(){for(boost::multiprecision::uint512_t i=1;;){printf("%u\n",i++);}}

Ungolfed:

#include<cstdio>
#include<boost/multiprecision/cpp_int.hpp>

int main()
{
    for(boost::multiprecision::uint512_t i=1;;)
    {
        std::printf("%u\n", i++);
    }
}

เหตุผลที่เวอร์ชั่น golfed ใช้งานstdio.hและไม่ใช่cstdioเพื่อหลีกเลี่ยงการใช้std::เนมสเปซ

นี่เป็นครั้งแรกที่ฉันเล่นกอล์ฟใน C ++ แจ้งให้เราทราบหากมีลูกเล่นใด ๆ

C # .NET 4.0, 111 103 102 97 ไบต์

class C{static void Main(){System.Numerics.BigInteger b=1;for(;;)System.Console.WriteLine(b++);}}

ฉันไม่พบคำตอบ C # ที่นี่ดังนั้นฉันต้องเขียนมัน

.NET 4.0 เป็นสิ่งจำเป็นเพราะมันเป็นรุ่นแรกที่มีBigInteger คุณต้องอ้างอิงSystem.Numerics.dllว่า

ด้วยการเยื้อง:

class C
{
    static void Main()
    {   
        System.Numerics.BigInteger b = 1;
        for (;;)
            System.Console.WriteLine(b++);
    }
}

ขอบคุณ sweerpotato, Kvam, Berend สำหรับการบันทึกบางส่วน

Clojure, 17 ไบต์

(map prn (range))

ลำดับ Lazy และเลขจำนวนเต็มความแม่นยำทำให้เป็นเรื่องง่าย (สำหรับ Haskell และ CL) prnช่วยฉันสักสองสามไบต์เนื่องจากฉันไม่จำเป็นต้องพิมพ์สตริงรูปแบบ doseqอาจจะเป็นสำนวนมากขึ้นเพราะที่นี่เรากำลังเผชิญกับผลข้างเคียงเท่านั้น mapไม่สมเหตุสมผลนักเนื่องจากมันจะสร้างลำดับของnil(ซึ่งเป็นค่าตอบแทนของการprnโทรแต่ละครั้ง

สมมติว่าฉันนับตลอดไปลำดับตัวชี้โมฆะซึ่งเป็นผลมาจากการดำเนินการนี้จะไม่ได้รับคืน

MarioLANG 11 ไบต์

+<
:"
>!
=#

แรงบันดาลใจจากคำตอบของ Martin Büttnerในอีกคำถามหนึ่ง

CJam, 7 ไบต์

0{)_p}h

คำอธิบาย:

0         e# Push a zero to the stack
 {        e# Start a block
  )         e# Increment top of stack
   _        e# Duplicate top of stack
    p       e# Print top of stack
     }    e# End block
      h   e# Do-while loop that leaves the condition on the stack

หมายเหตุ: ต้องใช้ล่าม Java

C, 89 ไบต์

วิธีการใหม่ (ใช้การเพิ่มขึ้นเล็กน้อยใน C):

b[999],c,i;main(){for(;;)for(i=c=0,puts(b);i++<998;)putchar(48+(c?b[i]:(b[i]=c=!b[i])));}

หักกอล์ฟ

int b[999], c, i;
main() {
  for(;;)
    for(i=c=0, puts(b); i++ < 998;)
      putchar(48 + (c ? b[i] : (b[i] = c = !b[i])));
}

ยุติ

รุ่นนี้มีข้อบกพร่องเล็กน้อยซึ่งยังไม่ยุติ (ซึ่งไม่เป็นข้อกำหนดในขณะนี้) ในการทำเช่นนี้คุณจะต้องเพิ่ม 3 ตัวอักษร:

b[129],c=1,i;main(){for(;c;)for(i=c=0,puts(b);i++<128;)putchar(48+(c?b[i]:(b[i]=c=!b[i])));}

Foo , 6 ไบต์

(+1$i)

คำอธิบาย

(    )    Loop
 +1       Add one to current element
   $i     Output current element as a decimal integer

Minkolang , 4 ไบต์

1+dN

ลองที่นี่ (เอาล่ะจริง ๆ ระวังเวลาทำงาน 3 วินาทีก็มากพอที่จะเพิ่มได้ ~ 40,000)

1+เพิ่ม 1 ไปที่ด้านบนสุดของสแต็กdทำซ้ำและNส่งเอาต์พุตด้านบนของสแต็กเป็นจำนวนเต็มที่มีช่องว่างต่อท้าย สิ่งนี้เกิดขึ้นเนื่องจาก Minkolang เป็นแบบ Toroidal ดังนั้นเมื่อตัวนับโปรแกรมปิดขอบขวามันจะปรากฏขึ้นทางด้านซ้าย

ชุดประกอบ Intel 8086+, 19 ไบต์

68 00 b8 1f b9 08 00 31 ff f9 83 15 00 47 47 e2 f9 eb f1

นี่คือรายละเอียด:

68 00 b8                push   0xb800             # CGA video memory
1f                      pop    ds                 # data segment
b9 08 00           L1:  mov    cx, 8              # loop count
31 ff                   xor    di, di             # ds:di = address of number
f9                      stc                       # set carry
83 15 00           L2:  adc    word ptr [di], 0   # add with carry
47                      inc    di
47                      inc    di
e2 f9                   loop   L2
eb f1                   jmp    L1

มันส่งออกหมายเลข 128 บิตที่ตำแหน่งหน้าจอด้านซ้าย 8 ตำแหน่ง ตำแหน่งหน้าจอแต่ละตำแหน่งมีอักขระ ASCII 8 บิตและสี 4 บิตสองสี

หมายเหตุ: มันล้อมรอบที่ 2 ¹²⁸ ; เพียงแค่เปลี่ยน8ในmov cx, 8การ9แสดงหมายเลข 144 บิตหรือแม้กระทั่ง80*25การแสดงตัวเลขได้ถึง 2 32000

วิ่ง

1.44Mb bzip2 ที่ถูกบีบอัด, ภาพฟลอปปี้ base64 ที่เข้ารหัสซึ่งสามารถบูตได้

สร้างภาพฟลอปปี้โดยการคัดลอกวางต่อไปนี้

QlpoOTFBWSZTWX9j1uwALTNvecBAAgCgAACAAgAAQAgAQAAAEABgEEggKKAAVDKGgAaZBFSMJgQa
fPsBBBFMciogikZcWgKIIprHJDS9ZFh2kUZ3QgggEEh/i7kinChIP7HrdgA=

เข้าสู่ commandline นี้:

base64 -d | bunzip2 > floppy.img

และทำงานด้วยเช่น qemu -fda floppy.img -boot a

1.8Mb ที่บูตได้ ISO

นี่คืออิมเมจ ISO แบบบีบอัด b64 แบบฐาน 64 สร้าง iso โดยการวาง

QlpoOTFBWSZTWZxLYpUAAMN/2//fp/3WY/+oP//f4LvnjARo5AAQAGkAEBBKoijAApcDbNgWGgqa
mmyQPU0HqGCZDQB6mQ0wTQ0ZADQaAMmTaQBqekyEEwQaFA0AA0AxBoAAA9Q0GgNAGg40NDQ0A0Bi
BoDIAANNAA0AyAAABhFJNIJiPSmnpMQDJpp6nqeo0ZDQaAANB6IA0NAGj1EfIBbtMewRV0acjr8u
b8yz7cCM6gUUEbDKcCdYh4IIu9C6EIBehb8FVUgEtMIAuvACCiO7l2C0KFaFVABcpglEDCLmQqCA
LTCAQ5EgnwJLyfntUzNzcooggr6EnTje1SsFYLFNW/k+2BFABdH4c4vMy1et4ZjYii1FbDgpCcGl
mhZtl6zX+ky2GDOu3anJB0YtOv04YISUQ0JshGzAZ/3kORdb6BkTDZiYdBAoztZA1N3W0LJhITAI
2kSalUBQh60i3flrmBh7xv4TCMEHTIOM8lIurifMNJ2aXr0QUuLDvv6b9HkTQbKYVSohRPsTOGHi
isDdB+cODOsdh31Vy4bZL6mnTAVvQyMO08VoYYcRDC4nUaGGT7rpZy+J6ZxRb1b4lfdhtDmNwuzl
E3bZGU3JTdLNz1uEiRjud6oZ5kAwqwhYDok9xaVgf0m5jV4mmGcEagviVntDZOKGJeLjyY4ounyN
CWXXWpBPcwSfNOKm8yid4CuocONE1mNqbd1NtFQ9z9YLg2cSsGQV5G3EhhMXKLVC2c9qlqwLRlw4
8pp2QkMAMIhSZaSMS4hGb8Bgyrf4LMM5Su9ZnKoqELyQTaMAlqyQ3lzY7i6kjaGsHyAndc4iKVym
SEMxZGG8xOOOBmtNNiLOFECKHzEU2hJF7GERK8QuCekBUBdCCVx4SDO0x/vxSNk8gKrZg/o7UQ33
Fg0ad37mh/buZAbhiCIAeeDwUYjrZGV0GECBAr4QVYaP0PxP1TQZJjwT/EynlkfyKI6MWK/Gxf3H
V2MdlUQAWgx9z/i7kinChITiWxSo

เข้าไป

base64 -d bunzip2 > cdrom.iso

และกำหนดค่าเครื่องเสมือนให้บู๊ตเครื่อง

DOS .COM

นี่เป็นโปรแกรมเรียกทำงานDOS .COM แบบเข้ารหัส base64 :

aAC4H7kIADH/+YMVAEdH4vnr8Q==

สร้างไฟล์. COM โดยใช้

/bin/echo -n aAC4H7kIADH/+YMVAEdH4vnr8Q== | base64 -d > COUNTUP.COM

และรันใน (ฟรี) DOS

Perl , 34 32 30 28 26 23 ไบต์

-Mbigint -E '{say$_+=1;redo}'

ทดสอบด้วย

perl -Mbigint -E '{say$_+=1;redo}'

Marbelous, 358 ไบต์

..@F..@E..@D..@C..@B..@A..@9..@8..@7..@6..@5..@4..@3..@2..@1..@001@Z01
..AddoAddoAddoAddoAddoAddoAddoAddoAddoAddoAddoAddoAddoAddoAddoAddo/\&I
00&I00&I00&I00&I00&I00&I00&I00&I00&I00&I00&I00&I00&I00&I00&I00&I....@Z
@FHd@EHd@DHd@CHd@BHd@AHd@9Hd@8Hd@7Hd@6Hd@5Hd@4Hd@3Hd@2Hd@1Hd@0Hd
0A@N
..&I
@N/\..
:Hd
}0
Hp
}0
..
{<
#include hex_out.mbl
#include arithmetic.mbl

ผู้ต่อครึ่ง 16 คนถูกล่ามโซ่ไว้ด้วยกันคนที่ถูกต้องที่สุดดำเนินการ N ++ ในแต่ละรอบและแต่ละคนให้อาหารมันล้น (00 หรือ 01) ต่อไปในห่วงโซ่ต่อไป เอาต์พุตอยู่ในรูปแบบเลขฐานสิบหก

python interpreter มีข้อบกพร่องที่เอาต์พุตจากฟังก์ชันที่บันทึกความจำหายไปดังนั้นคุณต้องรันด้วย "-m 0" เพื่อให้มันทำงานได้ หากไม่มีพารามิเตอร์นั้นคุณจะเห็นว่ามันจะทำงานเร็วแค่ไหนโดยไม่มีข้อบกพร่อง แต่เอาต์พุตจะไม่ทำงาน

หมายเหตุถึงตนเอง: แก้ไขข้อผิดพลาดใน marbelous.pyข้อผิดพลาดนี้ได้รับการแก้ไขใน marbelous.py รุ่นล่าสุด

R, 52 ไบต์

a=gmp::as.bigz(1);repeat{cat(paste(a,""));a=a+1}

(หมายเหตุ: gmpเป็นห้องสมุดภายนอกดังนั้นคุณอาจต้องดาวน์โหลดเพื่อให้วิธีนี้ใช้งานได้)

BotEngine, 128 120 112 8x13 = 104

v2 2 01
>e>S SS
   e1e1
   e2 e0 12
   > > S SS P
  ^   <e0e1 R
     ^ < <lC^
^         <

เอาต์พุตอยู่ในรูปแบบไบนารี