हाल ही में, मैंने हरे कृष्ण लोगों को प्रतीक पर उनके मंत्र के साथ देखा है और मैंने पाया है कि यह कोड गोल्फ के लिए काफी दिलचस्प हो सकता है।

चुनौती

हरे कृष्ण मंत्र लिखें , अर्थात:

Hare Krishna Hare Krishna
Krishna Krishna Hare Hare
Hare Rama Hare Rama
Rama Rama Hare Hare

मानदंड जीतना

यह कोड-गोल्फ है , इसलिए बाइट्स जीत में सबसे छोटा कोड है!

नियम

केसिंग को संरक्षित किया जाना चाहिए।
टेक्स्ट में नई लाइनें होनी चाहिए।
लाइनों में अनुगामी स्थान (स्थान) हो सकते हैं।
अनुगामी न्यूलाइन की अनुमति है।
वेब या किसी अन्य बाहरी संसाधन से पार्स करना बंद कर दिया गया।

code-golf string kolmogorov-complexity

— डेरियस वोज़निएक
स्रोत

2

शीर्षक से मैं ASCII वर्णों में बाइनरी स्ट्रिंग्स को डीकोड करने के लिए कुछ उम्मीद कर रहा था। शीर्षक एक बैकस्लैश का प्रतिनिधित्व करता है।

— user253751

5

सभी मंत्र में 97 बाइट्स हैं। आश्चर्यजनक रूप से पर्याप्त, कई बाइट्स से अधिक के साथ उत्तर हैं।

— मैक्लिन्स

हम्म, यह आश्चर्यजनक रूप से रिक्रॉल डूप की तरह क्यों दिखता है?

— मैथ्यू रो

58

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

“t,ȧṫÞċḅ»Ḳ“¡¥Ɓc’ṃs4K€Y

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

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

“t,ȧṫÞċḅ»Ḳ“¡¥Ɓc’ṃs4K€Y  Main link. No arguments.

“t,ȧṫÞċḅ»               Use Jelly's dictionary to yield the string
                        "Hare Rama Krishna". Fortunately, the words Rama, Krishna,
                        and hare (lowercase H) are in the dictionary.
         Ḳ              Split at spaces, yielding ["Hare", "Rama", "Krishna"].
          “¡¥Ɓc’        Base-250 literal; yielding 15973600.
                ṃ       Convert 15973600 to base ["Hare", "Rama", "Krishna"]
                        (ternary), where "Krishna" = 0, "Hare" = 1, and "Rama" = 2.
                 s4     Split the resulting string array into chunks of length 4.
                   K€   Join each of the four chunks by spaces.
                     Y  Join the resulting strings by linefeeds.

— डेनिस
स्रोत

43

Convert 15973600 to base ["Hare", "Rama", "Krishna"]शुक्रिया, आपने आगे बताया, क्योंकि इससे कोई मतलब नहीं था।

— निक हार्टले

11

मुझे आधार का ["Hare", "Rama", "Krishna"] अधिक उपयोग करने की आवश्यकता है ।

— अताको

63

05AB1E , 38 बाइट्स

यदि नई सीमाएँ ठीक हैं तो 2 बाइट्स को छोटा किया जा सकता है।

“«Î‡Ä¦í¥Â“#€¦`«'kì)™ð«•2ÍZì•3BSè#4ô¨»?

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

व्याख्या

