क्या तीनों पूर्णांक अलग-अलग हैं?

14

आपको इनपुट के रूप में 3 पूर्णांक दिए जाएंगे। इनपुट एक दूसरे से अलग हो सकते हैं या नहीं भी हो सकते हैं। आपको 1 आउटपुट करना होगा यदि तीनों इनपुट एक दूसरे से अलग हैं, और 0 यदि कोई इनपुट एक से अधिक बार दोहराया जाता है।

यह कोड-गोल्फ है , इसलिए अपने कोड को यथासंभव छोटा बनाएं!

code-golf  number  decision-problem 
— उपिन साजू
स्रोत
1
PPCG में आपका स्वागत है। अच्छी पहली चुनौती। हम इस साइट पर वस्तुनिष्ठ मानदंड के बारे में काफी सख्त हैं। कोड-गोल्फ यहां स्पष्ट पसंद लगता है, इसलिए मैं इसे आपकी पोस्ट में जोड़ दूंगा। यदि मैं गलत हूं तो मुझे सही करों।
— आदम
1
कुछ परीक्षण मामले अच्छे होंगे।
— Adám
19
जो कोई भी सभी जवाब downvoting है क्यों ... कम से कम व्याख्या करनी चाहिए
— Arnauld
1
@ मुझे लगता है कि एक अधिक सटीक शीर्षक क्या तीनों पूर्णांक अलग होंगे?
— अरनुलद
5
मेरे शिकार वोट एक हथौड़ा है, लेकिन के संभावित डुप्लिकेट " निर्धारित करें कि सभी दशमलव अंक अद्वितीय हैं " थोड़ा अलग है, लेकिन सबसे जवाब अभी भी पोर्ट जा सकता है।
— केविन क्रूज़सेन

जवाबों:

10

पायथन 3 , 23 21 20 बाइट्स

lambda*a:len({*a})>2

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

— TFeld
स्रोत
ओपी ने 1 बनाम 0 के लिए कहा, इसलिए शायद आपको एक और बाइट की आवश्यकता है:lambda*a:len({*a})//3
— टीएस
पायथन में @tsh 1 == True, मुझे लगता है कि इसके बारे में एक मेटा पोस्ट कहीं है
— स्टीफन
1
@tsh - प्रासंगिक मेटा "यदि यह एक नंबर की तरह क्वैक करता है , तो यह एक नंबर है" - पायथन में: False * Trueहै 0; False + Trueहै 1; आदि ...
— जोनाथन एलन
प्रासंगिक मेटा से: "यह उन चुनौतियों पर लागू नहीं होता है जहां एक सटीक स्ट्रिंग आउटपुट की आवश्यकता होती है", इसलिए मुझे यकीन नहीं है कि वास्तव में यहां क्या लागू होता है।
— जीबी
8

आर , 13 बाइट्स

एक mad()अनजाने उद्देश्य के लिए उपयोग करके @Kirill का एक अलग समाधान !

mad(scan())>0

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

— J.Doe
स्रोत
1
अच्छी तरह से इनपुट निर्दिष्ट नहीं है, इसलिए IMO 3 मानों को इनपुट के रूप में स्वीकार करता है, जिसका अर्थ है कि हम एक वेक्टर
— digEmAll
2
लगभग गोल्फ भाषाओं के साथ प्रतिस्पर्धा! : डी
— डाइजेक्सिल
1
मेरा मानना ​​है कि गॉस ने madइस उद्देश्य के लिए बिल्कुल आविष्कार किया था ।
— एनजीएम
5

आर , 24 22 20 बाइट्स

all(table(scan())<2)

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

एक बूलियन लौटाता है, लेकिन जैसा कि लोगों ने पहले ही पायथन जवाब पर चर्चा की है , यह ठीक होना चाहिए।

2 बाइट बचाने के लिए digEmAll के लिए धन्यवाद।

— किरिल एल।
स्रोत
2
— digEmAll
11 बाइट्स - यदि आपको ट्रूथी के रूप में किसी भी संख्या> 0 की अनुमति है। अन्यथा, 13 बाइट्स में आउटपुट के >0लिए संलग्न करें TRUE/FALSE।
— जे।
1
वाह, इस समारोह के बारे में भी नहीं पता था। मेरा सुझाव है कि आप इसे अलग से पोस्ट करें (अपने हटाए गए उत्तर को संपादित करें और पुनर्जीवित करें), लेकिन मुझे लगता है कि आपको 13 बाइट्स के साथ रहना होगा - जबकि टी / एफ वास्तव में 1/0, 1.48 की तरह काम करता है।
— किरिल एल।
5

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

