लोगों को गिनो!


30

परिचय

यह अजीब लग सकता है, लेकिन हम से गिनती के लिए एक चुनौती नहीं मिला है 1करने के लिए nसमावेशी,।

यह एक ही बात नहीं है। यह एक (बंद) अच्छी तरह से समझाया नहीं चुनौती है।
यह एक ही बात नहीं है। यह अनिश्चित काल तक की गिनती के बारे में है।

चुनौती

एक प्रोग्राम या फ़ंक्शन लिखें जो हर पूर्णांक 1को nसमावेशी से प्रिंट करता है ।

नियम

  • आपको nकोई भी रास्ता मिल सकता है।
  • आप मान सकते हैं कि nहमेशा एक सकारात्मक पूर्णांक होगा।
  • आप nकिसी भी आधार में प्राप्त कर सकते हैं , लेकिन आपको हमेशा दशमलव में आउटपुट करना चाहिए।
  • आउटपुट को किसी भी वर्ण (या पैटर्न) द्वारा अलग किया जाना चाहिए न कि अंदर 0123456789। गैर-दशमलव अग्रणी या अनुगामी वर्णों को अनुमति दी जाती है (उदाहरण के लिए जैसे सरणियों का उपयोग करते समय [1, 2, 3, 4, 5, 6])।
  • मानक खामियों से इनकार किया जाता है।
  • हम प्रत्येक भाषा में सबसे छोटा दृष्टिकोण ढूंढना चाहते हैं, सबसे छोटी भाषा नहीं, इसलिए मैं किसी भी उत्तर को स्वीकार नहीं करूंगा।
  • इस एडिट के बाद आपको अपना उत्तर अपडेट करना होगा, अंतिम एडिट से पहले पोस्ट किए गए जवाबों में मानक खामियों के बारे में बदलाव के नियम का पालन करना चाहिए (मैं उन्हें अस्वीकार नहीं करना चाहता था, लेकिन मैं समुदाय को दहाड़ना नहीं चाहता था, इसलिए मैंने उन्हें मना किया)।
  • आप किसी भी पोस्ट-डेटिंग भाषा संस्करण (या भाषा) का उपयोग कर सकते हैं। आप इस चुनौती के लिए किसी भी भाषा या भाषा संस्करण का उपयोग नहीं कर सकते।

बोनस

20%

  • आपका प्रोग्राम कम से कम 18446744073709551615( 2^64-1) तक गिनने में सक्षम होना चाहिए । उदाहरण के लिए, यदि एक नया डेटाटाइप बड़े पूर्णांकों का समर्थन करने का एकमात्र तरीका है, तो आपको इसका निर्माण करना होगा। यदि आपकी भाषा में 2 ^ 64-1 तक के विशाल पूर्णांकों का समर्थन करने का कोई तरीका नहीं है, तो इसके बजाय उस विशेष भाषा की ऊपरी सीमा का समर्थन किया जाना चाहिए।

संपादित करें : मैंने अधिक उत्तरों की अनुमति देने के 2^64लिए सीमा को बदल दिया 2^64-1है।

संपादित करें : मैंने 2 ^ 64-1 नियम को एक बोनस बनाया, क्योंकि इस चुनौती में बहुत रुचि नहीं है। यदि आपका उत्तर 2 ^ 64-1 का समर्थन करता है, तो आप अब बोनस को शामिल करने के लिए इसे संपादित कर सकते हैं। इसके अलावा, यदि आप कम है, तो आप इसका समर्थन नहीं करते हुए उत्तर पोस्ट कर सकते हैं।



"आप nकिसी भी तरह से प्राप्त कर सकते हैं ।" इसका मतलब है कि हम nएक चर में बचाया जा सकता है?
flawr

@flawr आप किसी भी तरह से प्राप्त कर सकते हैंnआप इसे एक चर में बचा सकते हैं, लेकिन इसे हार्डकोड नहीं किया जाना चाहिए।
2226 'एरिक आउटलेगर'


@ इफ़्फ़्था हां यह शायद है, यह चुनौती पुराने समय से है जहां मैं बिल्कुल नया था।
एर्गेल आउटफर

जवाबों:


60

मारियोलैंग , 29 बाइट्स

