एक तोता कार्यक्रम बनाएँ


15

एक इनपुट को देखते हुए, आउटपुट जो इनपुट के बाद एक नई लाइन के साथ आता है।

इनपुट एक स्ट्रिंग होगा जिसमें केवल मुद्रण योग्य ASCII वर्ण ( 0x20-0x7E) और newlines ( 0x0A) होंगे।

यदि इनपुट लंबाई 0 है, तो अंतहीन रूप से आउटपुट नईलाइन्स।

यह प्रत्येक भाषा की जीत में इतना कम बाइट्स है !




@VoteToClose मुझे पता था कि मैंने इससे पहले उत्तर दिया है ..
L3viathan

Microsoft, 1 स्टीव बाल्मर - डेवलपर्स, डेवलपर्स, डेवलपर्स, डेवलपर्स, ...
सेरगिओल

जवाबों:


13

लानत है, 10 मिनट देर से! लेकिन यह नई कहानियों के रूप में नई रूपरेखाओं को नहीं छापता है।
phil294

क्षमा करें, मुझे yes-newlines से कोई मतलब नहीं था, लेकिन इनपुट में शामिल किए जा सकने वाले किसी भी नए समाचार को इसके बजाय मुद्रित किया जाता है \n। इस बात पर निर्भर करता है कि आप प्रश्न कैसे पढ़ते हैं: D
phil294

@ बहलोहिन ओह मैं इस हिस्से को गलत समझ रहा हूं: /। ./script $'Hello\n World'वास्तविक न्यूलाइन्स को शामिल करने के लिए आपको इसे कॉल करने की आवश्यकता है। TIO पर आप कमांड लाइन तर्क के लिए एक नई पंक्ति जोड़ सकते हैं
ओवर्स

1
क्या उद्धरण आवश्यक हैं? yes $1मेरे लिए ठीक काम करता है
DrnglVrgs

2
@DrnglVrgs यह मेरे लिए एक खाली इनपुट के लिए काम नहीं करता है
Ov

9