यदि हम बूलियन मानों का उत्पादन कर सकते हैं तो अंतिम 2 बाइट्स को हटाया जा सकता है।

a=>new Set(a).size>2&1

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

एक ही बाइट काउंट के लिए, यह किसी भी आकार के सरणियों पर काम करता है, लेकिन मानता है कि इनपुट में कभी भी ए 0और आउटपुट बूलियन नहीं होगा।

a=>!a[new Set(a).size]

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

— झबरा
स्रोत
यह मानते हुए कि हम इनपुट को एक सरणी के रूप में ले सकते हैं और एक बूलियन वापस लौटा सकते हैं:a=>new Set(a).size>2
— अरनौल्ड
@Arnauld, हाँ, मेरे पास वह भी था, लेकिन जैसा कि यह कल्पना करता है कि यह अनुमति नहीं देगा - अगर अद्यतन बदलता है, हालांकि।
— झबरा
अरे रुको। मैं सिर्फ &122 बाइट्स के लिए सौदा कर सकता हूं ।
— झबरा
4

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

->a{1-(a<=>a|a)}

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

— जीबी
स्रोत
-3 बाइट्स के साथuniq!
— benj2240
रूबी में बुलियन और इंटेगर अलग-अलग प्रकार के होते हैं।
— जीबी
आह, तुम सही हो। मैंने चुनौती को पर्याप्त रूप से नहीं पढ़ा, और मान लिया कि एक सत्य / असत्य आउटपुट पर्याप्त होगा।
— बेन्ज 2240
4

क्यूबिक्स , 55 25 बाइट्स

-29 जो किंग को धन्यवाद

O@O1u|@O@II-!/;I-!/;u^?-p

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

यह काफी कुछ बाइट्स को बंद करना संभव होना चाहिए।

— ल्यूक
स्रोत
— जो किंग
बहुत बहुत धन्यवाद। मैं 14 बाइट्स में कुल 25 बाइट्स पर आने के लिए 1 और बाइट शेव करने में कामयाब रहा
— ल्यूक
मुझे लगता है कि आप 9 वें स्थान पर एक @जगह से चूक रहे होंगे .। यह 1 2 2 के लिए कुछ कायरतापूर्ण बातें करता है
— मिकी
3

05AB1E , 2 बाइट्स

ÙQ

इसे ऑनलाइन आज़माएं या कुछ और मामलों को सत्यापित करें ।

स्पष्टीकरण:

Ù     # Uniquify the (implicit) input
 Q    # Check if it's still equal to the (implicit) input
— केविन क्रूज़सेन
स्रोत
निर्णय-समस्या के लिए मानक सत्य / मिथ्या नियमों का उपयोग करते हुए, यह ध्यान में रखते हुए कि 105AB1E में एकमात्र सत्य मूल्य है, ¢Pसाथ ही वैकल्पिक 2- बायटर का काम करता है।
— श्री एक्सकोडर
1
@ Mr.Xcoder मुझे यकीन है कि वर्तमान में मान्य है कि वास्तव में नहीं कर रहा हूँ - प्रश्न आउटपुट 1 और 0 के लिए पूछता है - 4उदाहरण के लिए, है न 1है और न ही 0और न ही तरह काम नहीं करता 1या 0(जैसे Trueऔर Falseअजगर में करते हैं)। सवाल शायद सत्य / असत्य के लिए पूछना चाहिए लेकिन वर्तमान में ऐसा नहीं है।
— जोनाथन एलन
3

गणितज्ञ, 13 बाइट्स

