15

हाल ही में एक और दो चरित्र की भाषा पर क्रेज से प्रेरित होकर, ;#

पहचान

सामुदायिक आम सहमति के अनुसार , इस साइट पर स्वीकार्य उत्तर प्रोग्रामिंग भाषाओं का उपयोग करना चाहिए, जो कि न्यूनतम:

यह निर्धारित कर सकता है कि क्या प्राकृतिक संख्या प्रधान है
दो प्राकृतिक संख्याओं को एक साथ जोड़ सकते हैं
संख्याओं की एक सूची / टपल का प्रतिनिधित्व कर सकते हैं, साथ ही एक ही संख्या भी

इस चुनौती के प्रयोजनों के लिए, हम # 3 की उपेक्षा करेंगे। इसलिए, इस साइट पर इस्तेमाल की जाने वाली सबसे सरल भाषा (# 3 को अनदेखा करना) में वास्तव में दो कमांड होंगे, isPrimeऔर add। व्याख्या और बाइट गिनती में आसानी के लिए, मान असाइन जाने isPrimeके लिए pऔर addकरने के लिए +। इस प्रकार, हम, हमारी भाषा है +p। आपकी चुनौती कुछ +pकोड की व्याख्या करना है ।

व्यवहार

+addअनुदेश दो नंबर लेता है, उन्हें जोड़ता है, और परिणाम आउटपुट
pisPrimeअनुदेश एक संख्या लेता है, और आउटपुट 1अगर यह प्रधानमंत्री है, और 0अगर यह नहीं है

नियम

आपको एक प्रोग्राम / फंक्शन लिखना होगा, जिसमें अक्षरों की एक स्ट्रिंग दी गई हो, उस स्ट्रिंग को +pकोड के रूप में व्याख्या करता है । आप अच्छी तरह से गठित इनपुट (केवल +और pवर्ण) मान सकते हैं ।
इनपुट लचीला है। आप प्रोग्राम में एक स्ट्रिंग, चरित्र सरणी, कोडपॉइंट्स के पूर्णांक सरणी आदि के रूप में ले सकते हैं, व्याख्या किए जा रहे कार्यक्रम के लिए इनपुट भी लचीला है। आप पूर्णांक सरणी में ले सकते हैं, और प्रविष्टियों का उपयोग कर सकते हैं क्योंकि कार्यक्रम निष्पादित होता है, या प्रत्येक निर्देश ( +और p) व्यक्तिगत रूप से इनपुट का अनुरोध कर सकते हैं। आप मान सकते हैं कि हर निर्देश के लिए पर्याप्त इनपुट होगा। इनपुट को 0 और 200 के बीच संख्याओं से युक्त करने की गारंटी है (लेकिन आपके एल्गोरिदम को सैद्धांतिक रूप से किसी भी सकारात्मक पूर्णांक इनपुट के लिए काम करना चाहिए)।
आउटपुट भी लचीला है। आप परिणामों को प्रिंट कर सकते हैं, उन्हें एक सूची के रूप में वापस कर सकते हैं, एक स्ट्रिंग लौटा सकते हैं जिसमें सभी परिणाम शामिल हैं, आदि। यदि मुद्रित या एक स्ट्रिंग के रूप में लौटा है, तो आउटपुट को कुछ गैर-अंक, सुसंगत विभाजक, जैसे एक नई लाइन, द्वारा अलग किया जाना चाहिए। टैब, स्थान या ,वर्ण। आपके पास एक अनुगामी विभाजक या कुछ अनुगामी व्हाट्सएप हो सकता है। साथ ही, pइसका आउटपुट कोई भी सत्य या गलत मूल्य हो सकता है, जैसा कि आप जिस भाषा में काम कर रहे हैं, उसके बजाय 1या उसके द्वारा परिभाषित किया गया है 0।
दुभाषिया समाप्त हो सकता है या नहीं हो सकता है (यदि यह एक पूर्ण कार्यक्रम है), लेकिन सभी निर्देशों की व्याख्या के बाद इसे छपाई बंद कर देना चाहिए। (यह हमेशा के लिए विभाजक, या अशक्त चरित्र, आदि को जारी नहीं रख सकता)।
ये मानक कमियां डिफ़ॉल्ट रूप से मना की जाती हैं
यह कोड-गोल्फ है , कम से कम बाइट्स जीत के साथ जवाब

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