“«Î‡Ä¦í¥Â“                              # push the string "drama share irish dna"
          #                             # split on spaces
           €¦                           # remove the first character of each word
             `                          # split to stack as separate words 
              «'kì                      # concatenate the last 2 and prepend "k"
                  )™                    # wrap in list and title-case
                    ð«                  # append a space to each
                      •2ÍZì•            # push 27073120
                            3B          # convert to base-3: 1212221110100011
                              Sè        # index into the list with each
                                #       # split on spaces
                                 4ô     # split into pieces of 4
                                   ¨    # remove the last
                                    »   # join on spaces and newlines
                                     ?  # print without newline

— Emigna
स्रोत

58

drama share irish dna, वास्तव में? वह विचार कहां से आया? +1 :)

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

14

मुझे स्पष्ट रूप से बताएं, क्या आपने 05AB1E गोल्फ कोड का जनरेटर बनाया है?

— वाईएससी

1

@YSC शब्दकोश संपीड़न के लिए एक बुरा विचार नहीं है। मैं कर रहा हूँ।

— मैजिक ऑक्टोपस Urn

1

32 बाइट्स

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

43

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

a="Hare"
for x in"Krishna","Rama":print a,x,a,x+'\n',x,x,a,a

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

यह इस प्रयास की तरह टेम्पलेट-रिप्लेसमेंट दृष्टिकोण को हरा देता है ।

— XNOR
स्रोत

39

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

[{'Hare ','Krishna ','Rama ',10}{'ababdbbaadacacdccaa'-96}]

यहां आउटपुट सत्यापित करें ।

स्पष्टीकरण:

{'Hare ','Krishna ','Rama ',10}एक सेल ऐरे को तीन स्ट्रिंग्स के साथ बनाता है, जहां चौथा है 10(ASCII-value for newline)।

{'ababdbbaadacacdccaa'-96}एक वेक्टर है जो ऊपर सेल सरणी को अनुक्रमित करता है। वेक्टर [1 2 1 2 4 ...]तब से है जब हम 96स्ट्रिंग से घटाते हैं ababd...।

आसपास के वर्ग कोष्ठक का उपयोग परिणाम प्राप्त करने के लिए किया जाता है, बजाय पाने के ans = Hare; and = Krishna; ans = ...

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

मुझे नहीं पता था कि आप उस सेल को ऑक्टेव (MATLAB के विपरीत) में अनुक्रमित कर सकते हैं!

— मेमोरियल

19

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


hkhk¶kkhh
h
Hare 
*`k
Krishna 
k
Rama

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

ज्यादातर सादे प्रतिस्थापन, एकमात्र "ट्रिक" वह संशोधक है *जो प्रतिस्थापन के परिणाम को प्रिंट करता है और फिर स्ट्रिंग को वापस वही करता है जो पहले था।

— सिंह
स्रोत

16

PHP, 61 बाइट्स

<?=strtr("0101
1100
0202
2200",["Hare ","Krishna ","Rama "]);

बस मूल्यों के साथ सरणी में कुंजी के रूप में अंक से प्रतिस्थापन strtr

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

— जार्ग हुल्सरमन
स्रोत

12

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

`0101
1100
0202
2200`.replace(/./g,n=>['Hare ','Krishna ','Rama '][n])

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

console.log(`0101
1100
0202
2200`.replace(/./g,n=>['Hare ','Krishna ','Rama '][n]))

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

— powelles
स्रोत

2

अंक के बजाय सीधे टेम्पलेट स्ट्रिंग में शाब्दिक न्यूलाइन वर्णों का बेहतर उपयोग करें 3। टेम्पलेट स्ट्रिंग की लंबाई समान होगी, लेकिन आपको बाद में उन्हें प्रतिस्थापित नहीं करना पड़ेगा। (सरणी इंडेक्स समस्या का कारण नहीं होगा, क्योंकि /./न्यूलाइन वर्णों से मेल नहीं खाता।)

— मैनेटवर्क

12

सी

154 बाइट्स, 124 बाइट्स, 96 बाइट्स

i;main(){char*c="agagvggaavapapvppaaHare \0Krishna \0Rama \0\n";while(i<19)printf(c+c[i++]-78);}

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

28 बाइट्स बचाए, धन्यवाद डेनिस को

— hucancode
स्रोत

1

प्रोग्रामिंग पहेलियाँ और कोड गोल्फ में आपका स्वागत है।

— रोहन झुनझुनवाला

1

यह प्रोग्रामिंग पज़ल्स और कोड गोल्फ, इस स्टैक एक्सचेंज के नाम के लिए एक सुंदर मानक है। क्षमा करें, मुझे यह स्पष्ट करना चाहिए था। हमारी साइट पर आपका स्वागत है, अच्छी पहली पोस्ट।

— रोहन झुनझुनवाला

1

यह सभी संकलक के साथ काम नहीं करेगा, लेकिन इसमें शामिल विवरण की आवश्यकता नहीं है। साथ ही, यदि आप अपने सबमिशन को C तक सीमित रखते हैं, तो आप इसे ड्रॉप कर सकते हैं intऔर iविश्व स्तर पर घोषित कर सकते हैं, इसलिए यह शून्य पर निर्भर करता है। tio.run/nexus/…

— डेनिस

2

@AnT यह सही है, लेकिन कोड गोल्फ प्रतियोगिताओं के लिए "उचित" कोड की आवश्यकता नहीं है। पीपीसीजी पर, हम भाषाओं को उनके कार्यान्वयन से परिभाषित करते हैं। जब तक एक संकलक होता है जो कार्यशील निष्पादन योग्य बनाता है, उत्तर मान्य होता है।

— डेनिस

1

main(){for(char*t="BG@ESCB;:N8F6DIBA10Hare \0Krishna \0Rama \0\n";*t^72;printf(t+*t++-48));}4 बाइट बचाता है।

— जोहान डू टिट

11

वी , 40 , 36 बाइट्स

iHare Krishna 
 Rama ç^/ä$Ùdww.$2p

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

Hexdump:

00000000: 6948 6172 6520 4b72 6973 686e 6120 0a0e  iHare Krishna ..
00000010: 2052 616d 6120 1be7 5e2f e424 d964 7777   Rama ..^/.$.dww
00000020: 2e24 3270                                .$2p

स्पष्टीकरण:

iHare Krishna   " Enter 'Hare Krishna' on line 1
<C-n> Rama      " Enter 'Hare Rama' on line 2. This works because <C-n>
                " autocompletes alphabetically, and 'Hare' comes before 'Krishna'
<esc>           " Return to normal mode
ç^/             " On every line:
   ä$           "   Duplicate the text on the line horizontally
     Ù          "   Make a new copy of the line
      dw        "   Delete a word
        w       "   Move forward a word
         .      "   Delete a word again
          $     "   Move to the end of the line
           2p   "   And paste what we've deleted twice

इस <C-n>तरह की चुनौतियों के लिए कमांड बेहद उपयोगी है। :)

