अपने पसंदीदा शब्द के साथ एक कोड स्क्वायर बनाएं


47

अपना पसंदीदा 6 अक्षर वाला सामान्य अंग्रेजी शब्द चुनें, जिसमें कोई दोहराया अक्षर न हो , जैसे कि wombat

पात्रों में से एक एन × एन ग्रिड में एक कार्यक्रम लिखें टिप्पणियों के बिना ऐसी है कि प्रत्येक पंक्ति और स्तंभ किसी भी क्रम में छोटे अक्षरों में अपने शब्द के सभी पत्र शामिल हैं। कार्यक्रम को 36 अक्षरों या अधिक में आपके शब्द की परिभाषा को आउटपुट करना होगा ।

नियम

  • स्टडआउट के लिए आउटपुट। कोई इनपुट नहीं है।
  • आपका शब्द Dictionary.com पर होना चाहिए और केवल az होना चाहिए । कोई उचित संज्ञा नहीं, कोई जोड़ नहीं, कोई संक्षिप्त नहीं, कोई संकुचन नहीं।
  • आपके कार्यक्रम और आउटपुट में केवल मुद्रण योग्य ASCII वर्ण (हेक्स कोड 20 से 7E) हो सकते हैं। (यह प्रोग्राम ग्रिड में आवश्यक नए समाचारों की गिनती नहीं कर रहा है।)
  • टिप्पणियाँ कुछ भी हैं जो संकलक या दुभाषिया पारंपरिक रूप से उपेक्षा करते हैं। आप उस कोड का उपयोग कर सकते हैं जो आउटपुट में योगदान नहीं करता है या आधिकारिक रूप से निष्पादित नहीं होता है।
  • आउटपुट की परिभाषा व्याकरणिक और सटीक होनी चाहिए, लेकिन निश्चित रूप से मज़ेदार या चतुर हो सकती है।
  • कोई भी पंक्ति या स्तंभ जिसमें कम से कम आपके शब्द के 6 अद्वितीय अक्षर निचले भाग में हों मान्य हैं। विकर्ण मायने नहीं रखते।

स्कोरिंग

यह कोड गोल्फ है, लेकिन चूंकि सभी प्रस्तुतियाँ समान वर्ग प्रारूप में होनी चाहिए, आप केवल एन के साथ अपना स्कोर निर्दिष्ट कर सकते हैं। सबसे कम एन जीतता है, और निश्चित रूप से 6 से नीचे एक एन असंभव है। संबंधों के मामले में, सबसे अधिक मतदान उत्तर जीतता है।

उदाहरण

यदि आपका शब्द wombatआपका कार्यक्रम था , तो आप इस तरह दिख सकते हैं (N = 7):

wombatD
ombatEw
mbatFwo
bat(wom
atWwomb
tBwomba
)wombat

ध्यान दें कि हर पंक्ति और हर कॉलम में अक्षर हैं w o m b a t

उत्पादन हो सकता है: (40 chararacters)

Cute short-legged Australian marsupials.

ठीक है, आपको एक 6 अक्षर शब्द का उपयोग करके एक ग्रिड बनाना होगा, लेकिन फिर मुझे आउटपुट समझ में नहीं आता है: "प्यारा लघु-पैर वाले ऑस्ट्रेलियाई मार्सुपालिस।"
कज़िनकॉकिन

@CousinCocaine यह एक गर्भ का वर्णन है। आपको अपने द्वारा चुने गए शब्द का एक व्याकरणिक और सटीक विवरण आउटपुट करना चाहिए।
प्रोग्रामफॉक्स

जैसा कि यह कोड गोल्फ है, जो सही फैसला करता है? "क्यूट शॉर्ट-लेग्ड ऑस्ट्रेलियन मार्सुपियल्स" या "शॉर्ट-लेग्ड मार्सुपियल्स"?
कजिनकोकिन

5
विचार: क्या शब्द " golfed" है, और परिभाषा "a description of this program's code"(किसी के लिए जो यह पता लगा सकती है कि यह कैसे करना है!)।
दरवाज़े

6
लानत है, मेरे पास पसंदीदा 6 चरित्र लंबा शब्द नहीं है
user902383

जवाबों:


18

पर्ल - अंगूर - 11

संपादित करें: मैंने अकस्मात यह 12 रेखाएँ बनाईं ...