Program: +
Input: [56, 50]
Output: 106 
----------------------------------
Program: p
Input: [12]
Output: 0 
----------------------------------
Program: p
Input: [13]
Output: 1 
----------------------------------
Program: ++
Input: [172, 120, 33, 58]
Output: 292 91 
----------------------------------
Program: p
Input: [29]
Output: 1 
----------------------------------
Program: pp
Input: [176, 12]
Output: 0 0 
----------------------------------
Program: ++++p
Input: [32, 16, 69, 197, 73, 171, 21, 178, 72]
Output: 48 266 244 199 0 
----------------------------------
Program: pp+++p+pp+
Input: [151, 27, 119, 189, 198, 107, 174, 15, 166, 106, 134, 108, 169, 55, 42]
Output: 1 0 308 305 189 0 240 0 0 97 
----------------------------------
Program: p+p+++++++pp+p
Input: [143, 67, 30, 149, 178, 52, 112, 122, 55, 122, 142, 199, 20, 175, 138, 80, 116, 180, 50, 116, 15, 92, 74]
Output: 0 97 1 230 234 177 341 195 218 296 0 0 107 0 
----------------------------------
Program: ++p++p+pp+++++p+p+pp++
Input: [120, 177, 23, 116, 163, 52, 65, 98, 177, 16, 96, 131, 160, 48, 153, 0, 139, 33, 62, 49, 129, 86, 99, 135, 187, 80, 137, 130, 113, 136, 0, 1, 186, 100, 38, 153]
Output: 297 139 1 117 275 0 227 0 0 153 172 111 215 234 0 217 0 249 0 0 286 191 
----------------------------------
Program: ++p+++++p+p+++++++
Input: [181, 169, 6, 84, 68, 171, 129, 107, 106, 114, 197, 58, 11, 88, 156, 169, 43, 77, 49, 43, 102, 78, 93, 51, 91, 37, 64, 93, 82, 126, 181, 81, 44]
Output: 350 90 0 300 213 311 69 244 0 120 0 145 171 142 101 175 307 125 
----------------------------------
Program: ++p+
Input: [131, 127, 115, 40, 113, 196, 83]
Output: 258 155 1 279 
----------------------------------
Program: +ppp++p+ppp+p++++++++p+p+++pp+ppp++
Input: [6, 9, 187, 168, 96, 167, 178, 139, 86, 148, 99, 103, 166, 18, 119, 15, 132, 77, 16, 88, 139, 34, 58, 90, 43, 69, 68, 152, 59, 106, 134, 49, 155, 100, 52, 55, 27, 188, 41, 77, 23, 49, 171, 23, 193, 84, 111, 165, 80, 18, 63, 23, 116, 112, 119]
Output: 15 0 0 0 345 225 0 202 0 0 0 147 0 104 173 148 112 220 165 183 255 0 82 0 118 72 194 1 0 276 0 0 0 139 231 
----------------------------------
Program: ++++++++p++++++++++++
Input: [156, 5, 34, 25, 117, 98, 139, 131, 88, 82, 191, 13, 1, 170, 51, 116, 144, 85, 92, 170, 25, 94, 149, 131, 19, 161, 115, 160, 8, 6, 195, 101, 11, 185, 87, 50, 33, 140, 188, 135, 164]
Output: 161 59 215 270 170 204 171 167 0 177 195 243 150 276 168 201 112 272 83 328 299 
----------------------------------

कई, कई, बहुत लंबे समय तक परीक्षण के मामले

जावा कोड परीक्षण मामलों को उत्पन्न करने के लिए उपयोग किया जाता है

उदाहरण

नीचे एक ungolfed जावा फ़ंक्शन है जो व्याख्या करेगा +p:

public static void interpret(String program, int[] input) {
    int index = 0;
    for (char inst : program.toCharArray()) {
        switch (inst) {
            case '+':
                System.out.print((input[index++] + input[index++]) + " ");
                break;
            case 'p':
                int n = input[index++];
                System.out.print((isPrime(n) ? 1 : 0) + " ");
                break;
        }
    }
}

public static boolean isPrime(long n) { //Taken from /programming//a/2385999/4484294
    if (n < 2) return false;
    if (n == 2 || n == 3) return true;
    if (n % 2 == 0 || n % 3 == 0) return false;
    long sqrtN = (long) Math.sqrt(n) + 1;
    for (long i = 6L; i <= sqrtN; i += 6) {
        if (n % (i - 1) == 0 || n % (i + 1) == 0) return false;
    }
    return true;
}

नोट: खोज क्वेरी का उपयोग करते हुए prime AND add AND interpret is:question, इस प्रश्न के लिए कोई डुप्लिकेट नहीं दिखाई देता है। यदि कोई है, तो क्षमा करें।