— DJMcMayhem
स्रोत

10

सी #, 109 बाइट्स

void a(){Console.Write("{0}{1}{0}{1}\n{1}{1}{0}{0}\n{0}{2}{0}{2}\n{2}{2}{0}{0}","Hare ","Krishna ","Rama ");}

बहुत सीधा, Console.Writeअंतर्निहित रूप से स्ट्रिंग को प्रारूपित करता है, और Writeइसके बजाय WriteLineन केवल 4 बाइट्स बचाता है, बल्कि एक अनुगामी न्यूलाइन से बचा जाता है। का उपयोग करता है यूनिक्स शैली नई पंक्तियां तो बदल कर खिड़कियों के लिए अतिरिक्त 6 बाइट्स खिड़कियों पर इतनी अच्छी तरह से काम नहीं कर सकते, \nकरने के लिए\r\n

यह विधि सीधे कंसोल पर आउटपुट करेगी, यदि आप एक ऐसी विधि पसंद करते हैं जो एक स्ट्रिंग लौटाता है:

सी #, 118 बाइट्स

string a(){return string.Format("{0}{1}{0}{1}\n{1}{1}{0}{0}\n{0}{2}{0}{2}\n{2}{2}{0}{0}","Hare ","Krishna ","Rama ");}

वैकल्पिक रूप से अगर आपको पूरी तरह से स्टैंड-अलोन और कंपाइलेबल प्रोग्राम की आवश्यकता है:

सी #, 135 बाइट्स

class A{static void main(){System.Console.Write("{0}{1}{0}{1}\n{1}{1}{0}{0}\n{0}{2}{0}{2}\n{2}{2}{0}{0}","Hare ","Krishna ","Rama ");}}

यह संकलित कार्यक्रम के रूप में काम करना चाहिए बशर्ते आप Aप्रवेश कक्षा के रूप में सेट करें ।

— Skidsdev
स्रोत

शब्दों के बीच रिक्त स्थान के बिना थोड़ा अजीब लगता है।

— मैनटवर्क

@ मैनटवर्क अच्छी बात है, शुक्र है कि स्पेस का कहना है कि ट्राइलिंग स्पेस ठीक है, इसलिए केवल 3 बाइट्स

— स्किड्सदेव

एक लौ युद्ध शुरू कर सकता है, लेकिन आप दूसरे उदाहरण को और भी कम करने के लिए स्ट्रिंग के बजाय var का उपयोग कर सकते हैं।

— जॉन बेटमैन

