एक सकारात्मक पूर्णांक n उत्पादन को देखते हुए यूरो-iginal अनुक्रम की एन -संख्या।

अनुक्रम की गणना

_{यह अनुक्रम OEIS A242491 के बराबर है ।}

एक संख्या उक्त अनुक्रम का हिस्सा है यदि संख्या को कई अलग-अलग यूरो सिक्कों या नोटों के रूप में उपयोग करके बनाया जा सकता है, लेकिन प्रत्येक में से केवल एक । ध्यान दें कि आपको सेंट पर विचार करने की आवश्यकता नहीं है।

उदाहरण:

6 इस क्रम में होगा, क्योंकि इसमें 1-यूरो सिक्का और 5-यूरो-नोट शामिल हो सकते हैं।

4 अनुक्रम में नहीं होगा, क्योंकि यह दी गई आवश्यकताओं के साथ नहीं बनाया जा सकता है।

हर किसी को एक अवलोकन देने के लिए, आपके द्वारा विचार किए जाने वाले यूरो मूल्यों के साथ एक सूची है:

1 €, 2 €, 5 €, 10 €, 20 €, 50 €, 100 €, 200 €, 500 €

ध्यान दें कि यह क्रम केवल 0 से (हाँ, 0 शामिल है!) से 888 तक है।

इस क्रम के पहले 15 तत्व इस प्रकार हैं:

0, 1, 2, 3, 5, 6, 7, 8, 10, 11, 12, 13, 15, 16, 17 ...

परीक्षण के मामलों

इनपुट -> आउटपुट

2 -> 1
6 -> 6
21 -> 25
33 -> 50

code-golf number sequence

— इयान एच।
स्रोत

सबसे बड़ा संभव इनपुट क्या है? क्या हमारे पास कुछ बड़े परीक्षण मामले हो सकते हैं?

— xnor

3

क्या हम ओईस तालिका कीa(1)=1 तरह सूचकांक कर सकते हैं ?

— xnor

6

क्या हम आत्मसात कर सकते हैं N<=512?

— स्टीवी ग्रिफिन

@xnor यदि यह अभी भी ठीक है 0, तो n=0यह ठीक है।

— इयान एच।

क्या हम 1-अनुक्रमित के बजाय 0-अनुक्रमित परिणाम आउटपुट कर सकते हैं? इसलिए 0->0; 1->1; 5->6; 20->25; 32->50; 511->888इसके बजाय 1->0; 2->1; 6->6; 21->25; 33->50; 512->888।

— केविन क्रूज़सेन

12

जेली , 7 बाइट्स

b8d4ḅ5Ḍ

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

यह काम किस प्रकार करता है

b8d4ḅ5Ḍ  Main link. Argument: n (integer)

b8       Convert n from integer to base 8.
  d4     Divmod each base-8 digit by 4, mapping the digit d to [d / 4, d % 4].
    ḅ5   Convert the quotient-remainder pairs from base 5 to integer, mapping
         [d / 4, d % 4] to (d / 4 * 5 + d % 4).
         The last two steps establish the following mapping for octal digits.
             0 -> [0, 0] -> 0
             1 -> [0, 1] -> 1
             2 -> [0, 2] -> 2
             3 -> [0, 3] -> 3
             4 -> [1, 0] -> 5
             5 -> [1, 1] -> 6
             6 -> [1, 2] -> 7
             7 -> [1, 3] -> 8
      Ḍ  Convert the resulting array of digits from decimal to integer.

— डेनिस
स्रोत

9

पायथन 2 , 32 बाइट्स

lambda n:n+n/4+n/32*10+n/256*100

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

पायथन 2 , 34 बाइट्स

f=lambda n:n and 10*f(n/8)+n%8*5/4

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

— XNOR
स्रोत

मैं आपके गणित को जानने की कोशिश में रहता हूं कि आप अपने समाधान के लिए कैसे आए। आपको वह समाधान कैसे मिला ?

— Ayb4btu

8

भूसी , 8 7 5 बाइट्स

Σ!Ṗİ€

इसे ऑनलाइन आज़माएं! संपादित करें: -3 बाइट्स ज़गरब के लिए धन्यवाद!

   İ€   build-in infinite sequence [1,2,5,10,20,50,100,...]
  Ṗ     power set [[],[1],[2],[1,2],[5],[1,5],[2,5],[1,2,5],...]
 !      index into the list with given input, e.g. 4 yields [1,2]