$epagsr=$";
$,=$epagsr;
/gaerp/;say
grep!/a*s/,
qw(A searpg
purple sgar
rpssg pear?
No, a sgerp
s great pse
as grape; s
eat prgpsga
up! sgarse)

आउटपुट:

A purple pear? No, a great grape; eat up!

अपडेट करें!

मैंने इसे 11 से नीचे लाने के लिए एक पंक्ति को समाप्त कर दिया लेकिन मुझे वाक्य बदलना पड़ा। उम्मीद है कि मैंने इस बार कोई गलती नहीं की!

$gpasre=$";
$,=$gpasre;
/paerg/;say
grep!/a*s/,
qw(A sgrpea
purple sarg
ressp game?
No, a rgspe
s great gsp
as grape; s
eat),$spegr

आउटपुट:

A purple game? No, a great grape; eat

आउटपुट 37 वर्ण है।


छोटी आउटपुट कविता के कारण मुझे यह मुख्य रूप से पसंद है। शर्म नहीं आती यह हाइकु :)
मैट फ्लेचर

1
यह 12x11 है ...
मतभेद

@ शंखवाद वाह ... गोली मारो! मैं इसे ठीक कर दूंगा। धन्यवाद!
hmatt1

इसे स्वीकार करने के बारे में, लेकिन यह अभी भी 12 लंबा है।
केल्विन के शौक

47

जावास्क्रिप्ट - कार्रवाई - 15x15

"निश्चित रूप से सबसे छोटा नहीं है, लेकिन PEW PEW PEW।" - जेम्स बॉन्ड

ction="action "
ction+="means "
actionac="PEW "
ctionact="PEW "
tionacti="PEW "
ionactio="PEW "
onaction="PEW "
nactiona="PEW "
ction+=actionac
ction+=ctionact
ction+=tionacti
ction+=ionactio
ction+=onaction
ction+=nactiona
alert(""+ction)

Jsfiddle

आउटपुट से लिंक करें (37 वर्ण):

action means PEW PEW PEW PEW PEW PEW 

आपकी पहली पंक्ति में एक लोअरकेस होना चाहिए।
केल्विन के

@ केल्विन के शौक आप सही हैं। मैंने ठीक कर दिया।
izlin

35

बेफुज 93, एन = 13

यह स्ट्रिंग को पुनर्निर्देशित करके काम करता है "vऔर >"। यह केवल तभी काम करता है जब साइड-लेंथ और वर्ड-लेंथ कोप्रेम होते हैं और जब साइड-लेंथ 11. से अधिक होता है, तो यह "शब्द" के लिए काम करता है vwombat, और इसलिए इसके लिए wombat

"laip"vwombat
wombat>"usr"v
"am "vwombat>
ombat>"nai"vw
lar"vwombat>"
mbat>"tsu"vwo
 d"vwombat>"A
bat>"egg"vwom
-"vwombat>"el
at>"tro"vwomb
"vwombat>"hs 
t>"tuC"vwomba
vwombat>:#,_@

आउटपुट Cute short-legged Australian marsupial


25

सी (शब्द: "खोजक", एन = 16)

main() finder{ f
printf(finder  i
"it's defined "r
"as a t"finder d
"hing t"finder e
"hat ca"finder r
"n find other t"
"hings" finder);
finder finder f\
inder finder fi\
nder finder fin\
der finder find\
er finder finde\
r finder finder
 finder finder n
return 0;finder}

विकल्पों के साथ, जीसीसी के साथ संकलित -Dfinder="" -Df="" -Di="" -Dn="" -Dd="" -De="" -Dr=""

यह आउटपुट it's defined as a thing that can find other things(50 अक्षर) है। मेरा मानना ​​है कि यह सभी नियमों का पालन करता है, लेकिन यदि कोई गलती हो तो मुझे बेझिझक बताएं!


3
सही लगता है, हालांकि मैं सभी संकलक विकल्पों के बारे में पागल नहीं हूं।
केल्विन के

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

9
मैक्रो का उपयोग करने के लिए यह एक अच्छा विचार नहीं है। अगर इसकी अनुमति है, तो आप n = 6 कह सकते हैं और इसे इन के साथ संकलित कर सकते हैं:"-Dfinder=main(){puts(it's defined as a thing that can find other things);}" -Dinderf=; -Dnderfi=; -Dderfin=; -Derfind=; -Dnderfi=;
bebe