@ जॉनबोमन एक विधि का वापसी मूल्य varजहाँ तक मुझे पता नहीं है, और var.Format()निश्चित रूप से एक बात नहीं है

— स्काईसदेव २ at

Duh ... उस के बारे में नहीं सोचा था। आप सही हैं, मैंने अपने आप को लांबा दुनिया में पा लिया और जो कुछ मैं पढ़ रहा था, उसकी गलत व्याख्या की।

— जॉन बेटमैन

8

सी, 85 बाइट्स

i;f(){for(i=0;printf("$0$0900$$9$*$*9**$$)"[i++]-36+"Hare \0Rama \0Krishna \0\n"););}

मैं एक धर्मनिरपेक्ष मंत्र पसंद करूंगा, लेकिन मुझे उम्मीद है कि यह उन शांतिपूर्ण धर्मों में से एक है।

इसे यहां देखें ।

यह 23 बाइट्स द्वारा एक भोली कार्यान्वयन को संकुचित करता है।

— 2501
स्रोत

8

पायथन 2, 92 88 74 बाइट्स

for i in'0101311003020232200':print['Hare','Krishna','Rama','\n'][int(i)],

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

नहीं , यह चतुर नहीं है, नहीं, यह सबसे छोटा नहीं है, लेकिन हे, मैं इस के लिए नया हूं और यह काम करता है।

एक अन्य समाधान ( 84 80 बाइट्स):

h='Hare'
k='Krishna'
r='Rama'
n='\n'
print h,k,h,k,n+k,k,h,h,n+h,r,h,r,n+r,r,h,h

— totallyhuman
स्रोत

सूची में 'हरे' और 'कृष्ण' के साथ, शून्य और लोगों को स्वैप करें। यह अग्रणी शून्य को हटाता है। फिर नए नंबर (1010300113121232211) को हेक्स (0xe054e999f20c553) में कनवर्ट करें, इसे बैकटिक्स से घेरें, और अंत में महसूस करें कि xnor का जवाब अभी भी 12 बाइट्स से आगे है! tio.run/##K6gsycjPM/r/Py2/…

— vroomfondel

6

पर्ल, 67 बाइट्स

इस जावास्क्रिप्ट प्रविष्टि से प्रेरित है ।

$_='0101
1100
0202
2200
';s/./qw'Hare Krishna Rama'[$&].$"/ge;print

पर्ल, 67 बाइट्स

@_=<Hare Krishna Rama>;print"@_[split//]\n"for<0101 1100 0202 2200>

— सिनान annür
स्रोत

2

(Hare,Krishna,Rama)अपने पहले कोड में दो बाइट्स बचाता है।

— दादा

5

मतलाब 139 136 105 बाइट्स (@ 2501 के लिए धन्यवाद )

fprintf('Hare Krishna Hare Krishna\nKrishna Krishna Hare Hare\nHare Rama Hare Rama\nRama Rama Hare Hare')

ऑक्टेव में इसे ऑनलाइन आज़माएं!

— user13267
स्रोत

या 126 बाइट्स यदि अनुगामी नई रेखा की अनुमति है

— user13267

@ २५०१: हाहा इज ग्रेट। वास्तव में मुझे लगता है कि यह 105 बाइट्स हो सकते हैं आप इसे एक जवाब के रूप में पोस्ट करें

— user13267

5

मुझे पूरा यकीन है कि आगे और सुधार संभव हैं।

— 2501

1

FYI करें, TIO सपोर्ट करता है ऑक्टेव :) tio.run/nexus/…

— Beta Decay

1

x={'Hare ','Krishna ','Rama ',10};[x{'ababdbbaadacacdccaa'-96}]64 बाइट्स है। : P (@Stewie ग्रिफिन के सप्तक प्रस्तुत करना)

— मेमिंग

5

MySQL, 115 100 बाइट्स

(साभार @manatwork!)

SELECT CONCAT(a,b,a,b,d,b,b,a,a,d,a,c,a,c,d,c,c,a,a)FROM(SELECT'Hare 'a,'Krishna 'b,'Rama 'c,'\n'd)t

— jlmt
स्रोत

आप सभी को हटा सकते हैं AS ।

— manatwork

अच्छी चाल, मैं निश्चित रूप से कुछ चुनौतियों के लिए इस पद्धति का उपयोग कर रहा हूं।

— ब्रैड

5