Σ       take the sum of that list

मैंने सुना है कि यह भविष्य में İ€परिमित अनुक्रम [0.01,0.02,0.05,0.1,0.2,0.5,1,2,5,10,...,500]में बदलने की योजना है । एक बार लागू होने के बाद, निम्नलिखित कोड को 7 की बाइट गणना करनी चाहिए:

Σ!Ṗ↓6İ€

जहां ↓6अनुक्रम के पहले छह तत्वों को गिराता है। इसे ऑनलाइन आज़माएं!

— Laikoni
स्रोत

क्या यह इरादा है कि कार्यक्रम 0आउटपुट में 2 एस जोड़ता है ?

— इयान एच।

Σ!Ṗ↑9İ€एक बाइट को बचाना चाहिए।

— जरगब

@IanH। पहला प्रोग्राम सही आउटपुट का उत्पादन करता है। दूसरा टीआईओ लिंक लागू होने के बाद ही काम करेगा İ€। यह वर्तमान में लौटने के 2500बजाय 25केवल एक संयोग है।

— लकोनी

@Zgarb बहुत बहुत धन्यवाद!

— लकोनी

1

मुझे लगता है कि आप भी निकाल सकते हैं ↑9, के बाद से चुनौती पाठ क्या 512 परे आदानों के लिए होना चाहिए उल्लेख नहीं है

— Zgarb

6

पर्ल 5 , 29 बाइट्स

28 बाइट्स कोड + 1 के लिए -p।

0 आधारित अनुक्रमण का उपयोग करता है।

$_=sprintf"%o",$_;y/4-7/5-8/

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

— डोम हेस्टिंग्स
स्रोत

sprintf"%o",$_-1उदाहरण के लिए 1 से अनुक्रमित अनुक्रम के कारण होना चाहिए , पूरी तरह से 2 -> 1OEIS अनुक्रम 1 से शुरू होता है

— नहुएल फौइउल

यह 0 अनुक्रमणिका का उपयोग प्रश्न के अनुसार अनुमति देता है (या प्रश्न के तहत कम से कम, ओपी टिप्पणियाँ)। मेरे पास -1ओपी को स्पष्ट करने तक का समय था !

— डोम हेस्टिंग्स

5

जेली , 11 बाइट्स

0Df9,4Ṇ$$#Ṫ

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

चैट में बहुत मदद करने के लिए @ आउट्रिकोलर को बहुत धन्यवाद !

व्याख्या

0Df9,4D $ $ # Ṇ - मोनडिक लिंक।

0 # - 0 से शुरू होने वाले पहले एन मैचों को इकट्ठा करें।
 डी - अंक।
  f9,4 - जब कोई भी न हो तो अंकों को 9 या 4. पैदावार [] को फ़िल्टर करें।
      NOT - तार्किक नहीं। [] -> १ (सत्य), गैर-रिक्त सूची -> ० (मिथ्या)।
          Return - पॉप और अंतिम तत्व वापस।

— मिस्टर एक्सकोडर
स्रोत

3

मैथेमेटिका, 47 बाइट्स

(FromDigits/@0~Range~8~Drop~{5}~Tuples~3)[[#]]&

मैथेमेटिका, 48 बाइट्स

Sort[Tr/@Subsets@Join[x={1,2,5},10x,100x]][[#]]&

मार्टिन एंडर से -6 बाइट्स

— J42161217
स्रोत

1

Join[x={1,2,5},10x,100x]और Subsets@।

— मार्टिन एंडर

3

जावा 8, 28 26 बाइट्स

0 अनुक्रमित:

n->n+n/4+n/32*10+n/256*100

पोर्ट ऑफ़ @xnor पायथन 2 उत्तर (जिसका उपयोग हटा दिया गया था, इसलिए नीचे मूल 1-अनुक्रमित उत्तर)।

इसे यहाँ आज़माएँ।

पुराना 1-अनुक्रमित उत्तर ( 28 बाइट्स ):

n->--n+n/4+n/32*10+n/256*100

पोर्ट ऑफ @ पाइथन 2 उत्तर से पहले उन्होंने अपना अंतिम संपादन किया । ~-कई बार झुंड का उपयोग करने के बजाय , यह लंबोदा फ़ंक्शन में प्रवेश करने के बाद 1 सही --nघटने के लिए उपयोग करता है n।

इसे यहाँ आज़माएँ।

— केविन क्रूज़सेन
स्रोत

3

05AB1E , 7 बाइट्स

0 अनुक्रमित।

पोर्ट ऑफ मिस्टर एक्सकोडर्स जेली उत्तर

µN7nÃg_

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

व्याख्या

µ          # loop over increasing N until input matches are found
      _    # the logical negation of
     g     # the length of
 N         # N
  7nÃ      # with only 4s and 9s kept

— Emigna
स्रोत

अच्छा लगा, 05AB1E मेरे एल्गोरिथ्म :-) के लिए सबसे अच्छा उपकरण है। डेनिस का एरीथकॉम्पिक दृष्टिकोण आपको 9 (शायद गोल्फ वाले) बाइट्स मिलेगा: 8в4‰ε5β}J(0-अनुक्रमित)

— श्री एक्सकोडर

@ Mr.Xcoder: मैं 8в4‰J5öJडेनिस की चाल के साथ 8 के लिए था । तुम्हारा बेहतर 05AB1E वास्तव में :) के लिए अनुकूल था :)