क्यों नहीं कर रहे हैं [I,?
FrodCube

@FrodCube: क्योंकि दुर्भाग्य से जो खाली इनपुट के साथ काम नहीं करता है :(
Emigna

@FrodCube: वास्तव में, प्रश्न में लंबाई का इनपुट 0 है और खाली इनपुट नहीं है इसलिए मैं इसे कम कर सकता हूं :)
एमिग्ना

1
@FrodCube: हाँ, यह 05AB1E में वास्तव में एक बहुत नई सुविधा है। मुझे यकीन है कि ओम को अंततः यह भी मिलेगा।
इमीना

10
[=भी काम करता है और एक स्माइली चेहरा है; मुस्कान ही एकमात्र लाभ है।
मैजिक ऑक्टोपस Urn


5

ओम , 3 बाइट्स

∞┼,

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

यह एक खाली इनपुट के साथ काम नहीं करता है क्योंकि अन्य भाषाओं की तुलना में ओहम इनपुट हैंडलिंग में खराब है, लेकिन आप "" इनपुट कर सकते हैं।

व्याख्या

∞     Infinite loop next code (until ";" or end of line)
 ┼    Get first input
  ,   Println

यह अच्छा लग रहा है ... क्या आप इसे समझा सकते हैं: D
बीटा डेके

@ बेताडे ने किया!
फ्रॉडक्यूब

1
FYI करें, ओम v2 (उम्मीद है कि जल्द-ईश आ रहा है) में पहले से बेहतर इनपुट हैंडलिंग होगी!
निक क्लिफर्ड

@NickClifford शांत! मैं अब आगे की तरफ़ देख रहा हूं! मुझे आपकी भाषा पसंद है
FrodCube

1
Oooo ... क्या ओम अलग कमांड्स के साथ 05AB1E है ?! धीरे-धीरे GitHub के पन्नों को पढ़ना शुरू कर देता है
मैजिक ऑक्टोपस Urn

5

सेड, ५

:      # label (unnamed) 
p      # print the pattern space
b      # branch back to the label

लेबल लेबल sed में एक अनिर्दिष्ट "सुविधा" है जो संस्करण 4.2.2 के साथ काम करता है, लेकिन भविष्य के संस्करणों में काम नहीं कर सकता है।





4

वी , 2 बाइट्स

òÙ

आप स्पष्ट कारणों से इसके लिए ऑनलाइन प्रयास नहीं कर सकते।

ò    'Recursively
 Ù   'Duplicate the current line downwards

TIO वास्तव में 60 सेकंड के लिए चलता है और समाप्त होता है और STDOUT तक प्रिंट करता है जब तक कि समाप्ति बिंदु पहले 128KiB तक नहीं पहुंच जाती है।
मैजिक ऑक्टोपस Urn

1
में Vक्योंकि उत्पादन यह एक nvim सत्र के अंदर, और STDOUT करने के लिए मुद्रित नहीं है जब तक यह खत्म, TIO सत्र को मारता है और STDOUT पर कुछ भी नहीं देखता है। मुझे नहीं पता था कि आपने क्या कहा, लेकिन दुर्भाग्य से यह वी
nmjcman101

1
आह ... यह दुर्भाग्यपूर्ण है, मैं वी के गुणों को भूल गया, मैंने केवल एक बार असफल रूप से इसका उपयोग किया है।
मैजिक ऑक्टोपस Urn

3

रूबी, 18 17 12 + 2 = 14 बाइट्स

-nझंडे के साथ भागो ।

loop{$><<$_}

संपादित करें: -nध्वज के लिए @ सेथ्रिन के लिए धन्यवाद !


-nध्वज का उपयोग करें और छोड़ें gets
canhascodez

@ सेथ्रिन एक अच्छा! मुझे इस झंडे के बारे में पता नहीं था!
पीटर लेनकेफी

3

AutoHotkey , 20 बाइट्स

ओपी ने यह निर्दिष्ट नहीं किया कि आउटपुट कैसे होना चाहिए, केवल यह कहा कि इसके बाद एक नई रेखा के साथ अंतहीन रूप से घटित होना है। AHK cmd इंटरैक्शन के लिए अनुरूप नहीं था। इसलिए ToolTipमाउस की पोजिशन में आउटपुट बार-बार होता है :

टूलटिप

loop
tooltip,%1%`n`n

मुझे AHK की loopसुविधा पसंद है । loopअगले ब्लॉक को हमेशा के लिए दोहराता है, loop, 10इसे 10 बार दोहराएगा। कभी-कभी मुझे पायथन जैसी अन्य भाषाओं में यह सुविधा याद आती है।

AutoHotkey में भागने का चरित्र है ` (इसलिए विंडोज पाथ में बैकस्लैश की कोई समस्या नहीं है)। किसी कारण से, एक अनुगामी न्यूलाइन को अनदेखा कर दिया जाता है, इसलिए इसकी दो बार आवश्यकता होती है। ( trayTipयह "बग" नहीं हो सकता है लेकिन मैं इसे परीक्षण नहीं कर सकता क्योंकि शराब के साथ चल रहा है)

पुराना उत्तर:

loop
msgbox,%1%

मुझे बस एहसास हुआ कि ओपी शायद इस समाधान की तरह नहीं होगा, आउटपुट उपयोगकर्ता-इंटरैक्शन के साथ होता है और इसमें कोई नया अंक नहीं होता है। मैं दूसरे रास्ते की तलाश करूंगा।


1
ठीक है, आपने एक रचनात्मक समाधान के लिए मेरा
उत्थान किया है


2

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

s=input()
while 1:print s

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

इनपुट एक पायथन शाब्दिक होने की उम्मीद है (एक स्ट्रिंग के लिए उद्धरण, वर्ग ब्रैकेट या कोष्ठक या कोष्ठक के साथ कोष्ठक एक सूची / ट्यूपल, आदि के लिए अलग-अलग आइटम)

पायथन 3 +1 बाइट होगा क्योंकि printएक फ़ंक्शन है, लेकिन यह भी raw_input()पायथन 2 के लिए 4-बाइट पेनल्टी के बिना कच्चे इनपुट कर सकता है ।




2

हास्केल, 14 बाइट्स

cycle.(++"\n")

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

इनपुट के लिए एक नई रूपरेखा जोड़ें और इसकी अनंत प्रतियों की सूची बनाएं।

वैकल्पिक संस्करण, 14 बाइट्स:

unlines.repeat

वैकल्पिक संस्करण काफी सुरुचिपूर्ण है :)
कॉनर ओ'ब्रायन


2

सी, 24 बाइट्स

f(char*s){puts(s),f(s);}

मूल रूप से एक पुनरावर्ती फ़ंक्शन जो स्वयं को फिर से कॉल करने से पहले स्ट्रिंग को आउटपुट करता है। कोडगुल्फ़ पर इसका मेरा दूसरा पोस्ट अच्छा हो तो कृपया: पी


2

क्यूबिक्स , 6 बाइट्स

AN/qvo

इसका परीक्षण यहां करें

  A
N / q v
  o
  • N/A स्टैक पर न्यूलाइन (10) और इनपुट पुश करें
  • v लूप में रीडायरेक्ट
  • o/q लूप जो एक चरित्र को आउटपुट करता है और इसे स्टैक के निचले भाग में लगातार धकेलता है

मैं स्टैक से ईओआई (-1) संकेतक को हटाने जा रहा था, लेकिन यह किसी भी आउटपुट को प्रभावित करने के लिए प्रकट नहीं होता है, इसलिए इसे बाइट्स की बचत करना छोड़ दिया है।





1

सी, 26 बाइट्स

f(char*s){for(;;)puts(s);}

एक समारोह, f, कि एक पैरामीटर के रूप एक सी शैली स्ट्रिंग लेता है, s। फ़ंक्शन का शरीर बार-बार लूप करता है, स्ट्रिंग को लाइब्रेरी फ़ंक्शन में भेज रहा हैputs , जो स्ट्रिंग को नई आउटपुट-लाइन के साथ मानक आउटपुट (स्टडआउट) पर आउटपुट करता है।

बहुत साधारण सामान। यहां एकमात्र हैक वापसी मूल्य के लिए डिफ़ॉल्ट-इंट का लाभ ले रहा है और फिर वास्तव में एक मूल्य वापस नहीं कर रहा है। हालांकि, इस मामले में कोई फर्क नहीं पड़ता, हालांकि, क्योंकि फ़ंक्शन कभी नहीं लौटता है (यह सिर्फ हमेशा के लिए प्रिंट करता है)!

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


f(char*s){puts(s);f(s);}
nmjcman101


1

जावा 8, 34 बाइट्स

s->{for(;;System.out.println(s));}

हैरानी की बात है एक जावा जवाब अभी तक नहीं था।

इसे यहाँ आज़माएँ। (टाइम-आउट के लिए 60 सेकंड प्रतीक्षा करें।)


आपको इसके समाप्त होने की प्रतीक्षा करने की आवश्यकता नहीं है, यह 128kb की अधिकतम आउटपुट बफर तक बहुत तेजी से
पहुंचेगा

@Mayube शायद, लेकिन यह अभी भी Real time: 60.008 sडिबग-सेक्शन के अनुसार चल रहा है, इससे पहले कि यह परिणाम उत्पन्न करता है (और दो चेतावनी 60 सेकंड की सीमा को पार कर गया और 128kb पार हो गई)।
केविन क्रूज़सेन

1
TIO भी परिणामों को कैश करता है, इसलिए एक बार इसे चलाने और टाइमलीमिट को हिट करने के बाद, आउटपुट कैश हो जाता है और बस दूसरों को परोसा जाएगा जो इसे बिना दोबारा चलाए कोड को चला रहे हैं और कोड चला रहे हैं
Skidsdev

@ माय सत्य। मुझे नहीं पता था कि यह दूसरों के लिए भी लागू होता है। सोचा कि यह एक स्थानीय कैश था। उस स्थिति में आप मेरे उत्तर में " (इसके लिए 60 सेकंड प्रतीक्षा करें।) " को अनदेखा कर सकते हैं । :) लेकिन अगर आप "अक्षम आउटपुट कैश" सेटिंग पर जांच करते हैं, तो आप देखेंगे कि इसमें 60 सेकंड का समय लगता है।
केविन क्रूज़सेन

1

अजगर, 2 बाइट्स

#

दुर्भाग्य से मैं नहीं हटा सकता Q:(

आपको इस तरह से कमांड-लाइन से चलने की आवश्यकता है, ताकि यह प्रतिस्पर्धा हो:

python3 pyth.py -c "#
"

दुभाषिया भी तय किया गया है।


1

> <> , 16 बाइट्स

i:0(?v
:o71.>~a{

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

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

> <> , 13 बाइट्स

<ov!?+1:i
oa<

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


मुझे लगता है कि एक ब्रैकेटिंग समस्या हुई है: यह कोड "उस इनपुट के बाद (एक नई लाइन अंतहीन)" देता है, जबकि अधिकांश अन्य उत्तर देते हैं "(वह इनपुट जिसके बाद एक नई लाइन आती है)" ...
एक पेड़ नहीं

@ नॉटट्री, इस उल्लेख के लिए धन्यवाद, मैंने आपकी टिप्पणी का सम्मान करने के लिए अपना उत्तर अपडेट किया है :)
चैले पेलिकन

अच्छा, मेरा सबसे अच्छा प्रयास 17 बाइट्स था!
एक पेड़ नहीं

@ नोटोट्री, मैंने पहली पंक्ति में चेक को 1 + से? वी से 0 तक बदल दिया है; वी; जो एक बाइट को बचाता है, आपका समाधान क्या था, अधिक देखने के लिए अच्छा होगा> <> जवाब :) - मुझे भी कुछ के साथ विश्वास है निफ्टी मिरर आप कूद निर्देशों को हटाने में सक्षम हो सकते हैं, लेकिन अभी तक इसका पता नहीं लगा है।
टीले पेलिकन

1
@Notatree, आप वास्तव में 16 बाइट्स के करीब थे, अपनी दूसरी पंक्ति को एक ~ ~ में बदल दें और फिर अपनी अंतिम पंक्ति को 1 से o> {: के आसपास ले जाएँ और आपने इसे बना लिया होगा। कूद बस लाइनों पर अतिरिक्त दर्पण पर बाहर काटने के लिए है, लेकिन तुम्हारा काम करता है के रूप में अच्छी तरह से :)
चैती हवासील


1

Perl 5, 27 bytes

while(1){print"$ARGV[0]\n"}

Try it online!


input will always be given, it just might be an empty string, so you should be able to do while(1){print"$ARGV[0]\n"}
Skidsdev

@Mayube - thx, updated answer.
tale852150

Also welcome to ppcg! I fixed the formatting on your answer for you, in the future I totally recommend using Try it online (linked in the edited answer) as it not only makes testing way easier, but can give you a fully formatted ppcg answer to post
Skidsdev

@Mayube - thx, glad to be here...
tale852150

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