;
)    <
+===="
>:(-[!
=====#

इसे ऑनलाइन आज़माएं!

मुझे पता है कि मेरा कोड दुखद रूप से सुपर-उदास या गुस्सा है:



> :(

हैप्पी मारियोलैंग, 46 बाइट्स

;
)       <
+======="
>  >((-[!
=:)^====#
 ===

इसे ऑनलाइन आज़माएं!

एक खुश दृष्टिकोण:




 :)

गैर-भावनात्मक मारियोलैंग, 41 बाइट्स

;
)     <
+====="
> >(-[!
= "===#
 :!
 =#

इसे ऑनलाइन आज़माएं!


1
अंतिम स्निपेट :!;) में अभी भी भावनाएं हैं ;
कुकी

1
@ क्यूकी उस मामले में आप बहुत सी चीज़ों को इमोटिकॉन के रूप में देख सकते हैं, कुछ कल्पना के साथ, जैसे =#, या >(, या (-[, आदि। इसके अलावा, पता नहीं क्यों, लेकिन जाहिरा तौर पर इमोटिकॉन्स विकिपीडिया पृष्ठ की एक सूची है , जिसमें न तो शामिल है :!और न ही मैंने जिन लोगों का उल्लेख किया है।
केविन क्रूज़सेन

एक अन्य प्रश्न से प्रेरित 19 बाइट्स
डोरियन

28

पायथ, 1 बाइट

S

शरीर में कम से कम 30 अक्षर होने चाहिए; आपने 14 में प्रवेश किया।


2
आप तो कहते हैं? मैं शीर्षक के साथ संघर्ष कर रहा था!
को आउटगोल्फर एरिक

43
ऐसा इसलिए है क्योंकि आप एक स्पष्टीकरण जोड़ने में विफल रहे। बिना स्पष्टीकरण के हमें ऐसे जटिल कोड को कैसे समझना चाहिए?
लुइस मेंडो

10
नाह। यह कोड मेरी समझ से परे है। बहुत लंबा, मैं इस तरह की जटिल तार्किक संरचना को समझ नहीं सकता :-P
लुइस मेंडो

7
@LuisMendo मुझे पता है ... orlp इस तरह के उन्नत तर्क के साथ कोड के इतने लंबे टुकड़े को समझने के लिए एक प्रतिभाशाली व्यक्ति रहा होगा। : पी
हाइपरनेत्रिनो

1
आप अभी भी वर्तमान विजेता हैं!
एर्ग आउटफोलर

16

Cjam, 5 बाइट्स

{,:)}

इसे ऑनलाइन आज़माएं!

यह एक अनाम ब्लॉक है जो nस्टैक पर उम्मीद करता है और उस [1...n]पर सीमा के साथ एक सूची छोड़ देता है।
बस रेंज के साथ निर्माण करके काम करता है ,और फिर :)रेंज को एक-आधारित बनाने के लिए हर रेंज एलिमेंट को बढ़ाता है ।


9
एक स्माइली के लिए +1 जो रहस्यमय तरीके से कोड में दिखाई दिया::)
user48538

1
@ zyabin101 स्माइली फेस एक बहुत ही आम सीजेम घटना है!
एक सीमन्स

4
@ आसमां का समापन Cjam खुश है?
आउटगोल्फर

14

गणितज्ञ, 5 बाइट्स

Range

काफी सरल।


33
सरल नहीं है जब आपको इस भाषा को वहन करने के लिए PAY करना होगा :(
आउटगॉल्फ

1
@ ΥριΈνσταντόποςλο would मैं अब तर्क दूंगा कि अमीर लोगों के लिए यह आसान है, लेकिन आप इस जवाब को 4 बाइट्स से हराने में कामयाब रहे;)
सेबब

@ EʀɪᴋᴛʜᴇGᴏʟғᴇʀ मैं जानता हूँ कि यह आपकी टिप्पणी के बाद एक लंबे समय है, लेकिन आप के लिए भुगतान नहीं करते हैं बर्दाश्त भाषा, आप भुगतान के लिए भाषा।
NoOneIsHere

@NoOneIsHere वहन करने का अर्थ है भुगतान करके किसी चीज़ के स्वामित्व का दावा करना। मुझे लगता है कि आपका मतलब है कि एक बार के भुगतान के बजाय एक सदस्यता है।
आउटगोल्फ

@ E @G payment एक ~ $ 150 एक बार भुगतान है, लेकिन बहस करने के लिए, चलो चैट पर जाएं
NoOneIsHere

14

Hexagony, 19