— Emigna

2

पायथन 2 , 40 38 36 बाइट्स

Xnor के उत्तर से प्रेरित , लेकिन 1-अनुक्रमण का उपयोग करता है।

lambda n:~-n*5/4+~-n/32*10+n/257*100

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

पायथन 2 , 78 65 62 61 58 56 बाइट्स

lambda i,n=0:f(i+~-('4'in`n`or'9'in`n`),n+1)if i else~-n

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

— TFeld
स्रोत

36 बाइट्स

— श्री Xcoder

क्या कोई कारण है @xnor ने अपना उत्तर हटा दिया, क्योंकि यह मुझे पूरी तरह से मान्य लगता है ..: S

— केविन क्रूज़सेन

1

@KevinCruijssen मैंने इसे अब हटा दिया है कि पूछने वाले ने जवाब दिया कि अनुक्रमण को शिफ्ट करने a(1)=1की अनुमति है।

— xnor

2

जेली , 15 बाइट्स

0 अनुक्रमित।

æ»“£¦®‘×“¢½d‘S+

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

व्याख्या

यह xnor के पायथन समाधान पर आधारित है , जहां एल्गोरिथ्म n + n / 4 + n / 32 * 10 + n / 256 * 100 है ।

lambda n: sum(i * j for i, j in zip([n / i for i in [1, 4, 32, 256]], [1, 1, 10, 100]]))

चूँकि पहला n अनमॉडिफाइड है, यह इस प्रकार है:

lambda n: sum(i * j for i, j in zip([n / i for i in [4, 32, 256]], [1, 10, 100]])) + n

चूंकि 4, 32, और 256 दो की सभी शक्तियां हैं, इसलिए उन्हें थोड़ा सा बदलाव किया जा सकता है।

lambda n: sum(i * j for i, j in zip([n >> i for i in [2, 5, 8]], [1, 10, 100]])) + n

गोल्फ की शुरुआत पायथन में अच्छी तरह से नहीं होती है, लेकिन सूचियों को कोड पेज सूचकांकों के जेली स्ट्रिंग्स में बदलने से जेली की बाइट गिनती कम हो जाती है।

lambda n: sum(i * j for i, j in zip([n >> i for i in map(jelly_codepage.index, '£¦®')], map(jelly_codepage.index, '¢½d'))) + n

जेली , 24 बाइट्स

“¡¿ɼcÞµ³Ṡf2ż’bȷ3ŒPS€Ṣ
ị¢

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

— totallyhuman
स्रोत

1

€आपके कोड में होने के लिए +1 । :) लेकिन -1 क्योंकि यह पहली बार है जब कोई जैली उत्तर मेरे जावा उत्तर से अधिक लंबा है। आप पर XD शर्म करो (और gl & hf इसे आगे बढ़ाना)। ;)

— केविन क्रूज़सेन

1

@ केविनक्रूजसेन यह एलो रेटिंग्स पर कहर बरपाने वाला है ।

— xnor

@KevinCrujissen अब थोड़ा बेहतर है? : पी

— बिलकुल अमानवीय

1

@icrieverytim आपने मेरे नाम से एक टाइपो बनाया, इसलिए मुझे सम्मन नहीं मिला। लेकिन हां, बहुत बेहतर। :) मुझसे १।