यह सही है, मैंने ऐसा सोचा भी नहीं था।
मैक्स

21

गोल्फस्क्रिप्ट, एन = 12

wombat"Cute"
ombat" sho"w
mbat"rt-l"wo
bat"egge"wom
at"d Au"womb
twomb"stra"a
wom"lian "bt
ttwomb"mar"t
"sup"wbwomat
"ia"womabbtt
"ls"bawomtbt
aaawomobt"."

गोल्फकॉट में गर्भपात का उदाहरण दिया गया। आउटपुट है

Cute short-legged Australian marsupials.

जैसा प्रश्न में दिया गया है। दिलचस्प बात यह है कि आप सबसे अधिक शब्दों और जवाब का उपयोग कर सकते हैं और बस जब तक समाधान में इसी पत्र डालने के रूप में आप एक GolfScript निर्मित जो बहुत दुर्लभ हैं, का उत्पादन नहीं करते है p, nस्पष्ट करने के लिए लोगों को किया जा रहा है। अन्य सभी संयोजन मान्य गोल्फस्क्रिप्ट वैरिएबल की ओर ले जाते हैं, जो डिफ़ॉल्ट रूप से बिना ऑप्स हैं।


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

@ मार्टिनबटनर मैंने कोशिश की, लेकिन 36 अक्षर इसे काफी कठिन बनाते हैं।
हावर्ड

मैंने "स्क्वायर" सबमिशन के लिए आपके दृष्टिकोण का उपयोग किया (नीचे देखें)। यह वास्तव में आप की तुलना में एक चरित्र है, लेकिन इसके चारों ओर कुछ चतुर स्थानांतरण के साथ इसे संपीड़ित करना संभव हो सकता है।
मार्टिन एंडर

18

Befunge-98 (n = 12)

मैंने केल्विन को चुना क्योंकि इसमें एवी था। आउटपुटkelvin is like celsius but it's lowe

"ewol "vnlik 
"t's"ke<ilnv 
kelniv"t i"< 
elnik>"ub "v 
nkv"elsius"< 
ln>"c eki"vl 
v0ke"is l"<n 
>" nivlek" v 
ielnv,k4'k#< 
 vivlevlnek< 
 ilkkninevei 
  elnkn vnle

दुर्भाग्य से, Si temp36 में से 29 अक्षर कम हैं;)
मार्टिन एंडर जूल

ऐसा लगता है कि जब भी मैं Befunge-93 में पोस्ट करता हूं, तो कोई भी इसी तरह के Befunge-98 समाधान का
अनुसरण करता है

@Zaq चिंता मत करो, -93 अधिक मजेदार वैसे भी है।
19-22 को see

पंक्ति 2 में कोई i नहीं है।
मतभेद

इसके अलावा, लाइन 4 एक लापता है kऔर कॉलम 9 गायब है e
Schism

11

पायथन, एन = 15

शब्द "canoes" है

def canoe(s='S\
ecret weap',sno
='ce',a='ons o\
f the Can',oces
=1,oesn=1,c='a\
dian navy',cose
="""aoenscanaen
canceessanoeeca
anoasanooscanoe
noescccccaeescc
oescneocaeoesca
escaoescan"""):
 canoes=s + a+c
 print (canoes)
s=1;    canoe()

आउटपुट:

Secret weapon of the Canadian navy

यह 16x15 है!
मतभेद

धन्यवाद ... कुछ बिंदु पर मैंने दुस्साहस किया और उस एकल पंक्ति को canoesवहां से जोड़ने की आवश्यकता महसूस की । फिक्स्ड।
गेरेट

10

पर्ल - दोहराना - 11

$repeat=qq(
repeat);say
"repeat\n"x
length'pear
repeatrepea
epeatrepeat
peatrepeatr
eatrepeatre
atrepeatrep
trepeatrepe
repeat....'

आउटपुट:

repeat
repeat
repeat
repeat
...keeps going

पीछे देखते हुए शायद मुझे यह एक लूप बनाना चाहिए था।


12
उस शब्द का छोटा होना, जिसकी कोई दोहराई गई आवश्यकता नहीं है।
हॉवर्ड