code-golf interpreter

— सोक्रेटिक फीनिक्स
स्रोत

आपके आउटपुट में pविभाजक के बिना परिणाम घोषित किए जाते हैं, क्या यह इरादा है?

— गैबेर फेकेट

क्या हम एक अनुमानी प्रधान परीक्षा का उपयोग कर सकते हैं? यानी isprimeजूलिया में।

— R

मैंने उस उन्माद को शुरू किया! लेकिन ... यह क्या किया है? रोबोट ... नहीं!

— केयर्ड सिक्काहिंगाहिंग

दिलचस्प रूप से पर्याप्त है, मैंने चुनौती के ठीक उलट किया है

— caird coinheringaahing

@ GáborFekete वे हैं? वे मुझे ठीक लगते हैं ...

— सुकरात फीनिक्स

31

05AB1E , 5 बाइट्स

vy.V,

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

व्याख्या

यह चुनौती एक दस्ताने की तरह 05AB1E फिट है :)

vy      # for each instruction in the program
  .V    # execute as 05AB1E code
    ,   # print

— Emigna
स्रोत

6

निश्चित रूप से नौकरी के लिए सही उपकरण।

— आउटगॉल्फ को एरिक करें

1

यह धोखा लगता है ... मेरा मतलब वास्तव में है।

— क्रिस्टोफर

@Christopher: सौभाग्य +और pसाधन जोड़ने और isPrime में 05AB1E :)

— Emigna

@Emigna मैंने कभी 05AB1E का उपयोग नहीं किया है, इसलिए मुझे कुछ पता नहीं था! चतुर उत्तर :)

— सामाजिक फीनिक्स

@Emigna रुको आप पहेली थे?

— क्रिस्टोफर

7

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

l,p=input()
i=j=0
while len(l)-i:print(int(all(l[i]%k for k in range(2,l[i])))if p[j]=='p'else l[i]+l[i+1]);i+=1+'p+'.find(p[j]);j+=1

-2 बाइट्स कुंदर के लिए धन्यवाद

— HyperNeutrino
स्रोत

i,j=0,0बेमानी है, है ना? यह नहीं हो सकता है i,j=0?

— पावेल

1

@Phoenix: नहीं, यह काम नहीं करेगा। आप i=j=0हालांकि कर सकते हैं ।

— निक

6

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

p,i=input()
for c in p:n=i.pop(0);print all(n%k for k in range(2,n))if c>'+'else n+i.pop(0)

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

— OVS
स्रोत

5

हास्केल, 88 79 बाइट्स

('+':r)!(a:b:c)=a+b:r!c
('p':r)!(a:c)=min(foldr((*).mod a)1[2..a-1])1:r!c
_!e=e

"commands" ! [args] उपयोग के लिए।

