मैं स्रोत को दोगुना करता हूं, आप आउटपुट को दोगुना करते हैं!


127

आपका कार्य, यदि आप इसे स्वीकार करना चाहते हैं, तो एक प्रोग्राम लिखना है जो एक सकारात्मक पूर्णांक (0 से अधिक) को आउटपुट करता है। मुश्किल हिस्सा यह है कि अगर मैं आपके स्रोत कोड की नकल करता हूं, तो आउटपुट मूल पूर्णांक से दोगुना होना चाहिए।

नियम

  • आपको एक पूर्ण कार्यक्रम बनाना चाहिए । यानी आपका आउटपुट STDOUT पर प्रिंट करना होगा।

  • प्रारंभिक स्रोत कम से कम 1 बाइट लंबा होना चाहिए।

  • दोनों पूर्णांक आधार 10 में होने चाहिए (किसी अन्य आधार पर या वैज्ञानिक संकेतन के साथ उन्हें निषिद्ध करना)।

  • आपके प्रोग्राम को इनपुट नहीं लेना चाहिए (या अप्रयुक्त, खाली इनपुट) होना चाहिए ।

  • अनुगामी / अग्रणी स्थानों के साथ पूर्णांक को आउटपुट करने की अनुमति है।

  • आप अपने स्रोत की प्रतियों के बीच एक नई पंक्ति नहीं मान सकते हैं।

  • यह , इसलिए प्रत्येक भाषा में सबसे छोटा (मूल) कोड जीत जाता है!

  • डिफ़ॉल्ट ढीले लागू होते हैं।

उदाहरण

मान लीजिए कि आपका स्रोत कोड है ABCऔर उसका संबंधित आउटपुट है 4। यदि मैं ABCABCइसके बजाय लिखता हूं और इसे चलाता हूं , तो आउटपुट होना चाहिए 8

लीडरबोर्ड

यह @ मैनेटवर्क के लेआउट का उपयोग करता है ।


2
@ Mr.Xcoder फिर मुझे बस अपने स्रोत में एक को शामिल करना होगा।
स्टीनबेरग

3
@ Mr.Xcoder मुझे लगता है कि आपको अपना सोर्स कोड पढ़ने से रोकना चाहिए था।
caird coinheringaahing

1
यह केवल एक बार दोगुना होने पर काम करने की आवश्यकता है ? हमें n कई दोहरीकरणों का समर्थन करने की आवश्यकता नहीं है ?
कोडी ग्रे

6
@ दानिएल कहते हैं कि आपका स्रोत `` (खाली कार्यक्रम) है और यह उत्पादन करता है 5। यदि आप इसे दोगुना करते हैं, तो आपका स्रोत `` (खाली कार्यक्रम) है और जो उत्पादन करता है 5, चाहे आप कुछ भी करें। कहा जा रहा है, एक खाली प्रोग्राम अभी भी खाली प्रोग्राम है, और हमेशा एक ही आउटपुट का उत्पादन करता है, केवल उस मामले को छोड़कर जहां खाली प्रोग्राम का मतलब कुछ और होता है (एक यादृच्छिक संख्या जनरेटर, उदाहरण के लिए), जो वैसे भी मान्य नहीं हो सकता है।
श्री एक्सकोडर

1
यह esolangs के लिए कठिन नहीं होना चाहिए जो स्वचालित रूप से प्रोग्राम समाप्ति पर स्टैक के शीर्ष को डंप करता है।
एमडी XF

जवाबों:


152

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

print len(open(__file__).read())#

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

इसे दोगुना करके देखें

पायथन 3 , 28 बाइट्स

print(len(*open(__file__)))#

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

इसे दोगुना करके देखें

व्याख्या

इस का उपयोग कर स्रोत कोड को खोलता है open(__file__)और का उपयोग कर इसकी लंबाई हो जाता पढ़े जाने से रोकता है किसी भी अतिरिक्त कोड। जब स्रोत दोगुना हो जाता है तो लंबाई होती है।len#


28
वाह, मैं स्तब्ध हूँ ... यह बहुत शानदार है!
श्री एक्सकोडर