3
@ हावर्ड में eप्रति पंक्ति कम से कम 2 हैं, हालांकि मुझे लगा कि मैं इसे पोस्ट कर सकता हूं।
hmatt1

6

रूबी , hatersएन = 10

हाथ से प्रयासों के घंटों के बाद, एक जनरेटर प्रोग्राम लिखना, और मापदंडों को ट्विक करना, मुझे आखिरकार एन = 10 के लिए एक समाधान मिल गया है!

aser=ts=?h
tah=re=?\s
sh='Haters
nurse hate
in hardest
hearts.'  
rtse=erha=
era=sh.tr'
',tah;aser
 puts erha

आउटपुट Haters nurse hate in hardest hearts., बिल्कुल 36 अक्षर। इसे ऑनलाइन आज़माएं!

मैंने रूबी को चुना क्योंकि इसके चर $( पर्ल ) की आवश्यकता नहीं है , और एकल-उद्धृत स्ट्रिंग्स में नईलाइन ( पायथन ) हो सकती हैं । यह तथ्य कि trविधि मेरे शब्द के दो अक्षरों का उपयोग करती है, एक अप्रत्याशित बोनस था। कार्यक्रम का मूल सीधा है:

# Store the definition, with newlines
sh='Haters
nurse hate
in hardest
hearts.'
# Transliterate newline to space
erha=sh.tr('
',' ')
# Output
puts erha

निश्चित रूप से लाइन अप करने के लिए सभी पत्र प्राप्त करना, सरल नहीं था । मैं एक ही संरचना पर कई बदलावों से गुजरा और इस प्रक्रिया में रूबी के बारे में कुछ बातें सीखीं ( trकोष्ठकों की आवश्यकता नहीं है, और ?\sएक स्थान पाने का दूसरा तरीका है)। कई मृत सिरों और कई झूठे सकारात्मक थे। और फिर ... सफलता!

अगर किसी की दिलचस्पी है, तो मेरे हैक-एक साथ जनरेटर कार्यक्रम का एक सार है।


5

गोल्फस्क्रिप्ट (n = 10)

मेरी पहली गोल्फस्क्रिप्ट! यह प्रिंट करता हैkelvin is like celsius but it's lowe

"kelvin is
like ce"vn
evn"lsiu"k
k"s "elvni
in"bu"kelv
"t "knviel
vl"it'"nke
nevkil"s l
o"ivnkel"w
e"lnevik

"लोव" का क्या अर्थ है?
aditsu


यह केवल क्रिया को संदर्भित करता है, जिसका अर्थ है: जलाने के लिए; ज़ोरदार भावनाओं को महसूस करने के लिए (किसी व्यक्ति का) धब्बा; उत्साह के साथ चमक। मैं नहीं देखता कि यहाँ कैसे काम करता है।
5

पृष्ठ के शीर्ष दाईं ओर बोली को देखें
waylon531

1
क्षमा करें, लेकिन "लोव" थोड़ा अस्पष्ट है। अगर आप इसे "कम" या "कम" बना सकते हैं तो मैं इसे स्वीकार करूंगा।
केल्विन के शौक

5

गोल्फस्क्रिप्ट, 13x13

सबसे छोटा नहीं ...

squae"A squar
"uarsquaresqu
uareq"e has f
"resuaresquar
resqa"our equ
"squresquares
quars"al side
"arequaresqua
areuq"s and r
"esqaresquare
esqur"ight an
"quaesquaresq
quar"gles..."

... लेकिन ...

A squar
e has f
our equ
al side
s and r
ight an
gles...

(शब्दों के भीतर लाइन-ब्रेक होने का इरादा जानबूझकर है, क्योंकि अन्यथा मेरे पास व्हाट्सएप अग्रणी या अनुगामी होता है जो कम वर्ग दिखता है।)


4

पायथन, एन = 11

शब्द "जनक" है। यह कोड सुंदर नहीं है, लेकिन यह काम करता है।

eprnt=" a "
at="person"
rnep="that"
nrpt="made"
ea= " prnt"
e="parent:"
pa =(eprnt+
at+" "+rnep
+ea[0]+nrpt
+ eprnt+at)
print(e+pa)

आउटपुट: parent: a person that made a person

संपादित करें: किसी तरह मैंने इस तथ्य को याद किया कि कॉलम में शब्द भी होना चाहिए। रेट्रोस्पेक्ट में, एक भाषा जिसमें एंडलाइन वर्ण शामिल हैं, भाषा का हिस्सा इस पहेली के लिए अच्छी तरह से अनुकूल नहीं था।


4
अच्छा है, लेकिन हर कॉलम में शब्द नहीं है parent। पहले एक, उदाहरण के लिए, एक नहीं है a
प्रोग्रामफॉक्स

2
यह अभी भी एक गुच्छा याद आ रहा है। p6 और 8 a: 4, 6, 7, 11 r.: 4, 10, 11. e, 4, 5, 8, 9, 11 n.: 3, 5, 7, 11 t.: 1, 3, 6, 6 में गायब है । 8.
Schism

2

पिप , एन = 14 (नॉन-कमिंग)

भाषा सवाल से नई है। शब्द है quines1

n_n|quine say&
qu ines     qi
as  harle quin
se?(equins)ns.
 plums|quinces
|quicken bus++
iness|q++++i u
u:++ingl es?eq
ni*:u; s|qe:",
which "Rns|que
eRL:i|quotesne
PUsn    quiet!
u|qe."print".s
JW"quines"  :)