@Laikoni (# 56433) के लिए 9 बाइट्स का धन्यवाद

मैं अभी भी हास्केल सीख रहा हूं; गोल्फ युक्तियाँ की सराहना की!

— Quelklef
स्रोत

कार्यों के लिए infix संकेतन का उपयोग करने के लिए यह टिप आपको कुछ बाइट्स बचा सकता है। साथ ही आधार मामले i _[]=[]को अंतिम पैटर्न मिलान नियम के रूप में स्थानांतरित किया जा सकता है और फिर इसे छोटा कर दिया जा सकता है i _ e=e, या कुछ ऐसा ही किया जा सकता है जैसे _!e=eकि आपने इनफ्लेशन के लिए स्विच किया था।

— लकोनी

(min$product ...हो सकता है min(product ...।

— लकोनी

product$map(mod a)को छोटा किया जा सकता है foldr((*).mod a)1।

— लकोनी

4

रूबी 2.4, 77 + 7 = 84 बाइट्स

-rprimeझंडे का उपयोग करता है ।

->g,i{g.chars.map{|c|c==?p?i.shift.prime?? 1:0: c==?+?i.shift(2).sum: p}-[p]}

— मान स्याही
स्रोत

4

पर्ल 6 , 70 बाइट्स

{@^b.rotor($^a.comb.map(1+(*ne'p'))).map({$_-2??.[0].is-prime!!.sum})}

पहले rotorविधि का उपयोग इनपुट सूची को आकार 1 या 2 के टुकड़ों में विभाजित करने के लिए किया जाता है, जो इस बात पर निर्भर करता है कि कार्यक्रम का अगला चरित्र है pया नहीं। फिर उस चिन्हित सूची को मैप किया जाता है; आकार 2 के विखंडन को अभिव्यक्त किया गया है, और आकार 1 के विखंडन में उनके एकमात्र तत्व का परीक्षण किया जाता है।

— शॉन
स्रोत

3

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

ÆP,+/ị@L
OḂ‘Bṁ@Ç€K

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

वैकल्पिक समाधान, 18 बाइट्स

⁴Ḣ
¢+¢µ¢ÆPµḂ?
OÇ€K

यह एक ऑनलाइन कोशिश करो!

— fireflame241
स्रोत

3

सी #, 130 129 बाइट्स

p=>d=>{var i=0;p.Any(c=>{Console.Write((c==43?d[i++]+d[i]:Enumerable.Range(2,d[i]-2).Any(x=>d[i]%x==0)?0:1)+" ");return++i<0;});}

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

फ़ंक्शन को बंद करके 1 बाइट सहेजा गया (साइयो के लिए धन्यवाद)

— Mormegil
स्रोत

यकीन नहीं है आप कैसे सी # काम करता है, लेकिन बदल सकता है (p,d)=>के लिए p=>d=>एक बाइट बचाने के लिए और एक curried समारोह बनाने के लिए?

— साइओस

सही है, धन्यवाद। (यह बहस का विषय है कि बाइट काउंट में आवश्यक सी # बॉयलरप्लेट को कितना शामिल किया जाना चाहिए, लेकिन हाँ, आप इसे लिख सकते हैं। (लिंक किए गए TIO को देखें।)

— मॉर्मगिल

2

पावरशेल 3+, 151 121 बाइट्स

$r,$v=$args;$p={0-notin((2..(($n=0+"$args")-1)|%{$n%$_}))};$i=0;$r|%{if($_-eq"p"){&p $v[$i]}else{$v[$i]+$v[($i+=1)]}$i++}

PowerShell का कोई प्राइम बिल्ट-इन नहीं है इसलिए मुझे अपना रोल करना पड़ा। मेरा पहला संस्करण बहुत ही भयानक था और मैंने अन्य सभी से लिया जो कि मापांक के परिणामों के बीच 0 के लिए परीक्षण करता है जो बहुत कुछ बचाता है। इसके -notinबजाय का उपयोग करके कुछ बाइट्स sabed -notcontainsलेकिन इसका मतलब है PowerShell v2 बाहर है।

टिप्पणी आधारित व्याख्या

# $r is the program code. Assumed char array
# $v is the remaining variables in an assumed integer array.
$r,$v=$args
# Anonymous function to determine if a number is a prime or not.
# Test all potential factors. Check if any 0 modulus remainders are present
$p={0-notin((2..(($n=0+"$args")-1)|%{$n%$_}))}
# $i is an index for tracking location in $v
$i=0
# Cycle each of the instructions
$r|%{if($_-eq"p"){
        # Call the prime checking anonymous function on this number
        &p $v[$i]
    }else{
        # Add the next two numbers. Adjust the index accordingly. 
        $v[$i]+$v[($i+=1)]

    }
    # Next number in list. 
    $i++  
}
    # Next number in list. 
    $i++  
}

— मैट
स्रोत

1

एफ #, 130 बाइट्स

let rec r=function|[],_->()|'+'::t,f::s::u->printf"%i "(f+s);r(t,u)|_::t,n::u->printf"%b "(List.exists((%)n>>(=)0)[2..n-1]);r(t,u)

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

— ब्रूनर
स्रोत

0

QBasic, 122 बाइट्स

INPUT p$
FOR i=1TO LEN(p$)
INPUT x
IF"+"=MID$(p$,i,1)THEN INPUT y:?x+y:ELSE f=0:FOR j=2TO x:f=f-(x MOD j=0):NEXT:?f=1
NEXT

कोड को इनपुट की एक पंक्ति के रूप में लेता है, फिर प्रत्येक इनपुट नंबर को अपनी लाइन पर लेता है। आउटपुट इनपुट के साथ इंटरप्रेस्ड हैं क्योंकि वे गणना करते ही प्रिंट हो जाते हैं। सत्य मूल्य है -1; झूठा है 0।

— DLosc
स्रोत

व्याख्या + पी कोड

05AB1E , 5 बाइट्स

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

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

हास्केल, 88 79 बाइट्स

रूबी 2.4, 77 + 7 = 84 बाइट्स

पर्ल 6 , 70 बाइट्स

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

सी #, 130 129 बाइट्स

पावरशेल 3+, 151 121 बाइट्स

टिप्पणी आधारित व्याख्या

एफ #, 130 बाइट्स

QBasic, 122 बाइट्स