2
32 बाइट्स । एपेंड मोड का उपयोग करके काम करता है, वर्तमान स्थिति को फ़ाइल के अंत में सेट करता है। tell()फ़ाइल में वर्तमान स्थिति लौटाता है
हैल्वर्ड,

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

@WheatWizard समझ में आता है, मैंने एक अलग जवाब दिया
Halvard Wil

96

जेली , 1 बाइट

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

या यह डबल कोशिश करो!

मुझे नहीं पता कि यह कैसे काम करता है, लेकिन जाहिरा तौर पर यह करता है।


55
वह क्षण जब आपको पता नहीं है कि आपने क्या लिखा है ...
श्री एक्सकोडर

2
डारन, मैंने अभी 8 मिनट बहुत देर से सोचा।
हाइपरएन्यूट्रीनो

17
सभी लिंक्स को एक तर्क की आवश्यकता है। यदि श्रृंखला का पहला तत्व एक निलाद है, तो इसका परिणाम तर्क हो जाता है और लिंक को मौद्रिक रूप से निष्पादित किया जाता है। यदि कोई प्रमुख निलाद नहीं है, तो इसके बजाय 0 का उपयोग किया जाता है।
डेनिस

65

Google शीट, 11 5 बाइट्स

बेनामी वर्कशीट फॉर्मूला जो सेल में कोई इनपुट और आउटपुट नहीं लेता है, जो फॉर्मूला रखता है