Boole[E!=##]&

शुद्ध कार्य। इनपुट और रिटर्न 0या 1आउटपुट के रूप में तीन पूर्णांक लेता है । मुझे पता है कि यह डेविड जी स्टॉर्क के जवाब के समान है , लेकिन यह SlotSequenceएक बाइट से दाढ़ी बनाने के लिए शोषण करता है (जैसा कि तुलना में Boole@*Unequal)।

— LegionMammal978
स्रोत
3

ब्रेनफक , 91 बाइट्स

,>,>,[-<-<->>]>>+++++++[>+++++++<-]+<<<<[>]>>[<<<[-<->]<[>]>>->[>.<<<->>-]<+]<+[>>>[>]<-.>]

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

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

,>,>,                   'read input as A, B, and C
[-<-<->>]>>+            'compute A-C, B-C
++++++[>+++++++<-]+     'prepare output
<<<<[>]>>               'if A-C != 0 && B-C != 0
[
    <<<[-<->]           'compute A-B
    <[>]>>->            'if A-B != 0
    [>.<<<->>-]         'print 1
    <+
]
<+
[                       'else (this else is for both of the if statements, even though they are nested... wierd, I know)
    >>>[>]              
    <-.>                'print 0
]
— Prismo
स्रोत
2

जाप -N, 3 बाइट्स

eUâ

कोशिश करो

व्याख्या

Uâeयदि यह मूल के बराबर है तो इनपुट और परीक्षणों को काट देता है ।

— झबरा
स्रोत
2

पॉवर्सशैल, 27 25 बाइट्स

-2 बाइट्स धन्यवाद @AdmBorkBork

+!(($args|group).Count-3)

टेस्ट स्क्रिप्ट:

$f = {
+!(($args|group).Count-3)
}

&$f 1 2 3
&$f 3 2 1
&$f 2 1 3
&$f 2 2 3
&$f 2 1 1
&$f 2 1 2

स्पष्टीकरण:

    $args|group           # Group arguments
   (           ).Count    # Count of groups 
  (                   -3) # is 0 if inputed integers are unique
 !                        # operator not converts int to boolean: true if integers are unique
+                         # converts boolean to int: 1 if integers are unique, otherwise 0
— Mazzy
स्रोत
1
26 बाइट्स -+(($args|group).count-eq3)
— AdmBorkBork
महान! और धन्यवाद
— mazzy
1

एपीएल (Dyalog यूनिकोड) , 3 बाइट्स SBCS

बेनामी tacit उपसर्ग समारोह। सूची को तर्क के रूप में लेता है।

∪≡⊢

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

∪ तर्क से अद्वितीय तत्वों का सेट करता है

≡ मेल खाते हैं

⊢ बिना तर्क के?

— एडम
स्रोत
1

अटैची , 10 बाइट्स

`==#Unique

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

यह ऑपरेटर का एक कांटा है `==और इसके Uniqueबराबर है:

{ _ == Unique[_] }

वैकल्पिक

{#_=#Unique[_]} (15 बाइट्स)

Any##Same=>Pairs@Sort (21 बाइट्स)

Any@{`=&>_[[0'1,1'2,2'0]]} (26 बाइट्स)

&${not(x=y or y=z or x=z)} (26 बाइट्स)

&${x/=y and y/=z and x/=z} (26 बाइट्स)

{Any!Same=>Chop&2!_[0'1'1'2'2'0]} (33 बाइट्स)

— कोनोर ओ ब्रायन
स्रोत
1

जावा 9, 43 27 बाइट्स

@Olivier Grégoire को धन्यवाद

(a,b,c)->a!=b&b!=c&a!=c?1:0

पिछला प्रयास:

(a)->a[0]==a[1]||a[0]==a[2]||a[1]==a[2]?0:1
— Quintec
स्रोत
1
इसे 43 बाइट्स के रूप में क्यों नहीं गिना जाता है
— ASCII-only
1
27 बाइट्स : (a,b,c)->a!=b&b!=c&a!=c?1:0।
— ओलिवियर ग्रेजायर
इसके अलावा, पहला कोड (100 बाइट्स) संकलित नहीं करता है और उपयोग करता है ==जो उन Stringमुद्दों के बिना लागू नहीं होता है, जिनका आप यहां सामना करते हैं (संकलन फिक्स के बाद), और दूसरे कोड में, कोई डुप्लिकेट प्रदान किए जाने पर Set.ofविधि फेंक देगाIllegalArgumentException । मैं -1 के लिए परीक्षा नहीं कर रहा हूँ।
— ओलिवियर ग्रेजायर
@olivier माफी-यह देर हो चुकी थी और मैंने अपने दिमाग में कुछ अलग विचारों को मिलाया। Set.of के लिए, मैं सिर्फ जावा 9 किंक के साथ प्रयोग कर रहा था और स्वयं जावा 9 नहीं है। मुझे प्रलेखन को अधिक ध्यान से पढ़ना चाहिए, इस बारे में खेद है। अपने कंप्यूटर पर मिलते ही मैं संपादित करूँगा।
— क्विंटेक
1

टी-एसक्यूएल, 39 बाइट्स

SELECT IIF(a=b OR b=c OR c=a,0,1)FROM s

इनपुट अलग-अलग कॉलम के रूप में लिया जाता है एक, ख, ग एक पूर्व मौजूदा तालिका से रों , हमारे आईओ मानकों के अनुसार ।

COUNT DISTINCTअलग-अलग पंक्तियों के रूप में लिए गए इनपुट से भिन्नता की कोशिश की , लेकिन यह एक युगल बाइट्स था।

— BradC
स्रोत
1

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

s{I

सूची के रूप में इनपुट लेता है।
इसे यहाँ आज़माएँ

व्याख्या

s{I
 {IQ     Check if the (implicit) input is invariant under deduplication.
s        Cast to int.

अगर हमें 1 और 0 के रूप में ट्रू और फाल्स का इलाज करने की अनुमति दी जाती है (जो कि वे पायथ में हुड के नीचे हैं), हम sनीचे 2 बाइट्स प्राप्त करने के लिए छोड़ सकते हैं ।

1

स्माइलबासिक, 25 24 बाइट्स

READ A,B,C?A-B&&B-C&&C-A
— 12Me21
स्रोत
1

> <> , 19 17 बाइट्स

जो किंग द्वारा -2 बाइट्स।

:{:{:{=}=}=++0=n;

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

— PidgeyUsedGust
स्रोत
— जो किंग
मुझे निश्चित रूप से पकड़ना चाहिए था, धन्यवाद!
— पिज्ज़यूयूडगस्ट
@RushabhMehta कृपया अन्य उपयोगकर्ता के गोल्फ सुझाव का उपयोग करके अन्य उपयोगकर्ता के पोस्ट को गोल्फ न करें।
— जोनाथन फ्रेच
1

q 14 बाइट्स

{x~distinct x}

तकनीकी रूप से यह समाधान '1b' या '0b' लौटाएगा, जो एक बूलियन मान को सांख्यिक प्रकार से अलग किया जाता है, हालांकि यह सभी अंकगणितीय कार्यक्षमता को बनाए रखता है, और इसलिए सार 1 या 0 में है:

q)1b +35
36

1 या 0 गैर-बूलियन वापस करने के लिए आपके पास नीचे है, जो बाइट की गिनती को 21 तक ले जाता है

{$[x~distinct x;1;0]}
— Thaufeki
स्रोत
1
{1&/0N>':x?x}
— ngn 28’18
1

जावास्क्रिप्ट (Node.js) , 67 बाइट्स

f=a=>a.map((m,i)=>a.map((n,j)=>m==n&i!=j).every(z=>!z)).every(y=>y)

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

क्षमा करें, लेकिन J उत्तर यहां पहले से ही है और कोड बिल्कुल समान है।
— बब्बलर
मेरे खराब @ बब्बल ने आने वाले को नहीं देखा।
जेएस उत्तर में बदल गया
@ बब्बल डुप्लिकेट प्रविष्टियाँ अस्वीकृत नहीं हैं ।
— जोनाथन फ्रैच
1

जेली , 5 6 बाइट्स

ɠḲQL=3

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

5 से 6 बाइट्स से क्योंकि यह मेरा पहला मौका है और मैंने इसे (व्हाट्स अप) मैसेज किया है

ɠḲQL=3
^^^^^
||||Is it equal to three?
|||How many unique numbers do we have? (length of unique numbers array)
||Sort By Unique
|Split by Spaces
Read Input
— बिल्ली का बच्चा गले लगाया
स्रोत
1
नमस्कार और पीपीसीजी में आपका स्वागत है। क्या आपका कोड भी काम करता है 3 integers, या यह केवल तीन अंकों के लिए कार्यात्मक है?
— जोनाथन फ्रेच
@ जोनाथन फ्रैच सैडली, यह केवल तीन 1 अंकों की संख्या के लिए काम करता है, यह अद्वितीय वर्णों द्वारा इनपुट को सॉर्ट करके करता है, फिर परीक्षण करता है यदि अद्वितीय वर्णों की मात्रा इनपुट के समान लंबाई है। शायद यह किसी भी 3 पूर्णांक के साथ काम करने का एक तरीका है, लेकिन मुझे लगता है कि यह मेरे लिए कम से कम एक अच्छा प्रयास है!
— बिल्ली का बच्चा हुगर
2
चुनौती निर्दिष्ट करती है आपको इनपुट के रूप में 3 पूर्णांक दिए जाएंगे। जो आपके उत्तर को अमान्य करार देता है।
— जोनाथन फ्रेच
@JonathanFrech ने अब इसे ठीक कर दिया है! क्या मेरा पहली बार इस तरह का काम कर रहा था, मैं इस पर सबसे बड़ा नहीं हूं।
— बिल्ली का बच्चा हुगर
हमारी साइट का प्रयोग करके, आप स्वीकार करते हैं कि आपने हमारी Cookie Policy और निजता नीति को पढ़ और समझा लिया है।
Licensed under cc by-sa 3.0 with attribution required.