10,000 की प्रतिष्ठा पाने के लिए बधाई!

Question

@ मार्टिनबटनर ने ठीक 10,000 की प्रतिष्ठा हासिल करने के बाद , अब हमारे पास उपयोगकर्ताओं के पेज पर 10k उपयोगकर्ताओं की तीन पूर्ण पंक्तियाँ हैं ! अब, चूंकि हम सभी प्रोग्रामर यहां हैं, इसलिए हम उन्हें मैन्युअल रूप से करने के बजाय चीजों को स्वचालित करना पसंद करते हैं। आपकी चुनौती नए 10k उपयोगकर्ताओं को स्वचालित रूप से बधाई देने के लिए एक कार्यक्रम लिखने की है।

विशिष्टता

इनपुट

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

10 20 30 40 50
15 25 35 45 55
20 30 40 50 60

या:

10 20 30 40 50,15 25 35 45 55,20 30 40 50 60

संख्याओं की प्रत्येक सूची एक ही दिन में उपयोगकर्ताओं के प्रतिष्ठा मूल्यों की सूची का प्रतिनिधित्व करती है।

उत्पादन

आउटपुट समान मात्रा में nलाइनें (या समान लंबाई की अल्पविराम से अलग की गई सूची) होगी। प्रत्येक पंक्ति / सूची आइटम होगा:

• :D अगर कोई उपयोगकर्ता था जिसकी प्रतिष्ठा सिर्फ> = 10,000 हो गई।
  • :Dयदि एक से अधिक उपयोगकर्ता मिले या 10,000 प्रतिनिधि गिने गए तो कई स्थान-अलग-अलग हैं । उदाहरण के लिए, :D :D :D3 नए 10k उपयोगकर्ताओं के लिए।