=4/(2

एकल सूत्र के रूप में यह एक कॉल स्टैक का मूल्यांकन करता है जो थोड़ा सा दिखता है

=4/(2
=4/(2)
=4/2
=2
2

हालाँकि जब यह वर्कशीट फॉर्मूला दोगुना हो जाता है तो यह कॉल स्टैक नीचे का मूल्यांकन करता है

=4/(2=4/(2
=4/(2=4/(2)
=4/(2=4/(2))
=4/(2=2)
=4/(True)
=4/True
=4/1
=4
4

बेशक, इस पद्धति का उपयोग करने का एक निहितार्थ यह है कि एक बार जब यह एक से अधिक बार दोहराया जाता है, तो तीसरे और समस्या के सभी पुनरावृत्तियों के बाद, कॉल स्टैक तक पहुंच जाएगा =4/(2=4)और इस तरह =4/0एक #DIV/0!त्रुटि का मूल्यांकन और फेंक देगा।

=DIVIDE(4,2सूत्र से दूर बीजगणित पर स्विच करके -6 बाइट्स


18
कभी उम्मीद नहीं थी कि गूगल शीट्स का इस्तेमाल कोड गोल्फ में होगा। चतुर समाधान
hucancode

11
इस बारे में @hucancode वास्तव में दिलचस्प बात यह है कि क्योंकि एक्सेल एक त्रुटि फेंकता है यदि आप अनुगामी को बाहर निकालते हैं तो )यह उत्तर केवल Google शीट्स का उत्तर है जो मैंने देखा है कि एक एक्सेल उत्तर में अनुवाद नहीं होता है
टेलर स्कॉट

45

05AB1E , 2 बाइट्स

मूल

XO

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

दोगुनी

XOXO

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

व्याख्या

X स्टैक से 1 धक्का देता है ।
हे ढेर बोते हैं।


48
XOXO, अच्छा समाधान।
श्री एक्सकोडर

4
आप उद्देश्य पर है, जबकि आप जानते थे कि आप भी इस्तेमाल कर सकते हैं 1O!
एर्ग आउटफोलर

12
आप लोग इन हास्यास्पद भाषाओं को कहाँ पाते हैं?
डेविड जुएल

7
@ दाविद आमतौर पर उन्हें लिखते हैं।
फेडेरिको पोलोनी जूल

3
@ दाविद हां, लोग कोडगुल्फ के लिए भाषा का आविष्कार करते हैं, और हां, वे प्रभावशाली रूप से कम स्कोर प्राप्त कर सकते हैं, लेकिन 1 बाइट में इसे हल करने की चुनौती के बाद एक भाषा का आविष्कार करने जैसी मूर्खतापूर्ण चीजें करना बंद कर दिया जाता है, और इन भाषाओं में प्रोग्रामिंग आमतौर पर बहुत दूर है । आसान।
फल खाना

43

सी (जीसीसी), 37 बाइट्स

i;main(){putchar(i+49);}/*
i=1;//*///

फ़ाइल में अनुगामी न्यूलाइन नहीं है।

सिंटैक्स हाइलाइटिंग के लिए डबल संस्करण,

i;main(){putchar(i+49);}/*
i=1;//*///i;main(){putchar(i+49);}/*
i=1;//*///

TIO लिंक: सिंगल , डबल


3
क्या आप बता सकते हैं कि यह कैसे काम करता है? टिप्पणी कभी भी अनियंत्रित क्यों होगी?
दर्शन २

10
जब आप स्रोत कोड को दोगुना करते हैं, तो /*इसके द्वारा टिप्पणी की जाती है //, जिसका अर्थ है कि निम्नलिखित i=1अपूर्ण है। यह देखना आसान है कि क्या आप वाक्यविन्यास हाइलाइटर में कोड का दोगुना संस्करण डालते हैं
संगीतकार ५२३

1
वाह, एक अस्थायी परिभाषा चाल। अच्छा लगा।
aschepler

39

हेक्सागोनी , 7 बाइट्स

/)!@.).

प्रिंट 1 नियमित रूप से तो 2 दोगुना।

इसे ऑनलाइन आज़माएं! या इसे ऑनलाइन दोगुना करने का प्रयास करें!

विस्तारित संस्करण:

नियमित रूप से:

 / )
! @ .
 ) .

दोगुनी:

  / ) !
 @ . ) .
/ ) ! @ .
 ) . . .
  . . .

नियमित कार्यक्रम पथ का अनुसरण करता है: /)!.@जो एक मेमोरी एज बढ़ाता है (सभी को शून्य से प्रारंभ किया जाता है) फिर इसके संख्यात्मक मान को प्रिंट करता है। दोगुना कार्यक्रम इस प्रकार है: /.)/)!@जो मुद्रण से पहले दो बार बढ़त को बढ़ाता है, बजाय।


6
वाह अच्छा काम। मैं आपको लगता है कि हाथ से पाया? चूँकि 6 बाइट्स ब्रूट फ़ोर्स रेंज में हैं, मैंने सोचा कि मैं इसे जाने दूँगा, और वास्तव में एक 4-बाइट समाधान है: [@!)(और कुछ 570 5-बाइट सॉल्यूशंस)। चूंकि आप वास्तव में हाथ से समाधान खोजने की परेशानी में चले गए थे, इसलिए मैं आपको 4-बाइट समाधान पोस्ट करने के लिए पूरी तरह से खुश हूं।
मार्टिन एंडर

1
यदि आप रुचि रखते हैं, तो यहां पूरी सूची है, जो छपी हुई संख्या सहित है: pastebin.com/TtRujjA4
मार्टिन एंडर

39

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

+1
if id:id=0;print 1

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

दोगुनी:

+1
if id:id=0;print 1+1
if id:id=0;print 1

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


3
पागलपन से रचनात्मक! बधाई!
श्री एक्सकोडर

क्या होगा अगर यह एक लाइनफेट इनबेटन के साथ दोगुना हो जाए?
यति १

36

ब्रिंगोल्फ , 1 बाइट

+

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

अब हम बात कर रहे हैं '!

आउटपुट 20, या 40जब स्रोत दोगुना हो जाता है।

व्याख्या

+ बेशक "योग", "जोड़ें" या "प्लस" ऑपरेटर, ब्रिंगोल्फ में है, हालांकि इसमें डाइएडिक, मोनैडिक और निलाडिक फ़ंक्शन हैं।

जब स्टैक पर कम से कम 2 आइटम होते हैं, तो यह डाइएडिक है, और स्टैक के शीर्ष 2 आइटम का योग करेगा।

जब स्टैक पर केवल 1 आइटम होता है, तो यह मोनैडिक होता है, और आइटम को दोगुना कर देगा।

जब स्टैक पर कोई आइटम नहीं होता है, तो यह नीले रंग का होता है, और 20 को धकेलता है!

यह 20 को क्यों धकेलता है? खैर क्योंकि एक खाली ब्रिंगोल्फ कार्यक्रम बस एक नई रेखा को प्रिंट करता है, और एक नई पंक्ति का ASCII मान 10 है, इसलिए मुझे लगा कि मैं निलादिक +पुश 20 बनाऊंगा, तो ऐसा लगता है कि यह वास्तव में निहित नवद्वीप पर राक्षसी है (भले ही यह बिल्कुल नहीं है सब)

इसलिए:

+   No input
+   Niladic sum, Push 20
    Implicit output

और जब दोगुना हो गया:

++  No input
+   Niladic sum, Push 20
 +  Monadic sum, Double top of stack
    Implicit output

28

हास्केल , 26 18 बाइट्स

main=print$0
 +1--

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

दोगुनी:

main=print$0
 +1--main=print$0
 +1--

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

मुझे चुनौती के ट्रिपल संस्करण का जवाब देते हुए यह संस्करण मिला ।


टिप्पणी के बिना 26 बाइट संस्करण:

main|n<-1,nmain<-2=print n

इसे ऑनलाइन आज़माएं! प्रिंट करता है 1

पैटर्न गार्ड में पहचानकर्ता nको 1और फिर प्रिंट nmainकरने के लिए सेट किया जाता है ।2print n1

दोहरा कार्यक्रम:

main|n<-1,nmain<-2=print nmain|n<-1,nmain<-2=print n

इसे ऑनलाइन आज़माएं! प्रिंट करता है 2

पहले पैटर्न गार्ड में फिर से nकरने के लिए सेट कर दिया जाता 1है और nmainकरने के लिए 2, फिर भी प्रिंट बयान बन गया है print nmain, तो 2छपा है। क्योंकि एक पैटर्न गार्ड में पहचानकर्ता घोषणाएं सच का मूल्यांकन करती हैं, दूसरे पैटर्न गार्ड तक कभी नहीं पहुंचा जा सकता है।


23

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

(1+1)

आउटपुट 2 और (1 + 1) (1 + 1) आउटपुट 4

और निश्चित रूप से (आप में से कई ने पूछा)

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

(2)

1
(2)काम करता है ?
जियोकॉवेल

9
@geokavel 2और एक स्पेस काम करेगा, जैसा कि होगा, +1लेकिन यह ध्यान दिया जाना चाहिए कि ये सभी गणितज्ञ के नोटबुक वातावरण को मानते हैं
मार्टिन एंडर

1
यदि आप इसे opencloud Mathematica Sandbox में चलाते हैं, तो एक एकल स्थान बन जाता है x, जैसे कि 2 आउटपुट 2और वह प्रिंट 4. 2 2 हो जाता 2x2 है। आप इसे वैकल्पिक समाधान के रूप में जोड़ सकते हैं।
मिस्टर एक्सकोडर

2
(2)साथ ही काम करता है।
मिस्टर एक्सकोडर

6
2 साथ ही काम करता है।
एलेफाल्फा

17

ब्रेन-फ्लैक , 6 बाइट्स

({}())

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

व्याख्या

क्या यह बहुत स्पष्ट होना चाहिए। {}स्टैक से एक मूल्य पकड़ता है, जो कि शून्य से शुरू होता है, ()इसमें एक जोड़ता है और (...)मूल्य को धक्का देता है। दूसरे रन पर चूंकि पहले से ही स्टैक पर 1 है तो यह दो बनाने के लिए एक और 1 जोड़ता है। वास्तव में यदि आप कोड को कॉपी करते हैं तो nयह हमेशा आउटपुट होगा n


17

> <> , 7 6 बाइट्स

-1 बाइट टील पेलिकन के लिए धन्यवाद

\ln;
0

इसे ऑनलाइन आज़माएं!
इसे दोगुना करने की कोशिश करो!

व्याख्या

मैंने इस्तेमाल किया, 0लेकिन मैं भी इस्तेमाल कर सकता था 1- 9, a- fक्योंकि वे सभी स्टैक पर एक मूल्य को धक्का देते हैं।

दोगुना नहीं:

\ redirects execution down
0 pushes zero onto stack; STACK: [0]
  (IP wraps around the bottom)
\ redirects execution right
l pushes stack length (1) onto stack; STACK: [0, 1]
n pops off the top value (1) and prints it; STACK: [0]
; end of execution

दोगुनी:

\ redirects execution down
0 pushes zero onto stack; STACK: [0]
0 pushes zero onto stack; STACK: [0, 0]
  (IP wraps around the bottom)
\ redirects execution right
l pushes stack length (2) onto stack; STACK: [0, 0, 2]
n pops off the top value (2) and prints it; STACK: [0, 0]
; end of execution

5
PPCG में आपका स्वागत है! यह एक बहुत अच्छा विचार और अच्छे कोड के साथ एक महान पहला उत्तर है। तुमने मेरा उत्थान किया!
श्री एक्सकोडर

1
मैंने अभी इसका उत्तर देखा है और यह बहुत अच्छा है! युगल पर बहुत अच्छा सुधार> <> जवाब (मेरा सहित!) - यहाँ TIO लिंक पर एक नज़र है; tio.run/##S8sszvj/PyYnz5rLAEL@/w8A - मैंने जो भी किया है, वह 0 से अंतरिक्ष में जाना है और यह 1 बाइट बचाता है। :)
चैले पेलिकन

1
@Tealpelican धन्यवाद! मैं विश्वास नहीं कर सकता कि मैं इस तरह के एक साधारण सुधार से चूक गया। (वास्तव में, मैं उपयोग नहीं कर सकता हूं> <> बहुत अधिक और मैं गोल्फ के लिए नया हूं!) ईमानदार होने के लिए, मैं वास्तव में अन्य समाधानों को विस्तार से नहीं देखता था, मैंने देखा कि वे अपेक्षाकृत बड़े थे और फैसला किया समस्या को गोल्फ से आज़माएं क्योंकि प्रतिस्पर्धा करना आसान होगा।
बोर्का 223

1
अच्छा जवाब! बस यह इंगित करना चाहता था कि यह मेरे क्लेन उत्तर के समान विधि का उपयोग करता है । (मुझ पर नकल करने का आरोप न लगाना अगर किसी को भी था तो बस दो समान उत्तरों की ओर इशारा करना।)
श्रीओटचिलिज्म ओ'जैसिक

14

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


1

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

प्रिंट करता है 2। इसे दोहराते हुए 4

1किसी और काफी कुछ भी साथ प्रतिस्थापित किया जा सकता है।

व्याख्या


1

खाली इनपुट को बदल देता है 1


उन खाली मैचों की संख्या गिनता है 1जिनमें दो हैं (एक से पहले एक 1और उसके बाद एक)।

यदि हम कार्यक्रम को दोगुना करते हैं, तो हमें पहले की तरह एक अतिरिक्त मंच मिलता है। इस बार यह 1प्रारंभिक एक के पहले और बाद में देता है, दे रहा है 111। जब हम अब खाली रेगेक्स के मैचों की संख्या गिनते हैं तो हमें उनमें से चार मिलते हैं।


14

पायथन आरईपीएल, 2 बाइट्स

इसके अलावा पिप, डायलाग एपीएल, जावास्क्रिप्ट, जे और आर में काम करता है

+1

मैं एक TIO बना रहा हूँ अभी मुझे TIO पर काम करने के लिए अजगर का जवाब नहीं मिला


1
+1वास्तव में मैं क्या करूँगा: P लेकिन darn, आप निंजा मुझे एक मिनट के बारे में
बताएंगे

1
यह Dyalog APL में भी काम करता है।
गाय


1
क्या आप इसे और इसे REPL के लिए उपयोग नहीं कर सके ?
आलिशान

1
आपको मेरा +1 है।
फेडेरिको पोलोनी

12

नीम , 1 बाइट

>

बस स्टैक के ऊपर वेतन वृद्धि।

स्टैक को शुरू करने के लिए शून्य की एक अनंत राशि के रूप में कल्पना की जा सकती है, इसलिए यह एक को पाने के लिए शून्य बढ़ाता है, और दोगुना हो जाता है, फिर से दो प्राप्त करने के लिए इसे बढ़ाता है।

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

एक वैकल्पिक समाधान:

1 के बजाय 2 जोड़ता है।


12

जावास्क्रिप्ट, 38 बाइट्स

setTimeout('alert(i)',i=1)/*
i++//*///


setTimeout('alert(i)',i=1)/*
i++//*///setTimeout('alert(i)',i=1)/*
i++//*///


1
अच्छा है! क्या आप बस कर सकते हैं i++?
अरनुलद

@ अरनल्ड: वास्तव में, सुझाव के लिए धन्यवाद!
22o में बेनोइट एसनार्ड

12

जावा 8, 135 118 110 बाइट्स

सिंगल , प्रिंट्स 8

interface T{static void main(String[]a){System.out.print(Byte.SIZE);}}/*
class Byte{static int SIZE=16;}/**///

शंकित , छंद 16

interface T{static void main(String[]a){System.out.print(Byte.SIZE);}}/*
class Byte{static int SIZE=16;}/**///interface T{static void main(String[]a){System.out.print(Byte.SIZE);}}/*
class Byte{static int SIZE=16;}/**///

साक्षात्कार उत्तर, 118 बाइट्स

एकल , प्रिंट 1

interface T{static void main(String[]a){System.out.print(T.class.getResource("B.class")==null?1:2);}}/*
enum B{}/**///

शंकित , २ छापता है

interface T{static void main(String[]a){System.out.print(T.class.getResource("B.class")==null?1:2);}}/*
enum B{}/**///interface T{static void main(String[]a){System.out.print(T.class.getResource("B.class")==null?1:2);}}/*
enum B{}/**///

यह कैसे काम करता है

जावा-कंपाइलर स्रोत फ़ाइल में हर वर्ग के लिए एक एकल फ़ाइल बनाता है। इसलिए मैं बस जांच कर सकता हूं कि क्या B.class नाम का कोई संसाधन मौजूद है।


ऑर्गिनल उत्तर, 135 बाइट्स

एकल , प्रिंट 1

interface T{static void main(String[]a){int i=1;try{Class.forName("B");i=2;}catch(Exception e){}System.out.print(i);}}/*
enum B{}/**///

शंकित , २ छापता है

interface T{static void main(String[]a){int i=1;try{Class.forName("B");i=2;}catch(Exception e){}System.out.print(i);}}/*
enum B{}/**///interface T{static void main(String[]a){int i=1;try{Class.forName("B");i=2;}catch(Exception e){}System.out.print(i);}}/*
enum B{}/**///

आपने टिप्पणी के साथ जो किया वह वास्तव में अच्छा है। लेकिन क्या आपको वास्तव में नई लाइन की आवश्यकता है?
विकरजरामुन

ओह एनवीएम, दूसरी पंक्ति पर एकल पंक्ति टिप्पणी पर ध्यान नहीं दिया
vikarjramun

11

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

print open(__file__,"a").tell()#

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

डबल सोर्स कोड

व्याख्या

यह अपेंड मोड में सोर्स कोड फाइल को खोलता है

open(__file__,"a")

हम फ़ाइल में वर्तमान स्थिति का पता लगाते हैं, यह फ़ाइल के अंत में होगा जो एपेंड मोड में खुलने के कारण होगा

open(__file__,"a").tell()

हम इस लंबाई को प्रिंट करते हैं

print open(__file__,"a").tell()

और एक टिप्पणी जोड़ें, ताकि स्रोत कोड को दोगुना करने से अधिक कोड निष्पादित न हो

print open(__file__,"a").tell()#

9

एक्सेल VBA, 12 बाइट्स

अनाम VBE तत्काल विंडो फ़ंक्शन जो इनपुट और आउटपुट को श्रेणी से लेता है [A1]। सीमा [A1]का डिफ़ॉल्ट मान ""(खाली स्ट्रिंग) है और एक निष्पादन के बाद निम्नलिखित इसे सेट करता है 1और 1बाद के सभी निष्पादन के साथ बढ़ाता है ।

[A1]=[A1+1]:

इनपुट आउटपुट

एकल संस्करण

[A1]=[A1+1]:
?[A1]    ''# display the value of [A1] to the VBE immediate window
 1

डबल संस्करण

[A1]=[A1+1]:[A1]=[A1+1]:
?[A1]    ''# display the value of [A1] to the VBE immediate window
 2

8

जाप , 1 बाइट

Ä

इसे ऑनलाइन आज़माएं!
इसे दोगुना करने की कोशिश करो!
अब भी दोहराता है, भी!

बल्कि साधारण। जेएपी जेएस को ट्रांसपाइल करता है, और Äट्रांसपाइल्स को + 1, इसलिए ÄÄट्रांसपाइल्स को + 1 + 1और इतने पर ट्रांसपाइल्स करता है।


मैं बस उसी चीज़ को पोस्ट करने वाला था É- सौभाग्य से मैंने पहले उत्तरों को स्कैन किया।
शैगी

8

भूसी , 3 बाइट्स

|1"

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

एक मूल विचार, जो मैंने अन्य उत्तरों में देखा है।

व्याख्या

|भूसी में एक "या" ऑपरेटर है जो अपने दूसरे तर्क को लौटाता है यदि वह थ्रस्टी है, अन्यथा पहला तर्क। जब विभिन्न प्रकार के तर्कों पर लागू किया जाता है तो यह सबसे पहले उन सभी को संख्याओं में बदल देता है: स्ट्रिंग्स के लिए परिवर्तन (और सामान्य रूप से सूचीबद्ध) उनकी लंबाई की गणना करके किया जाता है।

मूल कार्यक्रम में हम |1 और एक रिक्त स्ट्रिंग पर लागू होते हैं , जो 0 में परिवर्तित हो जाता है: परिणाम 1 है।

दोहरे कार्यक्रम में हम |1 और स्ट्रिंग पर लागू होते हैं "| 1", जो 2 में परिवर्तित हो जाता है: परिणाम 2 है।



7

सीजाम, 3 बाइट्स

5],

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

सरणी में 5 एनकैप्सुलेट करें। सरणी की लंबाई लौटें। जब आप कोड को डुप्लिकेट करते हैं, तो पहले से दी गई लंबाई, 1, पहले से ही स्टैक पर होती है, इसलिए आपको [1,5] का एक सरणी मिलता है, जो 2% देता है।



7

वम्पस , 4 बाइट्स

" O@

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

" O@" O@

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

सामान्य कोड प्रिंट 32और डबल प्रिंट 64

व्याख्या

"यह काम करता है जैसे कि यह कई अन्य Fungeoids में करता है: यह टॉगल स्ट्रिंग मोड है, जहां प्रत्येक व्यक्तिगत वर्ण कोड को कमांड निष्पादित करने के बजाय स्टैक पर धकेल दिया जाता है। हालांकि, अधिकांश अन्य फ़ंजियोइड्स के विपरीत, वम्पस का प्लेफ़ील्ड चारों ओर नहीं लपेटता है, इसलिए आईपी इसके बजाय अंत को प्रतिबिंबित करेगा और कोड के माध्यम से आगे और पीछे उछाल देगा।

इसलिए एकल कार्यक्रम के लिए, निम्नलिखित कोड वास्तव में निष्पादित किया जाता है:

" O@O " O@

स्ट्रिंग को धक्का देता है 32, 79, 64, 79, 32। फिर अंतरिक्ष कुछ भी नहीं करता है, Oप्रिंट करता है 32, और @कार्यक्रम को समाप्त करता है।

दोहरे कार्यक्रम के लिए, IP को वापस बाउंस करने से पहले स्ट्रिंग को समाप्त कर दिया जाता है, इसलिए कोड केवल एक बार ट्रेस किया जाता है:

" O@" O@

इस समय, स्ट्रिंग धक्का देती है 32, 79, 64, Oप्रिंट करती है 64और @कार्यक्रम को समाप्त करती है।

यह केवल 4-बाइट समाधान प्रतीत होता है।


6

,,,, 2 बाइट्स

1∑

व्याख्या

1∑

1   push 1
 ∑  pop everything and push the sum of the stack

क्या मुझे ऐसा कुछ याद आ रहा है या जो कि एक डबल सोर्स कोड के लिए 3 नहीं होगा?
टेलर स्कॉट

@TaylorScott मुझे क्षमा करें, मुझे ध्यान देना चाहिए कि स्टैक पर मौजूद सभी तत्व पॉप करते हैं।
जुबान 15'17

1
यह बहुत अधिक समझ में आता है - स्पष्टीकरण के लिए धन्यवाद
टेलर स्कॉट

सिग्मा दो बाइट्स हैं, नहीं?
निशांतजेर

1
@nishantjr ,,, अपने स्वयं के कोड पेज का उपयोग करता है, जो हेडर में जुड़ा हुआ है।
आलिशान

6

बैच, 13 बाइट्स

@echo %~z0
:

स्पष्टीकरण: %~z0स्रोत फ़ाइल की लंबाई तक फैलता है, इसलिए फ़ाइल को दोगुना करने से लंबाई दोगुनी हो जाती है। दूसरी पंक्ति एक खाली लेबल को परिभाषित करती है, जो कुछ भी नहीं करती है। जब फ़ाइल दोगुनी हो जाती है, तो @echo %~z0इसके बजाय नाम का एक लेबल बन जाता है , जबकि तीसरी लाइन एक और खाली लेबल होती है।


6

QBasic,  44  28 बाइट्स

नहीं है कोई अंत में न्यू लाइन। 4सिंगल होने पर आउटपुट , 8दोगुना होने पर।

4
READ x,y
?x+y
END
DATA 4,0

व्याख्या

एकल संस्करण के लिए:

  • 4 एक पंक्ति संख्या है।
  • READ x,yसे पहले दो मानों का उपयोग DATAबयान और में उन्हें संग्रहीत करता है xऔर y। इस प्रकार, xहो जाता है 4और yहो जाता है 0
  • ?x+y दो नंबर जोड़ता है और उन्हें प्रिंट करता है।
  • END प्रोग्राम से बाहर निकलता है।

दोगुने संस्करण में, DATAबयान बन जाता है DATA 4,04, जो 4दोनों को असाइन करता है xऔर y, इस प्रकार इसके बजाय x+yसमान बनाता है 8


6

Befunge-98 , 5 बाइट्स

90g.@

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

gफंज-स्पेस में समन्वय (9, 0) पर चरित्र मूल्य प्राप्त करता है; .इसे एक पूर्णांक के रूप में प्रिंट करता है, और @कार्यक्रम को रोक देता है। संयुक्त राष्ट्र के दोहरे संस्करण में, (9, 0) प्रोग्राम की सीमा से बाहर है, और प्रोग्राम के बाहर फ़नगे-स्पेस को किसी स्थान के डिफ़ॉल्ट मान से आरंभ किया जाता है, इसलिए हम 32 को प्रिंट करते हैं। दोगुने संस्करण में, (9, 0) @चरित्र है, इसलिए हम 64 प्रिंट करते हैं।


यह वह नहीं था जो मुझे सबसे अच्छा Befunge-98 उत्तर की तरह देखने की उम्मीद थी ... वास्तव में रचनात्मक जवाब!
MildlyMilquetoast सेप


हमारी साइट का प्रयोग करके, आप स्वीकार करते हैं कि आपने हमारी Cookie Policy और निजता नीति को पढ़ और समझा लिया है।
Licensed under cc by-sa 3.0 with attribution required.