आर, 75 85 83 बाइट्स

cat(x<-c("Hare ","Krishna ","\n")[c(1,2,1:3,2,2,1,1,3)],sub(x[2],"Rama ",x),sep="")

इसके साथ एक वेक्टर बनाता है Hare, Krishnaऔर न्यू लाइन, जरूरत लोगों को ले जाता है, और फिर इसे जगह को दोहराता Krishnaद्वारा Rama।

हर शब्द पर स्थान शामिल करने की आवश्यकता है और sep=""क्योंकि अन्यथा cat()प्रत्येक पंक्ति की शुरुआत में एक स्थान रखा जाएगा।

— Masclins
स्रोत

मुझे यह TIO

— Giuseppe

शायद एक प्रिंट () या कुछ और की जरूरत है।

— BLT

@Giuseppe मैं यहाँ उपयोग कर रहा हूँ कि R स्वतः प्रिंट करता है। लेकिन निर्भर करता है कि आप इसे कैसे कहते हैं, print()या cat()इसकी आवश्यकता होगी। इसके लिए अधिक बाइट्स की आवश्यकता होगी। मैं इस सप्ताह के अंत में उनके साथ एक विकल्प पोस्ट करूंगा :)

— Masclins

1

@AlbertMasclans नहीं मैं एक त्रुटि कह रहा हूँ object 'h' not found tio.run/nexus/…

— Giuseppe

2

मुझे लगता है कि आपको कॉल के अंदर के h=साथ बदलने की आवश्यकता हैh<-p

— Giuseppe

5

पॉवरशेल, 73 53 52 बाइट्स

जेफ फ्रीमैन द्वारा पूरी तरह से ध्वस्त - एक वास्तविक बाइटलाइन का उपयोग करके एक \nऔर बाइट बचाता है, और सरणी प्रारूप पर एक और भी बचाया। (से (1,2)करने के लिए ,1,2)

-1 TesselatingHeckler के लिए धन्यवाद, सरणी संकेतन में कोई अल्पविराम नहीं।