निम्नलिखित (सम्मिलित रूप से अपूर्ण) परिभाषा को आउटपुट करता है:

quines Print quines, जो quines प्रिंट करते हैं, जो quines प्रिंट करते हैं, जो quines प्रिंट करते हैं, जो quine प्रिंट करते हैं, जो quine प्रिंट करते हैं, जो quines प्रिंट करते हैं, जो quines प्रिंट करते हैं, जो quine प्रिंट करते हैं, जो quines प्रिंट करते हैं, जो प्रिंट्स quines, quines, जो quines प्रिंट करते हैं, जो quines प्रिंट करते हैं, जो quines प्रिंट करते हैं, जो quines प्रिंट करते हैं

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

इस प्रकार कोड का सार्थक भाग चलता है:

++i          Increment i (initially set to 0)
++++i        Increment i twice
u:++i        Increment i again and assign to u (i & u are now 4)
i*:u         Multiply i by u in-place (i is now 16)
e:",         Assign the string ",\nwhich " to e...
which "Rns   after replacing the newline with a space
eRL:i        Make a list of 16 copies of e and assign back to e
ePUs         Push a space to the front of list e
e."print".s  Concatenate "print" and a space to each element of e...
JW"quines"   and join on "quines", wrapping the result in "quines"

बाकी कोड मनमाना नो-ऑप्स है। "भराव" अनुभागों में मुख्य कठिनाई का मूल्यांकन कभी नहीं किया गया था q, क्योंकि यह उपयोगकर्ता को इनपुट की एक पंक्ति के लिए संकेत देगा (टीआईओ पर कोई समस्या नहीं है, लेकिन मैं इसे सभी वातावरणों में सही बनाना चाहता था)। मैं शॉर्ट-सर्किट तर्क ऑपरेटरों का उपयोग किया |और &, और त्रिगुट ?, को रोकने के लिए qकी मूल्यांकन।

1 Dictionary.com में क्वीन के लिए एक प्रविष्टि है , जिसके निचले भाग में प्रोग्रामिंग अर्थ है। चूँकि "quine" एक गणनीय संज्ञा है, इसलिए मैं तर्क देता हूँ कि "quines" एक मान्य शब्द है।


1

जावास्क्रिप्ट, एन = 8

मेरा शब्द अलर्ट है

s= alert
alert(s+
s+alert)
aaltrsee
leraatts
ertsalar
rtsaaela
tsaesarl

मेरा कोड जावास्क्रिप्ट अलर्ट फ़ंक्शन की परिभाषा को कई बार आउटपुट करता है। जावास्क्रिप्ट की चेतावनी की परिभाषा "फ़ंक्शन अलर्ट () {[देशी कोड]}" है।

कोड की केवल पहली तीन लाइनें वास्तव में आउटपुट में योगदान करती हैं। अंतिम 5 पंक्तियाँ वाक्यविन्यास त्रुटियां हैं, लेकिन मूल नियमों ने कहा कि जब तक आउटपुट सही नहीं होता तब तक सभी कोड को निष्पादित नहीं करना होगा।

यहाँ फिडेल का लिंक दिया गया है: http://jsfiddle.net/tze76pum/


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