$@?!{M8.</(=/>').$;

या विस्तारित षट्भुज प्रारूप में:

  $ @ ?
 ! { M 8
. < / ( =
 / > ' ) 
  . $ ;

मार्टिन के लिए बहुत धन्यवाद मूल रूप से इस कार्यक्रम के साथ आने के लिए , मैंने सिर्फ एक पक्ष की लंबाई 3 षट्भुज में फिट होने के लिए इसे गोल्फ दिया।

इसे ऑनलाइन आज़माएं!

मेरे पास टिमवी के शानदार हेक्सागोनी से संबंधित कार्यक्रम नहीं हैं, इसलिए यह स्पष्टीकरण बहुत रंगीन नहीं होगा। इसके बजाय, आपको पाठ का एक बड़ा हिस्सा पढ़ने को मिलता है। क्या यह अच्छा नहीं है?

किसी भी मामले में, आईपी शीर्ष बाएं कोने से शुरू होता है $, पूर्व की ओर, यदि आप कल्पना करते हैं कि इस कार्यक्रम को मानचित्र पर उत्तर की ओर ऊपर की ओर रखा गया है। $हमें अगले अनुदेश को छोड़ने का कारण बनता है, जो @कि कार्यक्रम को समाप्त करेगा। इसके बजाय, हम निष्पादित करते हैं ?जो इनपुट संख्या होने के लिए वर्तमान मेमोरी एज सेट करता है। अब हम पंक्ति के अंत तक पहुँचते हैं, जो हमें षट्भुज की मध्य पंक्ति में ले जाता है, फिर भी पूर्व की ओर बढ़ता है।

कार्यक्रम के बाकी हिस्सों में से अधिकांश एक लूप है। हम शुरुआत करते हैं, .जो कि नो-ऑप है। अगला हम एक कांटा का सामना करते हैं ... उह ... षट्भुज ... <अनुदेश का कारण है कि आईपी 60 डिग्री तक दाईं ओर घूमता है यदि वर्तमान मेमोरी एज सकारात्मक है, अन्यथा हम 60 डिग्री बाएं घूमते हैं। चूंकि हम पूर्व की ओर बढ़ रहे हैं, हम या तो अपने शीर्ष के दक्षिण या उत्तर पूर्व होने के साथ समाप्त होते हैं। चूंकि इनपुट शून्य से अधिक है (और इसलिए सकारात्मक) हम हमेशा दक्षिण पूर्व में जाकर शुरू करते हैं।

इसके बाद हम एक हिट >जो हमें पूर्व की ओर पुनर्निर्देशित करता है; यदि आप कांटा भाग से टकराते हैं तो ये ऑपरेटर केवल कांटा करते हैं। फिर हम हिट करते हैं 'जो कि हम किस मेमोरी एज को देख रहे हैं। फिर हम हिट करते हैं )जो वर्तमान मेमोरी एज के मूल्य को बढ़ाता है। चूंकि सभी मेमोरी एज 0 पर शुरू होते हैं, पहली बार जब हम ऐसा करते हैं, तो हमें 1. का मान मिलता है। इसके बाद हम दूसरी लाइन पर जाते हैं और !अपनी संख्या को प्रिंट करते हैं। फिर हम {10 प्लस 8 (778) द्वारा गुणा किए गए M के ASCII मूल्य को दूसरे किनारे पर ले जाते हैं । फिर हम षट्भुज की दूसरी अंतिम पंक्ति पर वापस आते हैं, और हिट करते हैं /। इससे हम उत्तर पश्चिम की ओर बढ़ते हैं। हम. मध्य पंक्ति पर , और बाहर आते हैं;सबसे नीचे दाईं ओर। यह ASCII के रूप में वर्तमान मेमोरी एज मॉड 256 को प्रिंट करता है। यह एक नई रेखा होती है। हम हिट करते हैं 'जो हमें पहले किनारे पर वापस ले जाता है जिसका मूल्य है जिसे हम पढ़ते हैं। हम हिट करते हैं /जो हमें फिर से पूर्व की ओर जाने के लिए तैयार करता है। फिर हम हिट करते हैं (जो मूल्य को घटाता है। =हमें भविष्य की मेमोरी एज जंपिंग के लिए फिर से सही दिशा का सामना करना पड़ता है।

अब, चूंकि मूल्य सकारात्मक है (जब तक कि यह शून्य नहीं है) हम वापस षट्भुज के तल पर जाते हैं। यहां हम हिट करते हैं .तो हम ;कुछ भी नहीं होने पर कूदते हैं , और हम लूप की शुरुआत में वापस जाते हैं। जब मूल्य शून्य होता है तो हम कार्यक्रम की शुरुआत में वापस जाते हैं, जहां एक ही सामान फिर से होता है, लेकिन ?एक और संख्या खोजने में विफल रहता है, और हम दूसरे ब्रांचिंग पथ को लेते हैं। वह रास्ता अपेक्षाकृत सरल है: हम हिट करते हैं {जो मेमोरी एज को बदल देता है, लेकिन हम अब परवाह नहीं करते हैं, फिर हम हिट करते हैं @जो प्रोग्राम को समाप्त करता है।



11

जीएनयू कोरुटिल्स, 6 बाइट्स

seq $1

शुद्ध बैश का विभाजित उत्तर, नीचे देखें ...


1
मेरे लिए, सबसे अच्छा बैश / आदि उत्तर ^ ^ सही उपकरण-से-नौकरी अनुपात।
ओलिवियर डुलैक

10

आर, 13 बाइट्स

cat(1:scan())

बॉडी में कम से कम 30 अक्षर होने चाहिए।


मैं आपके उत्तर का पालन नहीं कर सकता।
से आउटगोल्फ़र एरिक

@ ΥριΈνσταντόποςλο can आप केवल अपनी वर्तमान प्रतिष्ठा के साथ ही संपादन का सुझाव दे सकते हैं, जिसे अनुमोदित किया जाना है। और कृपया ध्यान दें कि संपादन कोड यहाँ स्वागत नहीं है। यदि आपके पास गोल्फ सलाह है, तो एक टिप्पणी लिखें ताकि लेखक समाधान को अपडेट करने से पहले उसका परीक्षण कर सके।
डेन्कर

@DenkerAffe मेरा मतलब था कि संपादन बटन पहले धूसर हो गया था।
को आउटगोल्फर से एरिक

1
मैं करता हूं अगर मैं चाहता हूं कि जब आप स्क्रिप्ट को बुलाएंगे तो भी इसे लिखना होगा।
मैकलिन्स

9
मुझे लगा कि कैट स्कैन हड्डी की चोटों को देखने, फेफड़ों और छाती की समस्याओं का निदान करने और कैंसर का पता लगाने के लिए सबसे उपयुक्त था, न कि गिनती के लिए।
स्टिव ग्रिफ़िन

10

जावास्क्रिप्ट 182 177 160 154 139 138 138 बाइट्स (वैध)

1 बाइट @ShaunH की बदौलत बचा

n=>{c=[e=0];for(;c.join``!=n;){a=c.length-1;c[a]++;for(;a+1;a--){c[a]+=e;e=0;if(c[a]>9)c[a]=0,e++;}e&&c.unshift(1);alert(c.join``)}}

बचाव के लिए मध्यस्थता सटीक!

क्योंकि जावास्क्रिप्ट केवल 2 ^ 53-1 तक ही गणना कर सकता है (धन्यवाद इसे इंगित करने के लिए @ MartinBüttner पर जाता है), मुझे ऐसा करने के लिए मध्यस्थता सटीक बनाने की आवश्यकता थी। यह एक सरणी में डेटा संग्रहीत करता है, और प्रत्येक "टिक" यह अंतिम तत्व में 1 जोड़ता है, फिर सरणी को गर्त में जाता है, और यदि कुछ 9 से अधिक हो जाता है, तो यह उस तत्व को 0 पर सेट करता है, और बाएं हाथ पर 1 को जोड़ता है।

यहाँ कोशिश करो! नोट: वास्तव में परिणाम देखने के लिए F12 दबाएं, क्योंकि मैं आपको टेक्स्टबॉक्स के लिए इंतजार नहीं करना चाहता था।

BTW .: मैं केवल एक था, जो नहीं जानता था, टेर्गनरी ऑपरेटर कोडगॉल्फ में इतने उपयोगी हैं?

if(statement)executeSomething();

से लंबा है

statement?executeSomething():0;

1 बाइट द्वारा।

जावास्क्रिप्ट, 28 बाइट्स (अमान्य - 2 64 पर भरोसा नहीं कर सकते )

n=>{for(i=0;i++<n;)alert(i)}

2
हां, आप केवल एक थे: पी
एरिक आउटगोल्फर

क्या अमान्य संस्करण 2 ^ 64-1 तक गिना जा सकता है? यदि ऐसा है तो यह नए नियमों के लिए मान्य है।
एरिक आउटगोल्फर

@ ΥριΈνσταντόποςλο, नहीं, केवल 2 ^ 53-1 तक
बैलिंट

अगर किसी के साथ भी &&उपयोगी नहीं हो सकता है, तो बस सहवास के बारे में सावधान रहना चाहिए। condition&&action()
शॉन एच।

1
e?c.unshift(1):0करने के लिए e&&c.unshift(1)एक बाइट की बचत होती है
शॉन एच

9

जावा 8, 43/69/94 बाइट्स

पार किया 44 अभी भी एक नियमित रूप से 44 है - रुको, मैंने इसे पार नहीं किया मैं बस इसे बदल दिया :(

अगर मैं वापस आ सकता हूं LongStream: ( 43 bytes)

n->java.util.stream.LongStream.range(1,n+1)

यह एक लंबोदर है a Function<Long,LongStream>। तकनीकी रूप से, मुझे rangeClosedइसके बजाय उपयोग करना चाहिए range, क्योंकि मैं इस तरह से अपने अधिकतम इनपुट से एक को काट रहा हूं, लेकिन इससे rangeClosedअधिक लंबा है range

अगर मुझे फंक्शन में प्रिंट करना है: ( 69 bytes)

n->java.util.stream.LongStream.range(1,n+1).peek(System.out::println)

यह एक लंबोदर है a Consumer<Long>। तकनीकी peekरूप से मैं गाली दे रहा हूं , क्योंकि यह एक मध्यवर्ती ऑपरेशन है , जिसका अर्थ है कि यह लंबोदर तकनीकी रूप LongStreamसे पहले उदाहरण की तरह लौट रहा है ; मुझे forEachइसके बजाय उपयोग करना चाहिए । फिर से, गोल्फ अच्छा कोड नहीं है।

दुर्भाग्य से, चूंकि longसीमा एक हस्ताक्षरित 64-बिट पूर्णांक है, यह अनुरोध पर नहीं पहुंचती है 2^64-1, लेकिन केवल2^63-1.

However, Java SE 8 provides functionality to treat longs as if they were unsigned, by calling specific methods on the Long class explicitly. Unfortunately, as Java is still Java, this is rather long-winded, though shorter than the BigInteger version that it replaces. (94 bytes)

n->{for(long i=0;Long.compareUnsigned(i,n)<0;)System.out.println(Long.toUnsignedString(++i));}

This is a Consumer<Long>, as the previous.

And just too long to avoid scroll.


2^64-1 limit changed :D
Erik the Outgolfer

1
Shouldn't the first function be n->java.util.stream.LongStream.range(1,n+1)?
Mego

2
@zyabin101 >.> you saw nothing
CAD97

1
@KevinCruijssen It would help, except the reason for using the BigInteger is that using an int (or even long) for the iterator isn't big enough.
CAD97

1
I was mistaken; J8 provides methods for using long in an unsigned manner, so utilizing those is shorter than the BigInteger approach. (It would not have been had we had to implement our own unsigned long treatment as you had to before J8.)
CAD97



7

Haskell, 10 bytes

f n=[1..n]

Usage example: f 4-> [1,2,3,4].


You must not hardcode n, you must take n.
Erik the Outgolfer

4
@ΈρικΚωνσταντόπουλος n isn't hardcoded here - it's a function argument. Haskell syntax can be strange to people used to C-like syntax.
Mego

@Mego Oh, I was confused with the usage example.
Erik the Outgolfer

7

MarioLANG, 19 bytes

;
)<
+"
:[
(-
>!
=#

Try it online!

Vertical programs are usually more golfable for simple loops in MarioLANG. I'm not sure what the interpreter does when encountering [ inside an elevator, but it seems to terminate the program when the current cell is 0. That's probably a useful trick in general.

Explanation

MarioLANG is a Brainfuck-like language (with an infinite memory tape of arbitrary-precision integers) where the instruction pointer resembles Mario walking and jumping around.

Mario starts in the top left corner and falls downward. ; reads an integer from STDIN and places it in the current memory cell. Now note that = is a ground cell for Mario to walk on, the " and # form an elevator (with # being the start) and ! makes mario stop on the elevator so that he doesn't walk off right away. The > and < set his movement direction. We can see that this gives a simple loop, containing the following code:

)   Move memory pointer one cell right.
+   Increment (initially zero).
:   Print as integer, followed by a space.
(   Move memory pointer one cell left.
-   Decrement.
[   Conditional, see below.

Now normally [ would conditionally make Mario skip the next depending on whether the current cell is zero or not. That is, as long as the counter is non-zero this does nothing. However, it seems that when Mario encounters a [ while riding an elevator and the current cell is 0, the program simply terminates immediately with an error, which means we don't even need to find a way to redirect him correctly.


It terminates the program because it "falls" I think.
Erik the Outgolfer

You chose 56 too?
Erik the Outgolfer

@ΈρικΚωνσταντόπουλος I can't seem to find any place Mario falls to. It looks like the interpreter just terminates with an error right at the [, which is actually even more convenient.
Martin Ender

TIO has a tendency not to show error messages (STDERR) without Debug enabled. It seems it is indeed an error.
Erik the Outgolfer

@ΈρικΚωνσταντόπουλος Yeah, and that's actually good, because STDERR is ignored unless specified otherwise.
Martin Ender

6

Joe - 2 or 6

While you can use the inclusive variant of the range function..

1R

..that's boring! Let's instead take the cumulative sum (\/+) of a table of ones of shape n (1~T).

\/+1~T

Can you provide a link to the language
Downgoat




4

dc, 15

?[d1-d1<m]dsmxf

Input read from stdin. This counts down from n, pushing a copy of each numbers to the stack. The stack is then output as one with the f command, so the numbers get printed in the correct ascending order.

Because all the numbers are pushed to the stack, this is highly likely to run out of memory before getting anywhere near 2^64. If this is a problem, then we can do this instead:


dc, 18

?sn0[1+pdln>m]dsmx

Maybe it works with 2^64-1 (the new limit).
Erik the Outgolfer

The first one will run out of memory long before you reach 2^64-1. The second will keep on happily going until our sun goes supernova
Digital Trauma

@DigitalTraumaskcsockso I meant that you can edit your second answer if it's shorter for 2^64-1.
Erik the Outgolfer

@ΈρικΚωνσταντόπουλος dc, like bc, uses arbitrary precision math by default, and thus such boundaries are irrelevant for this language.
Digital Trauma

4

ArnoldC, 415 bytes

IT'S SHOWTIME
HEY CHRISTMAS TREE n
YOU SET US UP 0
GET YOUR ASS TO MARS n
DO IT NOW
I WANT TO ASK YOU A BUNCH OF QUESTIONS AND I WANT TO HAVE THEM ANSWERED IMMEDIATELY
HEY CHRISTMAS TREE x
YOU SET US UP n
STICK AROUND x
GET TO THE CHOPPER x
HERE IS MY INVITATION n
GET DOWN x
GET UP 1
ENOUGH TALK
TALK TO THE HAND x
GET TO THE CHOPPER x
HERE IS MY INVITATION n
GET DOWN x
ENOUGH TALK
CHILL
YOU HAVE BEEN TERMINATED

The only thing of interest is to use n-x (where n is the goal and x the incremented variable) to test the end of the while loop instead of having a dedicated variable, so I end up having n-x and n-(n-x) = x in each loop run

Note: I can only count to 2^31-1. Well I guess the Terminators are not a real danger after all.


3
Of course there is a programming language designed around Arnold Schwarzenegger memes...
Nzall

4

Piet, 64 Codels codelsize 1

With codelsize 20:

codelsize 20

Npiet trace images

First loop:

tracestart

Remaining trace for n=2:

traceend

Notes

  • No Piet answer yet? Let me fix that with my first ever Piet program! This could probably be shorter with better rolls and less pointer manipulation though...

  • The upper supported limit depends on the implementation of the interpreter. It would theoretically be possible to support arbitraryly large numbers with the right interpreter.

  • The delimeter is ETX (Ascii 3), however this cannot be properly displayed in this answer so I'll just leave them out. It works in the console:

enter image description here

Output

Input:  1
Output: 1

Input:  20
Output: 1234567891011121314151617181920

Input:  100
Output: 123456789101112131415161718192021222324252627282930313233343536373839404142434445464748495051525354555657585960616263646566676869707172737475767778798081828384858687888990919293949596979899100

Undefined behaviour:

Input:  -1
Output: 1

Input:  0
Output: 1

Npiet trace for n=2

trace: step 0  (0,0/r,l nR -> 1,0/r,l lB):
action: in(number)
? 2
trace: stack (1 values): 2

trace: step 1  (1,0/r,l lB -> 2,0/r,l nB):
action: push, value 1
trace: stack (2 values): 1 2

trace: step 2  (2,0/r,l nB -> 3,0/r,l nG):
action: duplicate
trace: stack (3 values): 1 1 2

trace: step 3  (3,0/r,l nG -> 4,0/r,l dY):
action: out(number)
1
trace: stack (2 values): 1 2

trace: step 4  (4,0/r,l dY -> 5,0/r,l lY):
action: push, value 1
trace: stack (3 values): 1 1 2

trace: step 5  (5,0/r,l lY -> 6,0/r,l lG):
action: add
trace: stack (2 values): 2 2

trace: step 6  (6,0/r,l lG -> 7,0/r,l lR):
action: duplicate
trace: stack (3 values): 2 2 2

trace: step 7  (7,0/r,l lR -> 10,0/r,l nR):
action: push, value 3
trace: stack (4 values): 3 2 2 2

trace: step 8  (10,0/r,l nR -> 12,0/r,l dR):
action: push, value 2
trace: stack (5 values): 2 3 2 2 2

trace: step 9  (12,0/r,l dR -> 13,0/r,l lB):
action: roll
trace: stack (3 values): 2 2 2

trace: step 10  (13,0/r,l lB -> 14,0/r,l lG):
action: duplicate
trace: stack (4 values): 2 2 2 2

trace: step 11  (14,0/r,l lG -> 15,2/d,r nG):
action: push, value 3
trace: stack (5 values): 3 2 2 2 2

trace: step 12  (15,2/d,r nG -> 15,3/d,r dG):
action: push, value 1
trace: stack (6 values): 1 3 2 2 2 2

trace: step 13  (15,3/d,r dG -> 14,3/l,l lR):
action: roll
trace: stack (4 values): 2 2 2 2

trace: step 14  (14,3/l,l lR -> 13,1/l,r lC):
action: greater
trace: stack (3 values): 0 2 2

trace: step 15  (13,1/l,r lC -> 11,1/l,r nC):
action: push, value 3
trace: stack (4 values): 3 0 2 2

trace: step 16  (11,1/l,r nC -> 10,1/l,r lB):
action: multiply
trace: stack (3 values): 0 2 2

trace: step 17  (10,1/l,r lB -> 9,1/l,r nY):
action: pointer
trace: stack (2 values): 2 2

trace: step 18  (9,1/l,r nY -> 7,1/l,r dY):
action: push, value 2
trace: stack (3 values): 2 2 2

trace: step 19  (7,1/l,r dY -> 6,1/l,r lY):
action: push, value 1
trace: stack (4 values): 1 2 2 2

trace: step 20  (6,1/l,r lY -> 5,1/l,r nM):
action: roll
trace: stack (2 values): 2 2

trace: step 21  (5,1/l,r nM -> 4,1/l,r dM):
action: push, value 3
trace: stack (3 values): 3 2 2

trace: step 22  (4,1/l,r dM -> 3,1/l,r lG):
action: pointer
trace: stack (2 values): 2 2

trace: step 23  (3,1/d,r lG -> 2,3/l,l nG):
action: push, value 3
trace: stack (3 values): 3 2 2

trace: step 24  (2,3/l,l nG -> 2,2/u,r lY):
action: out(char)

trace: stack (2 values): 2 2
trace: white cell(s) crossed - continuing with no command at 2,0...

trace: step 25  (2,2/u,r lY -> 2,0/u,r nB):

trace: step 26  (2,0/u,r nB -> 3,0/r,l nG):
action: duplicate
trace: stack (3 values): 2 2 2

trace: step 27  (3,0/r,l nG -> 4,0/r,l dY):
action: out(number)
2
trace: stack (2 values): 2 2

trace: step 28  (4,0/r,l dY -> 5,0/r,l lY):
action: push, value 1
trace: stack (3 values): 1 2 2

trace: step 29  (5,0/r,l lY -> 6,0/r,l lG):
action: add
trace: stack (2 values): 3 2

trace: step 30  (6,0/r,l lG -> 7,0/r,l lR):
action: duplicate
trace: stack (3 values): 3 3 2

trace: step 31  (7,0/r,l lR -> 10,0/r,l nR):
action: push, value 3
trace: stack (4 values): 3 3 3 2

trace: step 32  (10,0/r,l nR -> 12,0/r,l dR):
action: push, value 2
trace: stack (5 values): 2 3 3 3 2

trace: step 33  (12,0/r,l dR -> 13,0/r,l lB):
action: roll
trace: stack (3 values): 2 3 3

trace: step 34  (13,0/r,l lB -> 14,0/r,l lG):
action: duplicate
trace: stack (4 values): 2 2 3 3

trace: step 35  (14,0/r,l lG -> 15,2/d,r nG):
action: push, value 3
trace: stack (5 values): 3 2 2 3 3

trace: step 36  (15,2/d,r nG -> 15,3/d,r dG):
action: push, value 1
trace: stack (6 values): 1 3 2 2 3 3

trace: step 37  (15,3/d,r dG -> 14,3/l,l lR):
action: roll
trace: stack (4 values): 2 3 2 3

trace: step 38  (14,3/l,l lR -> 13,1/l,r lC):
action: greater
trace: stack (3 values): 1 2 3

trace: step 39  (13,1/l,r lC -> 11,1/l,r nC):
action: push, value 3
trace: stack (4 values): 3 1 2 3

trace: step 40  (11,1/l,r nC -> 10,1/l,r lB):
action: multiply
trace: stack (3 values): 3 2 3

trace: step 41  (10,1/l,r lB -> 9,1/l,r nY):
action: pointer
trace: stack (2 values): 2 3
trace: white cell(s) crossed - continuing with no command at 9,3...

trace: step 42  (9,1/d,r nY -> 9,3/d,l nR):

Does it have null bytes between numbers?
Erik the Outgolfer

@ΈρικΚωνσταντόπουλος what do you mean? In the console, you can see the ETX character (Ascii 3) splitting the outputs, the ETX character cannot be displayed on this site though.
Marv

4

JavaScript (ES6), 77 76 63 59 58 Bytes

n=>{for(s=a=b=0;s!=n;console.log(s=[a]+b))a+=!(b=++b%1e9)}

Takes input n as a string, should support up to 9007199254740991999999999

Explained:

n=>{ //create function, takes n as input
    for( //setup for loop
        s=a=b=0; //init s, a, and b to 0
        s!=n; //before each cycle check if s!=n
        console.log(s=[a]+b) //after each cycle concat a and b into to s and print
    )
        a+=!(b=++b%1e9) //During each cycle set b to (b+1)mod 1e9, if b == 0 and increment a
} //Wrap it all up

Explanation please.
Bálint

2^64-1 is fine I've changed spec.
Erik the Outgolfer

1
Interesting, I didn't think of just concatenating two numbers to reach the minimum value. BTW, you could save a lot of bytes by using two variables instead of an array: n=>{for(a=b="";a+""+b!=n;console.log(a+""+b))++b-1e9||(++a,b=0)}
user81655

Thanks for that @user81655, my brain loves arrays for some reason
Shaun H

1
You can save a byte by changing a+""+b to [a]+b
Bassdrop Cumberwubwubwub

3

GNU bc, 23

n=read()
for(;i++<n;)i

Input read from stdin. bc handles arbitrary precision numbers by default, so the 2^64 max is no problem.


3

Actually, 1 byte

R

Boring builtin is boring. Requires a 64-bit version of Python 3 to get all the way up to 2**64.

Try it online! (due to memory and output length restrictions, the online interpreter can't go very high).

Here's a 5-byte version that doesn't require 64-bit Python 3 and is a little nicer on memory usage:

W;DWX

Try it online! (see above caveats)


@StewieGriffin The issue is with addressable RAM, not integer limits (Python seamlessly transitions between native ints and big integers). I tested it with both 32-bit Python 3 and 64-bit Python 3. 32-bit failed, 64-bit didn't.
Mego

@Mego I have changed the limits, although I don't think 32-bit Python supports 2^64-1, I think it supports up to 2^32-1, so I encourage for the latter to be used in the Python case.
Erik the Outgolfer

Why do you call Seriously Actually?
Erik the Outgolfer

@ΈρικΚωνσταντόπουλος Like I mentioned to Stewie, the issue isn't 64-bit ints, but memory addressing. Because of how inefficient Seriously and Actually are at memory usage, they very quickly exhaust the memory limit of 32-bit processes. And Actually and Seriously are different languages - Actually is the successor to Seriously.
Mego

@Mego Oh, I once clicked a link for Actually and it linked me directly to Seriously.
Erik the Outgolfer

3

Fuzzy-Octo-Guacamole, 7 bytes

^!_[+X]

Explanation:

^ get input to ToS
! set for loop to ToS
_ pop
[ start for loop
+ increment ToS (which aparently happens to be 0)
X print ToS
] end for loop

Also, X works instead of o;, for 7 bytes.
Rɪᴋᴇʀ

Wouldn't that print [n]?
Bald Bantha

rather than n
Bald Bantha

No. : prints the full stack. X is new.
Rɪᴋᴇʀ

Also, another 7 byte solution: ^!$[_;]. $ is range.
Rɪᴋᴇʀ

3

Oration, 31 bytes (non competing)

literally, print range(input())

Is this python with literally, in front of every statement? (Question 2: Pre-dates or post-dates if it's yours? both are acceptable unless you made this for this challenge, in which case it's a loophole)
Erik the Outgolfer

@EʀɪᴋᴛʜᴇGᴏʟғᴇʀ I believe Oration is by ConorO'Brien. github.com/ConorOBrien-Foxx/Assorted-Programming-Languages/tree/… Also, if this language was invented after the challenge, (which it wasn't) it wold be non-competing but still a valid answer. I'm not a big fan of the "Your language must pre-date the challenge" rule. I think if someone invents a 0 or 1 byte solution to a challenge, that's clearly against the rules, but using a new real language should be allowed.
DJMcMayhem

@EʀɪᴋᴛʜᴇGᴏʟғᴇʀ this is what Dr Green Eggs said. I'm actually Easterlyirk's chatbot.
Żáłģó

So no review for you?
NoOneIsHere

@NoOneIsHere what?
Żáłģó

3

QBASIC, 43 bytes

1 INPUT a
2 FOR b=1 TO a
3 PRINT b
4 NEXT b

Do you really need INPUT e;a or INPUT a is enough? I don't see you re-using e.
Erik the Outgolfer

good point, not sure why that was there.
Michelfrancis Bustillos

Also, do you really need the spaces between the line number and letters and between 1 TO?
Erik the Outgolfer

Yes, those are necessary
Michelfrancis Bustillos

What version of QBasic is this? Can you use : between statements instead of a return and a line number? QB4.5 lets me do this: INPUT a: FOR b=1 TO a (\n) ?b:NEXT
steenbergh

3

Cubix, 17 bytes

..U;I0-!@;)wONow!

Try it here

Cubix is a 2D language created by @ETHProductions where the commands are wrapped onto a cube. This program wraps onto a cube with an edge length of 2 as follows.

    . .
    U ;
I 0 - ! @ ; ) w
O N o w ! . . .
    . .
    . .
  • I gets the integer input
  • 0 push 0 to the stack
  • - subtract top items of stack
  • ! if truthy jump the next command @ terminate
  • ; pop the subtraction result from the stack
  • ) increment top of stack
  • w move ip to the right and carry on. This causes it to drop to the next line
  • O output the top of stack as a number
  • N push linefeed (10) to the stack
  • o output a linefeed
  • w move ip to the right and carry on. This causes it to drop to the next face
  • ! because TOS truthy, jump the @ terminate
  • ; pop the linefeed from the stack
  • U uturn to the left onto the - subtraction and resume from there

2

Python 2, 37 33 32 33 bytes

for i in xrange(input()):print-~i

Presumably works up to 2**64 and beyond.

Shot down four bytes thanks to @dieter, and another thanks to @orlp. But apparently, as @Sp3000 found out, range() might have issues with higher values, so the function was changed to xrange(). Note: even xrange() might have issues, at least in 2.7.10.


1
Python 2, to be exact :)
Erik the Outgolfer

33 bytes -> for i in range(input()):print i+1
dieter

2
32 bytes -> for i in range(input()):print-~i
orlp

1
"Presumably works up to 2**64 and beyond." - doubt it in Python 2, but it might with xrange (edit: even xrange might have issues, at least in 2.7.10)
Sp3000

How does -~ work? Edit: I figured it out. Also, nice trick!
Erik the Outgolfer


2

V, 11 Bytes

é1@añYpñdd

Since this contains nasty UTF-8 and unprintables, here is a reversible hexdump:

00000000: e931 4061 f159 7001 f164 64              .1@a.Yp..dd

V is an unfinished language I wrote, but this is working as of commit 19. This answer was a little more verbose than I'd like, but that's mostly because V has no knowledge of integers, only strings. So it's a decent answer! This will work up to 2^64, but it will probably take a very long time.

To make my explanation easier to read/write, I will work with this "Human readable form", which is actually how you would type this in vim.

<A-i>1@a<A-q>Yp<C-a><A-q>dd

Explanation:

'Implicit: register "a" == arg 1, and any generated text is printed. 

<A-i>1                       'Insert a single character: "1"
      @a                     ' "a" times, 
        <A-q>       <A-q>    'Repeat the following:
             Yp<C-a>         'Duplicate the line, and increment it
                         dd  'Delete the last line, since we have one too many.

If loopholes are allowed, here's a shorter version that prints 1 to n, but also prints a 0 (8 bytes):

é0@añYp

And in readable form:

<A-i>1@a<A-q>Yp<C-a>

This is shorter because the <A-q> at the end is implicit, so we don't need it if we don't have to delete the last line.


It can take as long as it wants. Glad to see an answer to work with 2^64, especially with an unfinished language. +1
Erik the Outgolfer

I have changed the limit to 2^64-1 because standard loopholes are disallowed now, and I don't want to cut answers out too much.
Erik the Outgolfer
हमारी साइट का प्रयोग करके, आप स्वीकार करते हैं कि आपने हमारी Cookie Policy और निजता नीति को पढ़ और समझा लिया है।
Licensed under cc by-sa 3.0 with attribution required.