— केविन क्रूज़सेन

2

ऑक्टेव , 59 बाइट्स

@(n)unique((dec2bin(0:511)-48)*kron([1 2 5],10.^(0:2))')(n)

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

व्याख्या

कोड पूर्ण अनुक्रम बनाता है और फिर इसमें अनुक्रमित करता है।

सबसे पहले, संख्या के द्विआधारी भाव 0, 1... 511एक 512 × 9 मैट्रिक्स के रूप में उत्पन्न कर रहे हैं:

dec2bin(0:511)-48

( -48भाग की आवश्यकता है क्योंकि परिणाम dec2binवर्णों का है, संख्याओं का नहीं)। यह देता है

0 0 0 0 0 0 0 0 0
0 0 0 0 0 0 0 0 1
...
1 1 1 1 1 1 1 1 1

तब की क्रोनेकर उत्पाद [1 2 5]और [1 10 100]गणना की जाती है

kron([1 2 5],10.^(0:2))

और प्रत्यारोपित किया गया

'

जो 9 × 1 वेक्टर के रूप में नौ संभावित यूरो मान देता है:

मैट्रिक्स को उपरोक्त मैट्रिक्स और वेक्टर में गुणा करना

*

पुनरावृत्ति और अनसोल्ड के साथ अनुक्रम में सभी संभव संख्याओं से युक्त एक 512 × 1 वेक्टर देता है:

डेडुप्लिकेटिंग और सॉर्टिंग

unique(...)

पूर्ण अनुक्रम देता है:

अंत में, इनपुट का उपयोग इस अनुक्रम में अनुक्रमित करने के लिए किया जाता है

(n)

उत्पादन करने के लिए।

— लुइस मेंडो
स्रोत

2

रूबी , 28 27 बाइट्स

->x{("%o"%x).tr"4-7","5-8"}

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

व्याख्या

आउटपुट ऑक्टल स्ट्रिंग, अंकों की जगह 4..7 को 5..8 के साथ

— जीबी
स्रोत

मुझे लगता है कि आप के लिए -1 .tr के बाद अंतरिक्ष निकाल सकते हैं

— नाश्ते

1

बैश + जीएनयू उपयोगिताओं, 20

dc -e8o?p|tr 4-7 5-8

STDIN से एक शून्य-अनुक्रमित सूचकांक पढ़ता है।

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

— डिजिटल आघात
स्रोत

1

05AB1E , 20 बाइट्स

9LD3%n>s3/óTsm*æO{sè

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

1-अनुक्रमित, [(n%3)^2 + 1]*10^floor(n/3)पहले 10 शब्दों को उत्पन्न करने के सूत्र का उपयोग करते हुए, फिर सभी संभावित संयोजनों की गणना करने के लिए पॉवरसेट का उपयोग करके ... फिर मैं इसे सॉर्ट करता हूं और खींचता हूं a[b]।

इसे नीचे क्रिया में देखें:

Full program: 9LD3%n>s3/óTsm*æO{sè
current >> 9  ||  stack: []
current >> L  ||  stack: ['9']
current >> D  ||  stack: [[1, 2, 3, 4, 5, 6, 7, 8, 9]]
current >> 3  ||  stack: [[1, 2, 3, 4, 5, 6, 7, 8, 9], [1, 2, 3, 4, 5, 6, 7, 8, 9]]
current >> %  ||  stack: [[1, 2, 3, 4, 5, 6, 7, 8, 9], [1, 2, 3, 4, 5, 6, 7, 8, 9], '3']
current >> n  ||  stack: [[1, 2, 3, 4, 5, 6, 7, 8, 9], [1, 2, 0, 1, 2, 0, 1, 2, 0]]
current >> >  ||  stack: [[1, 2, 3, 4, 5, 6, 7, 8, 9], [1, 4, 0, 1, 4, 0, 1, 4, 0]]
current >> s  ||  stack: [[1, 2, 3, 4, 5, 6, 7, 8, 9], [2, 5, 1, 2, 5, 1, 2, 5, 1]]
current >> 3  ||  stack: [[2, 5, 1, 2, 5, 1, 2, 5, 1], [1, 2, 3, 4, 5, 6, 7, 8, 9]]
current >> /  ||  stack: [[2, 5, 1, 2, 5, 1, 2, 5, 1], [1, 2, 3, 4, 5, 6, 7, 8, 9], '3']
current >> ó  ||  stack: [[2, 5, 1, 2, 5, 1, 2, 5, 1], [0.3333333333333333, 0.6666666666666666, 1.0, 1.3333333333333333, 1.6666666666666667, 2.0, 2.3333333333333335, 2.6666666666666665, 3.0]]
current >> T  ||  stack: [[2, 5, 1, 2, 5, 1, 2, 5, 1], [0, 0, 0, 1, 1, 1, 2, 2, 2]]
current >> s  ||  stack: [[2, 5, 1, 2, 5, 1, 2, 5, 1], [0, 0, 0, 1, 1, 1, 2, 2, 2], 10]
current >> m  ||  stack: [[2, 5, 1, 2, 5, 1, 2, 5, 1], 10, [0, 0, 0, 1, 1, 1, 2, 2, 2]]
current >> *  ||  stack: [[2, 5, 1, 2, 5, 1, 2, 5, 1], [1, 1, 1, 10, 10, 10, 100, 100, 100]]
current >> æ  ||  stack: [[2, 5, 1, 20, 50, 10, 200, 500, 100]]
current >> O  ||  stack: < OMITTED, THE RESULT OF POWERSET IS HUGE >
current >> {  ||  stack: [[0, 2, 5, 1, 20, 50, 10, 200, 500, 100, 7, 3, 22, 52, 12, 202, 502, 102, 6, 25, 55, 15, 205, 505, 105, 21, 51, 11, 201, 501, 101, 70, 30, 220, 520, 120, 60, 250, 550, 150, 210, 510, 110, 700, 300, 600, 8, 27, 57, 17, 207, 507, 107, 23, 53, 13, 203, 503, 103, 72, 32, 222, 522, 122, 62, 252, 552, 152, 212, 512, 112, 702, 302, 602, 26, 56, 16, 206, 506, 106, 75, 35, 225, 525, 125, 65, 255, 555, 155, 215, 515, 115, 705, 305, 605, 71, 31, 221, 521, 121, 61, 251, 551, 151, 211, 511, 111, 701, 301, 601, 80, 270, 570, 170, 230, 530, 130, 720, 320, 620, 260, 560, 160, 750, 350, 650, 710, 310, 610, 800, 28, 58, 18, 208, 508, 108, 77, 37, 227, 527, 127, 67, 257, 557, 157, 217, 517, 117, 707, 307, 607, 73, 33, 223, 523, 123, 63, 253, 553, 153, 213, 513, 113, 703, 303, 603, 82, 272, 572, 172, 232, 532, 132, 722, 322, 622, 262, 562, 162, 752, 352, 652, 712, 312, 612, 802, 76, 36, 226, 526, 126, 66, 256, 556, 156, 216, 516, 116, 706, 306, 606, 85, 275, 575, 175, 235, 535, 135, 725, 325, 625, 265, 565, 165, 755, 355, 655, 715, 315, 615, 805, 81, 271, 571, 171, 231, 531, 131, 721, 321, 621, 261, 561, 161, 751, 351, 651, 711, 311, 611, 801, 280, 580, 180, 770, 370, 670, 730, 330, 630, 820, 760, 360, 660, 850, 810, 78, 38, 228, 528, 128, 68, 258, 558, 158, 218, 518, 118, 708, 308, 608, 87, 277, 577, 177, 237, 537, 137, 727, 327, 627, 267, 567, 167, 757, 357, 657, 717, 317, 617, 807, 83, 273, 573, 173, 233, 533, 133, 723, 323, 623, 263, 563, 163, 753, 353, 653, 713, 313, 613, 803, 282, 582, 182, 772, 372, 672, 732, 332, 632, 822, 762, 362, 662, 852, 812, 86, 276, 576, 176, 236, 536, 136, 726, 326, 626, 266, 566, 166, 756, 356, 656, 716, 316, 616, 806, 285, 585, 185, 775, 375, 675, 735, 335, 635, 825, 765, 365, 665, 855, 815, 281, 581, 181, 771, 371, 671, 731, 331, 631, 821, 761, 361, 661, 851, 811, 780, 380, 680, 870, 830, 860, 88, 278, 578, 178, 238, 538, 138, 728, 328, 628, 268, 568, 168, 758, 358, 658, 718, 318, 618, 808, 287, 587, 187, 777, 377, 677, 737, 337, 637, 827, 767, 367, 667, 857, 817, 283, 583, 183, 773, 373, 673, 733, 333, 633, 823, 763, 363, 663, 853, 813, 782, 382, 682, 872, 832, 862, 286, 586, 186, 776, 376, 676, 736, 336, 636, 826, 766, 366, 666, 856, 816, 785, 385, 685, 875, 835, 865, 781, 381, 681, 871, 831, 861, 880, 288, 588, 188, 778, 378, 678, 738, 338, 638, 828, 768, 368, 668, 858, 818, 787, 387, 687, 877, 837, 867, 783, 383, 683, 873, 833, 863, 882, 786, 386, 686, 876, 836, 866, 885, 881, 788, 388, 688, 878, 838, 868, 887, 883, 886, 888]]
current >> s  ||  stack: [[0, 1, 2, 3, 5, 6, 7, 8, 10, 11, 12, 13, 15, 16, 17, 18, 20, 21, 22, 23, 25, 26, 27, 28, 30, 31, 32, 33, 35, 36, 37, 38, 50, 51, 52, 53, 55, 56, 57, 58, 60, 61, 62, 63, 65, 66, 67, 68, 70, 71, 72, 73, 75, 76, 77, 78, 80, 81, 82, 83, 85, 86, 87, 88, 100, 101, 102, 103, 105, 106, 107, 108, 110, 111, 112, 113, 115, 116, 117, 118, 120, 121, 122, 123, 125, 126, 127, 128, 130, 131, 132, 133, 135, 136, 137, 138, 150, 151, 152, 153, 155, 156, 157, 158, 160, 161, 162, 163, 165, 166, 167, 168, 170, 171, 172, 173, 175, 176, 177, 178, 180, 181, 182, 183, 185, 186, 187, 188, 200, 201, 202, 203, 205, 206, 207, 208, 210, 211, 212, 213, 215, 216, 217, 218, 220, 221, 222, 223, 225, 226, 227, 228, 230, 231, 232, 233, 235, 236, 237, 238, 250, 251, 252, 253, 255, 256, 257, 258, 260, 261, 262, 263, 265, 266, 267, 268, 270, 271, 272, 273, 275, 276, 277, 278, 280, 281, 282, 283, 285, 286, 287, 288, 300, 301, 302, 303, 305, 306, 307, 308, 310, 311, 312, 313, 315, 316, 317, 318, 320, 321, 322, 323, 325, 326, 327, 328, 330, 331, 332, 333, 335, 336, 337, 338, 350, 351, 352, 353, 355, 356, 357, 358, 360, 361, 362, 363, 365, 366, 367, 368, 370, 371, 372, 373, 375, 376, 377, 378, 380, 381, 382, 383, 385, 386, 387, 388, 500, 501, 502, 503, 505, 506, 507, 508, 510, 511, 512, 513, 515, 516, 517, 518, 520, 521, 522, 523, 525, 526, 527, 528, 530, 531, 532, 533, 535, 536, 537, 538, 550, 551, 552, 553, 555, 556, 557, 558, 560, 561, 562, 563, 565, 566, 567, 568, 570, 571, 572, 573, 575, 576, 577, 578, 580, 581, 582, 583, 585, 586, 587, 588, 600, 601, 602, 603, 605, 606, 607, 608, 610, 611, 612, 613, 615, 616, 617, 618, 620, 621, 622, 623, 625, 626, 627, 628, 630, 631, 632, 633, 635, 636, 637, 638, 650, 651, 652, 653, 655, 656, 657, 658, 660, 661, 662, 663, 665, 666, 667, 668, 670, 671, 672, 673, 675, 676, 677, 678, 680, 681, 682, 683, 685, 686, 687, 688, 700, 701, 702, 703, 705, 706, 707, 708, 710, 711, 712, 713, 715, 716, 717, 718, 720, 721, 722, 723, 725, 726, 727, 728, 730, 731, 732, 733, 735, 736, 737, 738, 750, 751, 752, 753, 755, 756, 757, 758, 760, 761, 762, 763, 765, 766, 767, 768, 770, 771, 772, 773, 775, 776, 777, 778, 780, 781, 782, 783, 785, 786, 787, 788, 800, 801, 802, 803, 805, 806, 807, 808, 810, 811, 812, 813, 815, 816, 817, 818, 820, 821, 822, 823, 825, 826, 827, 828, 830, 831, 832, 833, 835, 836, 837, 838, 850, 851, 852, 853, 855, 856, 857, 858, 860, 861, 862, 863, 865, 866, 867, 868, 870, 871, 872, 873, 875, 876, 877, 878, 880, 881, 882, 883, 885, 886, 887, 888]]
current >> è  ||  stack: [[0, 1, 2, 3, 5, 6, 7, 8, 10, 11, 12, 13, 15, 16, 17, 18, 20, 21, 22, 23, 25, 26, 27, 28, 30, 31, 32, 33, 35, 36, 37, 38, 50, 51, 52, 53, 55, 56, 57, 58, 60, 61, 62, 63, 65, 66, 67, 68, 70, 71, 72, 73, 75, 76, 77, 78, 80, 81, 82, 83, 85, 86, 87, 88, 100, 101, 102, 103, 105, 106, 107, 108, 110, 111, 112, 113, 115, 116, 117, 118, 120, 121, 122, 123, 125, 126, 127, 128, 130, 131, 132, 133, 135, 136, 137, 138, 150, 151, 152, 153, 155, 156, 157, 158, 160, 161, 162, 163, 165, 166, 167, 168, 170, 171, 172, 173, 175, 176, 177, 178, 180, 181, 182, 183, 185, 186, 187, 188, 200, 201, 202, 203, 205, 206, 207, 208, 210, 211, 212, 213, 215, 216, 217, 218, 220, 221, 222, 223, 225, 226, 227, 228, 230, 231, 232, 233, 235, 236, 237, 238, 250, 251, 252, 253, 255, 256, 257, 258, 260, 261, 262, 263, 265, 266, 267, 268, 270, 271, 272, 273, 275, 276, 277, 278, 280, 281, 282, 283, 285, 286, 287, 288, 300, 301, 302, 303, 305, 306, 307, 308, 310, 311, 312, 313, 315, 316, 317, 318, 320, 321, 322, 323, 325, 326, 327, 328, 330, 331, 332, 333, 335, 336, 337, 338, 350, 351, 352, 353, 355, 356, 357, 358, 360, 361, 362, 363, 365, 366, 367, 368, 370, 371, 372, 373, 375, 376, 377, 378, 380, 381, 382, 383, 385, 386, 387, 388, 500, 501, 502, 503, 505, 506, 507, 508, 510, 511, 512, 513, 515, 516, 517, 518, 520, 521, 522, 523, 525, 526, 527, 528, 530, 531, 532, 533, 535, 536, 537, 538, 550, 551, 552, 553, 555, 556, 557, 558, 560, 561, 562, 563, 565, 566, 567, 568, 570, 571, 572, 573, 575, 576, 577, 578, 580, 581, 582, 583, 585, 586, 587, 588, 600, 601, 602, 603, 605, 606, 607, 608, 610, 611, 612, 613, 615, 616, 617, 618, 620, 621, 622, 623, 625, 626, 627, 628, 630, 631, 632, 633, 635, 636, 637, 638, 650, 651, 652, 653, 655, 656, 657, 658, 660, 661, 662, 663, 665, 666, 667, 668, 670, 671, 672, 673, 675, 676, 677, 678, 680, 681, 682, 683, 685, 686, 687, 688, 700, 701, 702, 703, 705, 706, 707, 708, 710, 711, 712, 713, 715, 716, 717, 718, 720, 721, 722, 723, 725, 726, 727, 728, 730, 731, 732, 733, 735, 736, 737, 738, 750, 751, 752, 753, 755, 756, 757, 758, 760, 761, 762, 763, 765, 766, 767, 768, 770, 771, 772, 773, 775, 776, 777, 778, 780, 781, 782, 783, 785, 786, 787, 788, 800, 801, 802, 803, 805, 806, 807, 808, 810, 811, 812, 813, 815, 816, 817, 818, 820, 821, 822, 823, 825, 826, 827, 828, 830, 831, 832, 833, 835, 836, 837, 838, 850, 851, 852, 853, 855, 856, 857, 858, 860, 861, 862, 863, 865, 866, 867, 868, 870, 871, 872, 873, 875, 876, 877, 878, 880, 881, 882, 883, 885, 886, 887, 888], '32']
50
stack > [50]

— जादू ऑक्टोपस Urn
स्रोत

0

जावास्क्रिप्ट (ईएस 6), 34 बाइट्स

n=>--n+(n>>2)+(n>>5)*10+(n>>8)*100

या सही 0-अनुक्रमण का उपयोग करके 32 बाइट्स:

f=
n=>n+(n>>2)+(n>>5)*10+(n>>8)*100

<input type=number min=0 max=511 value=0 oninput=o.textContent=f(+this.value)><pre id=o>0

स्निपेट का विस्तार करें

— नील
स्रोत

2

नहीं n=1देना चाहिए 0?

— --b4btu

0

जेली , 20 बाइट्स

53b6×þ“¢½d‘FŒPS€Ṣị@‘

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

मुझे पता है कि यह मौजूदा उत्तर से अधिक लंबा है, लेकिन मुझे लगता है कि यह दृष्टिकोण यहां से गोल्फ है: पी

-2 बाइट्स एग्री द आउटग्रॉफ़र के लिए धन्यवाद

— HyperNeutrino
स्रोत

1,10,ȷ2->“¢½d‘

— आउटगॉल्फ

@EriktheOutgolfer ओह धन्यवाद!

— हाइपरएन्यूट्रीनो

0

रेटिना , 42 बाइट्स

.+
$*1;
+`(1+)\1{7}
$1;
1111
1$&
(1*);
$.1

इसे ऑनलाइन आज़माएं! लिंक में परीक्षण के मामले शामिल हैं। 0 अनुक्रमित। स्पष्टीकरण:

.+
$*1;

एक ;प्रत्यय के साथ दशमलव से अकारण परिवर्तित करें ।

+`(1+)\1{7}
$1;

अष्टक में परिवर्तित करें, लेकिन अभी भी ;प्रत्येक एकात्मक मान के साथ अंकों के एकात्मक प्रतिनिधित्व का उपयोग कर रहे हैं ।

1111
1$&

मान 4-7 में 1 जोड़ें।

(1*);
$.1

प्रत्येक मान को उसके प्रत्यय को दशमलव में बदलें।

— नील
स्रोत

0

पायथ , 12 बाइट्स

डेनिस की जादू टोना का उपयोग करता है ।

jkiR5.DR4jQ8

इसे यहाँ आज़माएँ।

पायथ , 16 15 13 बाइट्स

e.f!@,9 4jZTt

सभी परीक्षण मामलों की जाँच करें।

कुछ विचारों के लिए एगर द आउटगॉफ़र का धन्यवाद ।

— मिस्टर एक्सकोडर
स्रोत

0

सी , 67 बाइट्स

main(n){scanf("%d",&n);printf("%d",n+(n>>2)+(n>>5)*10+(n>>8)*100);}

नील के जावास्क्रिप्ट उत्तर से एक सीधा बंदरगाह , लेकिन मुझे लगा कि इसे पूर्णता के लिए जोड़ा जाना चाहिए।

जीसीसी संस्करण 6.3.0 पर परीक्षण किया गया। यह कुछ चेतावनी फेंक देगा, लेकिन वैसे भी संकलित करें।

— माथियस एवलर
स्रोत

एक यूरो-आइगिनल सीक्वेंस

अनुक्रम की गणना

परीक्षण के मामलों

जेली , 7 बाइट्स

यह काम किस प्रकार करता है

पायथन 2 , 32 बाइट्स

पायथन 2 , 34 बाइट्स

भूसी , 8 7 5 बाइट्स

पर्ल 5 , 29 बाइट्स

जेली , 11 बाइट्स

व्याख्या

मैथेमेटिका, 47 बाइट्स

मैथेमेटिका, 48 बाइट्स

जावा 8, 28 26 बाइट्स

05AB1E , 7 बाइट्स

पायथन 2 , 40 38 36 बाइट्स

पायथन 2 , 78 65 62 61 58 56 बाइट्स

जेली , 15 बाइट्स

व्याख्या

जेली , 24 बाइट्स

ऑक्टेव , 59 बाइट्स

व्याख्या

रूबी , 28 27 बाइट्स

व्याख्या

बैश + जीएनयू उपयोगिताओं, 20

05AB1E , 20 बाइट्स

जावास्क्रिप्ट (ईएस 6), 34 बाइट्स

जेली , 20 बाइट्स

रेटिना , 42 बाइट्स

पायथ , 12 बाइट्स

पायथ , 16 15 13 बाइट्स

सी , 67 बाइट्स