• :( और अगर इनपुट अस्पष्ट या असंभव है (तब अगले भाग में इस पर अधिक) तो आगे के आउटपुट को रोक दें।
• कुछ भी नहीं अगर इन शर्तों में से कोई भी सच नहीं है।

अस्पष्टता

यह संभव है कि इनपुट अस्पष्ट है। इस चुनौती के उद्देश्यों के लिए, हम मानते हैं कि:

• प्रतिष्ठा की टोपी प्रति दिन 200 है, इस चुनौती की खातिर स्वीकार किए जाते हैं।
• उपयोगकर्ता प्रतिष्ठा नहीं खो सकते हैं (फिर से सरलता और चुनौती के लिए)।

इनपुट को अस्पष्ट माना जाता है जब यह निर्धारित करना असंभव है कि कौन सा प्रतिष्ठा मान किस उपयोगकर्ता के अनुरूप है। उदाहरण के लिए, इनपुट में 10 20,30 40, आप यह नहीं बता सकते हैं कि 10-प्रतिनिधि उपयोगकर्ता 30-प्रतिनिधि उपयोगकर्ता या 40-प्रतिनिधि उपयोगकर्ता बन गया है या नहीं।

इनपुट असंभव माना जाता है जब एक दिन के उपयोगकर्ता संभवतः अगले दिन से उपयोगकर्ता नहीं बन सकते थे। उदाहरण के लिए, इनपुट में 10 20,310 320, यह स्थिति स्पष्ट रूप से असंभव है क्योंकि उपयोगकर्ता एक दिन में 300 प्रतिष्ठा प्राप्त नहीं कर सकते थे। प्रतिष्ठा खोने वाले उपयोगकर्ता भी असंभव हैं।

किनारे के मामले

• प्रारंभिक प्रतिष्ठा मान कुछ भी शुरू कर सकते हैं (यानी एक उपयोगकर्ता 1337 प्रतिष्ठा के साथ शुरू कर सकता है)।
• पहली पंक्ति / सूची आइटम के लिए कोई आउटपुट नहीं है।
• इनपुट हमेशा वाक्यविन्यास रूप से मान्य होगा, जिसका अर्थ है कि प्रतिष्ठा मूल्य हमेशा सकारात्मक पूर्णांक होंगे, प्रति पंक्ति / सूची आइटम, आदि में समान रूप से प्रतिष्ठा मान होंगे।
• प्रतिष्ठा मूल्यों की छंटाई नहीं की जाती है; वे किसी भी क्रम में हो सकते हैं।

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

इनपुट: 9900,10000
आउटपुट::D

इनपुट: 9900 9950 9910,10100 9950 9910,10300 10150 10110
आउटपुट::D,:D :D

इनपुट: 10 20 30,42 10 20,10 242 20,442 42 10,0 0 0,442 42 10
आउटपुट:,,,:(

इनपुट: 10 20,15 25,15 25
आउटपुट:,,

इनपुट: 9999 9998 9997,10000 9998 9997,10000 10000 9997,10300 10000 10000
आउटपुट::D,:D,:(

इनपुट: 100,90,80,70
आउटपुट::(

इनपुट: 10000 10000 10000 9999,10000 10000 10000 10000,10010 10020 10030 10040
आउटपुट::D,:(

इनपुट: 9999 9998 9997 9996,10196 10197 10198 10199,10399 10199 10197 10196
आउटपुट::D :D :D :D,

Comments

@ मार्टिनबटनर आह, यह ध्यान नहीं दिया। फिक्स्ड

— दरवाज़े

उस उदाहरण में पहला कदम भी अस्पष्ट है।

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

जबकि उदाहरण 4 अस्पष्ट नहीं है।

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

(i.e. a user can start with 1337 reputation).मुझे यह coz पसंद आया जो मेरा प्रतिनिधि था ... 5 मिनट पहले स्वागत किया जब तक कि किसी ने मेरे उत्तर में से एक को नहीं

— हटाया

उदाहरण 5, चरण 2 भी अस्पष्ट है (10k उपयोगकर्ता कौन सा है?)। उदाहरण 7 के लिए जाता है (जब तक कि आप कुछ नियम नहीं जोड़ते हैं कि समझदार समान प्रतिनिधि उपयोगकर्ता अप्रासंगिक हैं, लेकिन तब आप कैसे जानते हैं कि कौन सा उपयोगकर्ता एक दिन था, अगर वह किसी और के साथ बाद में बंधा?)

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

Answer 1

रूबी, 209 बाइट्स

संपादित करें: मैंने रूबी पर स्विच किया जिसने इसे लगभग 30% तक छोटा कर दिया। मूल गणित संस्करण के लिए संपादित इतिहास देखें। मुझे लगता है कि मुख्य बचत रूबी से आती है permutationजो समान तत्वों के स्विच किए गए पदों (जो मुझे गणितज्ञ को धोखा देना था) की अनदेखी नहीं करता है।

यह न्यूलाइन-सेपरेटेड फॉर्मेट का उपयोग करता है।

gets.split('
').map{|s|s.split.map &:to_i}.each_cons(2){|a,b|a.permutation.map{|q|q.zip(b).map{|x,y|y-x}}.reject{|d|d.any?{|x|x<0||x>200}}.size!=1?abort(':('):(puts':D '*(a.count{|d|d<1e4}-b.count{|d|d<1e4}))}

जिस्ट यह है:

• सभी दिनों के लगातार जोड़े प्राप्त करें।
• पूर्व दिन के सभी क्रमपरिवर्तन प्राप्त करें, और इनमें से प्रत्येक को वर्तमान दिन से घटाएं।
• उन सभी परिणामों को खोदें जिनमें ऐसे अंतर हों जो नकारात्मक हों या 200 से अधिक हों।
• यदि शेष क्रमपरिवर्तन की संख्या 1 नहीं है, तो आउटपुट :(।
• अन्यथा, :Dनए 10k उपयोगकर्ता के रूप में कई आउटपुट हैं।
• अंत में, पहले के बाद सभी दिन छोड़ दें :(।

कम गोल्फ:

gets.split("\n").map{|s|
  s.split.map &:to_i
}.each_cons(2){|a,b|
  a.permutation.map{|q|
    q.zip(b).map{|x,y|
      y-x
    }
  }.reject{|d|
    d.any?{|x|
      x<0||x>200
    }
  }.size!=1 ? abort(':(') : (puts ':D '*(a.count{|d|d<1e4}-b.count{|d|d<1e4}))
}

मुझे लगता है कि enumerators की एक सुंदर श्रृंखला है। :)

पुनश्च: क्या यह अजीब है कि मैं इसका जवाब देने वाला पहला व्यक्ति था?

Comments

मुझे नहीं लगता कि यह अजीब है। कुछ मुझे बताता है कि आपके पास घरेलू क्षेत्र का लाभ है;)

— केल्विन के शौक

तो यह सवाल में कुछ उदाहरणों को असफल करेगा, है ना?

— क्रंचर

@ क्रंचर यह विफल होगा जो मुझे लगता है कि कल्पना के अनुसार गलत हैं (जैसा कि मैंने टिप्पणियों में उल्लेख किया है)। अगर Doorknob उदाहरणों को ठीक करने के बजाय कल्पना को बदलने का फैसला करता है, तो मुझे लगता है कि मुझे इसे फिर से काम करना होगा।

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

@ मार्टिनबटनर यही मुझे लगा। बस की पुष्टि :)

— Cruncher

Answer 2

हास्केल, 254 249 244 232 228

import Data.List
t=m(9999<)
p(a:b:r)=(a,b,r)%(filter(all(`elem`[0..200]))$nub$m(zipWith(-)b)$permutations a)
p _=""
(a,b,r)%(_:[])=(concat$m(const":D ")$t b\\t a)++'\n':p(b:r)
_%_=":("
m=map
main=interact$p.m(m read.words).lines

थोड़ी सी व्याख्या: एल्गोरिथ्म मार्टिनबटनर द्वारा उपयोग किए जाने वाले समान है, सिवाय इसके nubकि मैंने कुछ सोचा पर खर्च किया। ध्यान दें कि एक सूची अंतर का उपयोग वर्क आउट के लिए किया जाता है कि दिन n की तुलना में कितने अधिक प्रतिष्ठा मूल्य 10000 या दिन n + 1 हैं t b\\t a।

मैं स्पेक्ट्स की व्याख्या पर भी मार्टिनबटनर से सहमत हूं और ऊपर दिए गए कुछ उदाहरण गलत हैं, यहां तक ​​कि उदाहरण के लिए कि # 2 गलत है (होना चाहिए :()।

Comments

क्या आपको उर्फ ​​नहीं होना चाहिए map?

— गर्वित हैकेलर

यह सही है (2 बाइट्स की बचत), लेकिन एक और 10 बाइट्स को zइन्फिक्स बनाकर और उसके replicate (length l) xसाथ बदलकर बचाया जा सकता है map (const x) l। हैस्केल शानदार नहीं है?

— theSpanishInquisition

यह निश्चित है। अच्छा गोल्फ! कि नोट पर, क्योंकि समारोह आवेदन सर्वोच्च प्राथमिकता है, तो आप को छोटा करने के लिए सक्षम होना चाहिए (t b)\\(t a)करने के लिए t b\\t a, 4 अधिक बाइट्स बाहर गोल्फ।

— गर्वित हैकेलर

यह अच्छा होगा अगर इन जगहों को खोजने के लिए कुछ कोड थे जहां कोड को स्वचालित रूप से छोटा किया जा सकता है ... हालांकि एक परियोजना का थोड़ा बड़ा लगता है।

— गर्वित हैकेलर

आप सही @proudhaskeller हैं, उन पेरेथेस अनावश्यक थे। धन्यवाद।

— TheSpanishInquisition