$a="Hare ";"Krishna ","Rama "|%{"$a$_$a$_
$_$_$a$a"}

मेरा पुराना उत्तर - कुछ अन्य प्रतिस्थापित तरीकों की कोशिश की, लेकिन सभी समाप्त हो गए किसी तरह थोड़ा लंबा।

$a,$b,$c="Hare ","Krishna ","Rama ";"$a$b$a$b
$b$b$a$a
$a$c$a$c
$c$c$a$a"

वहाँ स्ट्रिंग में newlines हैं।

बहुत सीधा, इस तथ्य का उपयोग करता है कि पावरशेल डबलक्वाट के भीतर चर का विस्तार करेगा, और कुछ बाइट्स को बचाने के लिए चर को असाइन करने का एक छोटा तरीका।

— colsw
स्रोत

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

— जेफ फ्रीमैन

2

स्पॉइलर टैग के बजाय, मुझे लगा कि लिंक के माध्यम से कैसे साझा किया जाए। इसे ऑनलाइन आज़माएं!

— जेफ फ्रीमैन

@JeffFreeman अच्छा एक, नई और सरणी पर दो से अधिक मुंडा - 52 तक, लगभग सभी गैर-गोल्फ भाषाओं को हराकर।

— colsw

4

सेड, 72२

-rध्वज में स्कोर +1 शामिल है ।

s/^/Hari Krishna/
s/.*/& &/
s/(\S+)(.*)\b(.+)/&\n\3\2\1/p
s/K\S+/Rama/g

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

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

बहुत यकीन है कि वहाँ ubstitute के बजाय हैंग c, append या insert का उपयोग करके कुछ बाइट्स निकालने का एक तरीका है s। संपादित करें: अब और निश्चित नहीं है; संपादन संपादित करें: हाँ नहीं जो काम नहीं करता है क्योंकि वे पैटर्न स्पेस पर काम नहीं करते हैं, बल्कि सीधे आउटपुट

— हारून

4

रूबी , 62 61 बाइट्स

जैसा कि मैंने इस पर काम किया, यह अंततः @ xnor के पायथन उत्तर के समान हो गया, सिवाय इसके कि रूबी के पास इसके printकार्य में तर्कों के बीच रिक्त स्थान नहीं है , मुझे इसके बजाय जुड़ने का उपयोग करने के लिए मजबूर करता है और परिणामस्वरूप लंबे समय तक उत्तर देता है ...

-1 बाइट @ वर्क से

%w"Krishna Rama".map{|i|puts [h=:Hare,i]*2*' ',[i,i,h,h]*' '}

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

— मूल्य स्याही
स्रोत

:Hareएक प्रतीक बनाओ ।

— मैनेटवर्क

4

बैश, 93 90 बाइट्स

h="Hare " k="Krishna " r="Rama " s="$h$k$h$k\n$k$k$h$h\n$h$r$h$r\n$r$r$h$h"
echo -e "${s}"

— कथरीन ओसबोर्न
स्रोत

1

पहले अच्छा प्रयास करें। क्या मुझे कुछ सुधार करने का सुझाव देना चाहिए? pastebin.com/0bYQF26n

— manatwork

@manatwork आपको इसे अपने उत्तर के रूप में जोड़ना चाहिए।

— पंड्या

1

चर के बिना s=यह 79 तक नीचे हैh="Hare " k="Krishna " r="Rama ";echo -e "$h$k$h$k\n$k$k$h$h\n$h$r$h$r\n$r$r$h$h"

— उलिक

3

पायथ - 45 41 बाइट्स

Ms(GHGHbHHGG)K"Hare "gK"Krishna "gK"Rama

कोशिश करो

— मारिया
स्रोत

3

एएचके , 107 92 बाइट्स

यह हास्यास्पद लगता है लेकिन मुझे ऐसा करने के लिए एएचके में एक छोटा साधन नहीं मिल रहा है:

h=Hare
k=Krishna
Send %h% %k% %h% %k%`n%k% %k% %h% %h%`n%h% Rama %h% Rama`nRama Rama %h% %h%

यहां मैंने पहले प्रयास किया था जो 107 बाइट्स था और फैंसी होने की कोशिश की। जैसा कि डिजिटल ट्रॉमा ने बताया , हालांकि, यह सिर्फ कच्चे पाठ को भेजने के लिए कम होता।

n=1212422114131343311
a=Hare |Krishna |Rama |`n
StringSplit,s,a,|
Loop,Parse,n
r:=r s%A_LoopField%
Send %r%

StringSplit पहले इंडेक्स के रूप में 1 के साथ एक छद्म-सरणी बनाता है। तो पहले शब्द के साथ संदर्भित है s1, दूसरे के साथ s2, आदि, अन्यथा, यहां कुछ भी कल्पना नहीं है।

— इंजीनियर टोस्ट
स्रोत

13

संपूर्ण आउटपुट केवल 92 बाइट्स है। यह बेहतर होगा बस करने के लिए Send Hare Krishna ...?

— डिजिटल ट्रामा

@DigitalTrauma हा! हाँ, शायद, तब। मैंने सोचा था कि फैंसी बेहतर था और जांच भी नहीं की थी। AHK इसके लिए एक अच्छी भाषा नहीं है।

— इंजीनियर टोस्ट

3

बैच, 75 बाइट्स

@for %%h in (Krishna Rama)do @echo Hare %%h Hare %%h&echo %%h %%h Hare Hare

— नील
स्रोत

3

सी 96 बाइट्स

*v[]={"Hare ","Krishna ","Rama ","\n"};
main(){for(long a=0x30ae2305d10;a/=4;printf(v[a&3]));}

आपको केवल यह जानने के लिए कि प्रार्थना से कौन से शब्द की आवश्यकता है, यह जानने के लिए आपको दो बिट्स की आवश्यकता है, इसलिए मेमोरी का एक गुच्छा उपयोग करने और इसे एक स्ट्रिंग के रूप में एन्कोडिंग करने के बजाय, आप इसे केवल 40 बिट पूर्णांक के रूप में एन्कोड कर सकते हैं (अर्थात एक लंबे समय के भीतर )।

— इमरान खान
स्रोत

3

ksh / bash / sh, 66 बाइट्स

h=Hare;for j in Krishna Rama;do echo $h $j $h $j"
"$j $j $h $h;done

— ULick
स्रोत

@ नमि धन्यवाद। इसे एक <CR> में बदल दिया, इसे और भी छोटा कर दिया। स्वयं इसका परीक्षण नहीं कर सकते, लेकिन यह काम करना चाहिए। कम से कम यह बाश और यहां तक कि (बिजीबॉक्स) श में काम करता है।

— उलिक

लगता है कि मैंने संपादन में एक रिक्त जोड़ दिया, लेकिन एक को घटा दिया, '\ n' से <CR>

— ULICK

3

APL (Dyalog) , 47 बाइट्स

⎕IO←0कई सिस्टम पर डिफ़ॉल्ट की आवश्यकता होती है।

↑∊¨↓'Krishna ' 'Hare ' 'Rama '[(4⍴3)⊤8×4 1 5 2]

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

8×4 1 5 2 गुणा; [32,8,40,16]

(4⍴3)⊤ 4-अंकों के आधार 3 में परिवर्तित; मैट्रिक्स [[1,0,1,0], [0,0,1,1], [1,2,1,2], [2,2,1,1]]

... [... ] सूचकांक

↓ सूचियों की सूची में विभाजित

∊¨ सूची (प्रत्येक को समतल करें)

↑ मैट्रिक्स में मिलाएं (रिक्त स्थान के साथ पैडिंग)

— एडम
स्रोत

2

60, रेटिना

मेरे sed उत्तर का सीधा पोर्ट :

हरि कृष्ण
। +
$ 0 $ 0
: (। *) `(\ S +) \ b (। +)
$ 0¶ $ 3 $ 2 $ 1
कश्मीर \ S +
राम अ

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

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

2

जावा 7, 104 103 बाइट्स

String c(){return"xyxy\nyyxx\nxRama xRama\nRama Rama xx".replace("x","Hare ").replace("y","Krishna ");}

स्पष्टीकरण:

String c(){                                      // Method without parameters and String return-type
  return"xyxy\nyyxx\nxRama xRama\nRama Rama xx"  //  Return this String
    .replace("x","Hare ")                        //  after we've replaced all "x" with "Hare "
    .replace("y","Krishna ");                    //  and all "y" with "Krishna "
}                                                // End of method

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

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

2

बैच, 117 111 103 बाइट्स

@set a=Hare &set b=Krishna &set c=Rama 
@echo %a%%b%%a%%b%^

%b%%b%%a%%a%^

%a%%c%%a%%c%^

%c%%c%%a%%a%

103 से नीचे अब नई अनुगामी की अनुमति है।

^\n\nपहली तीन पंक्तियों के अंत में एक नई पंक्ति सम्मिलित करने के लिए उपयोग किया जाता है और इसके बाद एक स्थान होता है Rama।

— SomethingDark
स्रोत

2

पर्ल, 76 74 बाइट्स

$_=121202211;$_.=0 .y/2/3/r;print$_?(0,Hare,Krishna,Rama)[$_].$":$/for/./g

— ephemient
स्रोत

1

2 बाइट्स कम: इसे ऑनलाइन आज़माएं! (मुझे पूरा यकीन है कि आउटपुट सही है)

— दादा

हरे कृष्ण हरे कृष्ण कृष्ण कृष्ण हरे हरे

चुनौती

मानदंड जीतना

नियम

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

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

05AB1E , 38 बाइट्स

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

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

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

PHP, 61 बाइट्स

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

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

सी

154 बाइट्स, 124 बाइट्स, 96 बाइट्स

वी , 40 , 36 बाइट्स

सी #, 109 बाइट्स

सी #, 118 बाइट्स

सी #, 135 बाइट्स

सी, 85 बाइट्स

पायथन 2, 92 88 74 बाइट्स

पर्ल, 67 बाइट्स

पर्ल, 67 बाइट्स

मतलाब 139 136 105 बाइट्स (@ 2501 के लिए धन्यवाद )

MySQL, 115 100 बाइट्स

आर, 75 85 83 बाइट्स

पॉवरशेल, 73 53 52 बाइट्स

सेड, 72२

रूबी , 62 61 बाइट्स

बैश, 93 90 बाइट्स

पायथ - 45 41 बाइट्स

एएचके , 107 92 बाइट्स

बैच, 75 बाइट्स

सी 96 बाइट्स

ksh / bash / sh, 66 बाइट्स

APL (Dyalog) , 47 बाइट्स

60, रेटिना

जावा 7, 104 103 बाइट्स

बैच, 117 111 103 बाइट्स

पर्ल, 76 74 बाइट्स