क्या कोड समाप्त होता है?

Question

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

def is_perfect(n):
    return sum(i for i in range(1, n) if n % i == 0) == n

n = 3
while not is_perfect(n):
    n = n + 2

गणितज्ञ यह अनुमान लगाते हैं कि कोई विषम संख्या नहीं है, लेकिन यह कभी भी सिद्ध नहीं हुआ है, इसलिए कोई भी नहीं जानता है कि क्या यह कोड कभी समाप्त होगा। क्या आप कोड के अन्य टुकड़ों के साथ आ सकते हैं (शायद Collatz अनुमान जैसी अन्य खुली समस्याओं पर भरोसा कर रहे हैं, या जुड़वां प्राइम अनुमान) छोटे हैं, लेकिन जिनके लिए यह अज्ञात है कि क्या वे समाप्त होते हैं या नहीं?

संपादित करें: कुछ लोगों ने एक अच्छा अतिरिक्त नियम लाया है - प्रश्न का समाधान निर्धारक होना चाहिए। यद्यपि यह और भी दिलचस्प हो सकता है यदि आप नोंदेर्मेरिनिज़्म का उपयोग करके कम समाधान पा सकते हैं। इस मामले में, नियम एक स्निपेट खोजना होगा जिसके लिए समाप्ति की संभावना अज्ञात है।

Comments

PPCG में आपका स्वागत है!

— लुइस मेंडो

आपका कोड 50 बाइट्स golfed जा सकता है: n=3 while sum(k*(n%k<1)for k in range(1,n))-n:n+=2।

— xnor

यह वास्तव में एक महान अवधारणा है। इस तरह मूल विचारों को देखना अच्छा है।

— नाथन मेरिल

@ मुझे लगता है कि यह चुनौती केवल तभी काम करती है जब आप अनंत डेटा प्रकारों को ग्रहण करते हैं जो स्वचालित रूप से अनंत स्मृति ग्रहण करेंगे।

— मार्टिन रोसेनौ

जब मैंने शीर्षक पढ़ा तो मुझे लगा कि आप चाहते थे कि हम हॉल्टिंग समस्या को हल करें और समाधान को गोल्फ करें।

— MrPaulch

Answer 1

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

!‘Ʋµ4#

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

पृष्ठभूमि

एक बार जब यह Brocard की समस्या का चौथा समाधान मिल जाता है , तो एक समाधान n! + 1 = m ≠ के साथ (n, m) 4 (4, 5), (5, 11), (7, 71) धनात्मक पूर्णांक पर। कार्यान्वयन फ़्लोटिंग पॉइंट अंकगणित का उपयोग नहीं करता है, इसलिए यह केवल तभी समाप्त होगा जब यह एक चौथा समाधान या अगर n पता करता है ! अब स्मृति में प्रतिनिधित्व नहीं किया जा सकता है।

इस उत्तर में पहली बार @xnor द्वारा Brocard की समस्या का उपयोग किया गया था ।

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

!‘Ʋµ4#  Main link. No arguments. Implicit argument: 0

    µ4#  Convert the links to the left into a monadic chain and call it with
         arguments k = 0, 1, 2, ... until 4 of them return 1.
!        Factorial; yield k!.
 ‘       Increment; yield k! + 1.
  Ʋ     Squareness; return 1 if k! + 1 is a perfect square, 0 if not.

Comments

मुझे जेली सीखने की ज़रूरत है ...

— noɥʇʎԀʎz to

Answer 2

जेली , 11 9 बाइट्स

ÆẸ⁺‘ÆPµ6#

छठे फ़र्मेट प्राइम पाए जाने के बाद यह समाप्त हो जाएगा ।

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

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

ÆẸ⁺‘ÆPµ6#  Main link. No arguments. Implicit argument: 0

      µ6#  Convert the links to the left into a monadic chain and call it with
           arguments k = 0, 1, 2, ... until 6 of them return 1.
ÆẸ         Convert [k] to the integer with that prime exponent factorization, i.e.,
           into 2 ** k.
  ⁺        Repeat.
   ‘       Increment.
           We've now calculated 2 ** 2 ** k + 1.
    ÆP     Test the result for primality.

Answer 3

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

fP_h^2^2T5

अनुमान का उपयोग करता है कि सभी Fermat संख्या के 2^(2^n)+1 लिए समग्र हैं n>4।

f        5   Find the first number T>=5 for which
   h^2^2T    2^(2^T)+1
 P_          is prime                   

Answer 4

पायथन, 36 बाइट्स

k=n=1
while(n+1)**.5%1+7/k:k+=1;n*=k

Brocard की समस्या का उपयोग करता है :

किसी भी n !8 के लिए n? +1 एक सही वर्ग है?

क्रमिक तथ्यों की गणना करता है और जाँचता है कि क्या वे वर्ग हैं और हैं k>7। 2 बाइट्स के लिए डेनिस को धन्यवाद!

यह मानता है कि अजगर बड़ी संख्या में मनमाने ढंग से सटीक अंकगणित करता रहता है। वास्तविक कार्यान्वयन में, यह समाप्त हो जाता है।

Comments

के -~n**.5स्थान पर काम नहीं करेगा (n+1)**.5?

— ETHproductions

@ETHproductions exponentation की वरीयता का पूर्वता तुलना में अधिक है ~, तो यह है कि सिर्फ एक उठाएंगे लेखन त्रुटि एक नाव बिटवाइज़ नकारना करने की कोशिश कर के लिए।

— डेनिस

Answer 5

पर्ल, 50 38 36 34 33 बाइट्स

$_=196;$_+=$%while($%=reverse)-$_

व्याख्या: १ ९ ६ एक संभावित लिकरेल संख्या है - एक ऐसी संख्या जो बार-बार अपने आप को जोड़कर एक पैलिंड्रोम नहीं बनाती है। लूप तब तक जारी रहता है जब तक $ n इसके रिवर्स के बराबर नहीं होता है, जो कि प्रारंभिक मूल्य 196 के लिए अभी तक अज्ञात है।

25 + 52 = 77

जो मान्य नहीं है।

96 + 69 = 165
165 + 561 = 726
726 + 627 = 1353
1353 + 3531 = 4884

इसलिए इस क्रम में कोई भी संख्या मान्य नहीं है।

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

संपादित करें: निहित तर्क के लिए 2 बाइट बचाने के लिए के $nसाथ प्रतिस्थापित । मुझे लगता है कि यह उतना ही गोलबंद है जितना कि इस कार्यान्वयन को प्राप्त होने वाला है।$_reverse

संपादित करें: मैं गलत था। उपयोग करने के बजाय until($%=reverse)==$_मैं जा सकता हूं जबकि अंतर नॉनजरो (यानी सच) है while($%=reverse)-$_:।

Comments

के बाद से वहाँ संभव सादा पर्ल नंबर की एक सीमित संख्या मैं वास्तव में निर्धारित कर सकते हैं कि यह कार्यक्रम समाप्त होता है या नहीं। इस काम को करने के लिए आपको एक बड़े पैकेज को लोड करने की आवश्यकता है (या इसे लागू करना)

— टन हास्पेल

कर दो। मैं तुम्हें चुनौती देता हूं। :-)

— वेकी

Answer 6

MATL, 11 बाइट्स

`@QEtZq&+=z

अगर गोल्डबैक अनुमान गलत है , तो टर्मिनेट करें । यही कारण है कि यह कार्यक्रम बंद हो जाता है अगर यह 2दो से अधिक संख्या के योग के रूप में व्यक्त नहीं किया जा सकता है की तुलना में एक समान संख्या पाता है ।

`        % Do...while
  @      %   Push iteration index k. Gives 1, 2, 3, ...
  QE     %   Add 1 and multiply by 2. Gives 4, 6, 8, ...
  tZq    %   Duplicate. Push all primes up to current k
  &+     %   Matrix with all pairwise additions of those primes
  =z     %   Number of entries of that matrix that equal k. This is used as loop
         %   condition. That is, the loop continues if this number is nonzero
         % Implicit end

Answer 7

05AB1E , 8 बाइट्स

6 वें Fermat प्राइम पाए जाने पर समाप्त हो जाएगा ।

5µNoo>p½

व्याख्या

5µ          # loop over increasing N (starting at 1) until counter reaches 5
  Noo       # 2^2^N
     >      # + 1
      p½    # if prime, increase counter

Answer 8

पायथन, 30 28 बाइट्स

n=2
while 2**~-n%n**3-1:n+=1

यह कार्यक्रम रुक जाएगा यदि और केवल अगर कोई पूर्णांक n 1 से बड़ा है जैसे कि 2 ^ (n-1) -1 n ^ 3 से विभाज्य है। मेरे ज्ञान के लिए यह ज्ञात नहीं है कि इस संपत्ति के साथ कोई संख्या मौजूद है (यदि इस संपत्ति को संतुष्ट करने वाली संख्या प्रधान है, तो इसे 3 से बेस 2 के लिए वेफरिच प्राइम ऑफ ऑर्डर कहा जाता है, और यह खुला है कि क्या इस तरह का कोई प्राइम मौजूद है)।

Comments

क्या आप सुनिश्चित हैं कि कोष्ठक सही ढंग से रखे गए हैं? ऐसा लगता है कि आप देख रहे हैं कि 2 ^ (n-1)! ≡ 1 (mod n ^ 3), 2 ^ n ^ 1 (mod n ^ 3) नहीं। दी, मुझे पता नहीं है कि पायथन के ऑपरेटर पूर्वता को अच्छी तरह से जानते हैं।

— गेब्रियल बेनामी

वूप्स, कोड सही है, लेकिन मेरी व्याख्या नहीं है। मैं इसे ठीक कर दूंगा।

— जूलियन रोसेन

आप के (n-1)साथ प्रतिस्थापित कर सकते हैं~-n

— श्रीओटीचिलिज्म ओ'जैक

Answer 9

हास्केल, 47 बाइट्स

[n|n<-[1..],2*n==sum[d|d<-[2..n],n`mod`d<1]]!!0

पहले क्वैसिपेरिक नंबर की खोज करना , जो एक संख्या है nजिसका भाजक का योग है 2*n+1। 1 जोड़ने के बजाय, मैं 1 को भाजक की सूची से बाहर करता हूं।

Answer 10

ब्रेन-फ्लैक, 212 208 204 बाइट्स

यह कार्यक्रम मेगाटॉम द्वारा लिखित एक गुणन एल्गोरिथ्म और 1000000000 द्वारा लिखित एक गैर-स्क्वायर चेकर का उपयोग करता है

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

(((()()()()){})){{}((({}()))<{(({})[()])}{}>[()]){({}<({}<>)({<({}[()])><>({})<>}{}<><{}>)>[()])}{}(({}())){(({}[()]<>)<>)(({({})({}[()])}{}[({})]<>)){{}{}({}<>)(<([()])>)}{}({}()){(((<{}{}<>{}>)))}{}}{}}

यह कार्यक्रम 8 से शुरू होता है और यह देखने के लिए प्रत्येक नंबर का परीक्षण करता है कि क्या n! +1 एक वर्ग संख्या है। यह एक को खोजने पर बाहर निकलता है। इसे Brocard की समस्या के रूप में जाना जाता है और यह गणित में एक खुली समस्या है।

Answer 11

Brachylog (v2), Brachylog के एन्कोडिंग में 3 बाइट्स

⟦cṗ

इसे ऑनलाइन आज़माएं! (स्पष्ट कारणों के लिए कुछ भी दिखाई देने के बिना समय समाप्त होगा)

पूर्ण कार्यक्रम; अगर बिना किसी इनपुट के साथ चलाया जाता है, तो पहले स्मार्नाचेस प्राइम की खोज की जाती है , और true.अगर यह एक हो तो आउटपुट करता है। यह एक खुला प्रश्न है कि क्या कोई स्मार्नाचैच प्राइम मौजूद है। (ध्यान दें कि ब्रेकीलॉग की मुख्य-परीक्षण एल्गोरिथ्म, हालांकि यह सिद्धांत पर काम करता है मनमाने ढंग से बड़ी संख्या में, धीरे-धीरे उन पर चलने के लिए जाता है; इस प्रकार, यदि आप स्मरंडचे को खोजने में रुचि रखते हैं, तो मैं एक अलग भाषा का उपयोग करने की सलाह देता हूं।)

व्याख्या

⟦cṗ
⟦     Form an increasing range from 0 to {the smallest number with no assertion failure} 
 c    Concatenate all the numbers that make up that range, in decimal
  ṗ   Assert that the result is prime

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

यहां एक उदाहरण दिया गया है जो पहली स्मार्नाचे की संख्या को 6 (मॉड 11) के बराबर पाता है, एक समान कार्यक्रम के प्रदर्शन के रूप में जो अज्ञात रुकने की स्थिति के बजाय 60 सेकंड के भीतर समाप्त होता है:

⟦c{-₆~×₁₁&}

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

यह true.एक पूर्ण कार्यक्रम के रूप में प्रिंट होगा , लेकिन मैंने Zकमांड लाइन के तर्क को वास्तव में प्रश्न में संख्या को प्रिंट करने के लिए फेंक दिया , एक बेहतर प्रदर्शन देते हुए कि यह सामान्य दृष्टिकोण काम करता है।

Answer 12

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

p=lambda n:all(n%x for x in range(2,n))
s=lambda n:0if p((10223*2**n)+1)else s(n+1)
s(0)

यह कोड समाप्त हो जाएगा यदि 10223 एक Sierpi numberski संख्या है। 10223 वर्तमान में सबसे छोटा उम्मीदवार है जो दिसंबर 2013 तक Sierpi numberski नंबर हो सकता है या नहीं हो सकता है।

एक Sierpi numbersski संख्या एक संख्या kहै जिसमें फॉर्म के सभी नंबर (k * 2^n) + 1संयुक्त होते हैं।

Comments

मुझे आशा है कि इस समस्या और Sierpinski समस्या निकट भविष्य में हल हो जाएगी, बस अधिक गणनाओं के साथ।

— qwr

यह कोड निश्चित रूप से समाप्त हो जाता है, चूंकि आप सिर्फ दो लंबदा का नाम लेते हैं, आप वास्तव में कुछ भी नहीं कहते हैं । :-P

— Veky

वास्तव में आपने नहीं किया। आपका कोड अभी भी हमेशा समाप्त होता है, क्योंकि Python2 शब्दार्थ जमे हुए हैं (PEP 404), और इसमें BDFL के fiat ( neopythonic.blogspot.hr/2009/04/final-words-on-tail-calls.html) द्वारा पुनरावर्ती कॉलों पर एक कठिन सीमा शामिल है। )। ; -पी

— वेकी

@Veky को आपकी टिप्पणी को अपवित्र करना था।

— Qwerp-Derp

यह लिखे जाने के कई दिनों बाद भी, प्रधानमंत्री 10223*2^31172165 + 1 की खोज नहीं की गई थी । तब से, 21181सबसे छोटी संख्या रही है जिसके लिए यह ज्ञात नहीं है कि यह Sierpi orski है या नहीं।

— जेपी स्टिग नीलसन

Answer 13

पायथ, 16 बाइट्स

f!}1.u@,/G2h*3GG

वह पहला मान लौटाता है जिसके लिए Collatz अनुमान नहीं है। जैसा कि यह अज्ञात है कि क्या अनुमान सभी संख्याओं के लिए है, यह अज्ञात है कि क्या यह कोड समाप्त हो जाएगा।

Comments

इसे पढ़े बिना, मुझे संदेह है कि आपका कोड वही करता है जो आप दावा करते हैं। क्या आप पहले नंबर के लिए खोज करते हैं जो 4-2-1 से अलग लूप में जाता है? मुझे लगता है कि आप इसे नहीं पाएंगे अगर कोई छोटी संख्या है जो किसी भी लूप में समाप्त नहीं होती है। वैसे भी, यदि आपका कोड क्या करता है, तो यह जानने के लिए पर्याप्त है कि यह समाप्त नहीं होगा।

— क्रिश्चियन सिवर्स

मैं पहले पूर्णांक> = 1 को खोजता हूं जो एक लूप में जाता है और उस लूप के ट्रैवर्सल के भीतर कहीं नहीं होता है। 1.

— स्टीवन एच।

यही मुझे उम्मीद थी। लेकिन यह एक संख्या के लिए एकमात्र बोधगम्य तरीका नहीं है जो कोलेट्ज अनुमान को संतुष्ट नहीं करता है।

— क्रिश्चियन सेवर्स

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

— जॉन ड्वोरक

@JDDvorak मुझे विश्वास नहीं है कि यह सच है। क्या आप किसी स्रोत का हवाला दे सकते हैं?

— केएसएफटी

Answer 14

दरअसल , 16 बाइट्स

1`;;pY)▒@D÷íu*`╓

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

यह कोड iff को समाप्त करता है, कुछ समग्र संख्या nऐसी है जो totient(n)विभाजित होती है n-1( लेहमर की कुल समस्या )।

स्पष्टीकरण:

1`;;pY)▒@D÷íu*`╓
1`            `╓  first integer, starting with 0, where the following function leaves a truthy value on top of the stack:
    pY       *      composite (not prime) and
   ;  )▒            totient(n)
  ;     @D֒u       is in the list of divisors of n-1

Answer 15

जेली , 9 8 बाइट्स

-1 बाइट @ @ डेनिस को धन्यवाद! (बचने के लिए गुणन के बजाय घातांक का उपयोग करें Æṣ(0))

*ḂÆṣ=µ2#

यदि कोई मौजूद है तो शून्य और सबसे छोटी विषम संख्या की सूची लौटाएगा ।

कैसे?

*ḂÆṣ=µ2# - Main link: no arguments
     µ   - monadic chain separation
      2# - count up from implicit `n=0` and return the first 2 truthy results of
 Ḃ       -     mod 2        -> n%2
*        -     exponentiate -> n**(n%2)  (1 when n is even, n when n is odd)
  Æṣ     -     sum of proper divisors of n**(n%2)
    =    -     equals n?    -> 1 if n is zero or both perfect and odd, else 0

Answer 16

हास्केल, 46 बाइट्स

[n|m<-[1..],n<-[1..m],product[1..n]+1==m^2]!!3

यह निर्देश देता है कि क्या यह ब्रोडकार्ड की समस्या का 4 वाँ समाधान है ।

Answer 17

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

यह किसी भी कोड गोल्फ प्रतियोगिताओं को नहीं जीत रहा है, और इसके लिए अनंत स्मृति और पुनरावृत्ति की गहराई की आवश्यकता होती है, लेकिन दो साल पहले मैंने गणित स्टैटेक्सचेंज पर पूछे गए एक दिलचस्प समस्या को प्लग करने के लिए यह लगभग सही मौका है , कि कोई भी फिबोनाची संख्या 8 से अधिक नहीं है। दो सकारात्मक क्यूब्स के । मजेदार रूप से पर्याप्त है, यह एक कोड गोल्फ चैलेंज विचार के रूप में शुरू हुआ, इसलिए मुझे लगता है कि मैं पूर्ण चक्र में आया हूं।

def f(i,j):
 r=range(i)
 for a in r:
  for b in r:
   if a**3+b**3==i:1/0
 f(j,i+j)
f(13,21)

Answer 18

पायथन 2, 123 98 92 बाइट्स

p=lambda n,k=2:n<=k or n%k*p(n,k+1)
g=lambda n:[p(b)*p(n-b)for b in range(n)]and g(n+2)
g(4)

यह कोड समाप्त हो जाएगा यदि गोल्डबैक अनुमान सभी संख्याओं के लिए नहीं है (यानी यदि सभी संख्याओं को दो primes के योग के रूप में भी व्यक्त किया जा सकता है)। वर्तमान में इसका परीक्षण 4 * 10 ^ 18 तक की संख्या के लिए किया गया है।

मेरे कोड को बहुत कम करने के लिए @ Pietu1998 के लिए बहुत बड़ी धन्यवाद!

संपादित करें: मेरे कोड से 6 बाइट शेविंग करने के लिए @JonathanAllan को धन्यवाद!

Comments

मुझे लगता है कि आप 6 बाइट्स बचा सकते हैं g=lambda n:[p(b)*p(n-b)for b in range(n)]and g(n+2)। मुझे भी लगता है कि यह पढ़ना चाहिए "समाप्त हो जाएगा अगर गोल्डबैक अनुमान नहीं रखता है"।

— जोनाथन एलन

Answer 19

जावास्क्रिप्ट (ईएस 6), 104 101 बाइट्स

for(n=[6,9,p=1];!p;n=n.map((x,i)=>(q=n[n.length+~i],p|=x^q,c=q+x+c/10|0)%10).concat(c/10|0||[]))c=p=0

पर्ल उत्तर के समान विधि का उपयोग करता है: 196 में n सेट करता है , फिर बार-बार अपने बेस 10 में n को जोड़ता है जब तक कि यह आधार 10 में नहीं है। यह छोटा होगा यदि जेएस ने मनमाना-सटीक संख्याओं का समर्थन किया, लेकिन ओह अच्छी तरह से।

Comments

हालांकि यह लंबा है, यह चतुराई से गोल्फ है, इसलिए +1।

— 9

Answer 20

पायथन, 80 बाइट्स

कॉलजेट अनुमान को झूठा साबित किया जाता है , तो यह निर्देश इस प्रश्न को देखें ।

n=2
while 1:
 L=[];x=n
 while~-n:1/(n not in L);L+=[n];n=(n/2,n*3+1)[n%2]
 n=x+1

Comments

यह घृणित है, लेकिन यह भी सुंदर है।

— जेम्स मर्फी

Answer 21

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

एक Lychrel संख्या एक प्राकृतिक संख्या है जो बार-बार अपने अंकों को उलटने और परिणामी संख्याओं को जोड़ने की पुनरावृत्ति प्रक्रिया के माध्यम से एक पैलिंड्रोम नहीं बना सकती है।

बेस दस में कोई लाइकेल संख्या मौजूद नहीं है। 196 सबसे छोटा आधार दस लिरिकेल उम्मीदवार है। यह दिखाया गया है कि यदि कोई पैलिंड्रोम मौजूद है (196 नहीं एक लिकलर संख्या), तो इसका कम से कम एक अरब (10 ^ 9) अंक होगा, क्योंकि लोगों ने एल्गोरिथ्म को लंबे समय तक चलाया है।

n=196
while 1:
    x=str(n);r=x[::-1]
    if x!=r:n=n+int(r)
    else:1/0

Comments

@trichoplax आह, टैब्स / स्पेस "फीचर" फिर से प्रहार करता है ...

— wizzwizz4

अगर किसी और को भी टैब रूपांतरण

— अनहेल्दी लगता है

Answer 22

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

*+3Ẓµ4#

इसे ऑनलाइन आज़माएं! (दो तत्वों को प्रिंट करता है, 4 को नहीं, ताकि आप वास्तव में इसे रोक सकें)

$n$$n^n+3$

व्याख्या

*+3Ẓµ4#
     4#  Find the first four numbers with the following property:
    µ      (bracketing/grouping: place everything to the left inside the loop)
*          {The number} to the power of {itself}
 +3        plus 3
   Ẓ       is prime

Answer 23

आर, 30 बाइट्स, यह तर्कपूर्ण है कि क्या यह नियतात्मक है

while(any(sample(2,654,T)>1))1

R के डिफ़ॉल्ट यादृच्छिक संख्या जनरेटर में 653 लगातार आयामों में समानता है लेकिन 654 आयामों में यह ज्ञात नहीं है। इस प्रकार छद्म आयामी संख्याओं का अनुक्रम नहीं हो सकता है जो किसी दिए गए वेक्टर से सबसे कम तत्व को एक पंक्ति में 654 बार (यहां वेक्टर 1:2) का नमूना देता है ।

के बाद से आर के RNG आवधिक है (बहुत ही लंबी अवधि के साथ यद्यपि), मैं दावा है कि यह है नियतात्मक यह बाद से होगा अंततः शुरू करने के लिए लूप दौर। आपकी राय अलग हो सकती है।

Answer 24

पायथन 3, 101 बाइट्स

मुझे पता है कि यह कई अन्य लोगों की तुलना में लंबा है, लेकिन मैंने यह देखने में बहुत समय बिताया कि मैं इसे कितना छोटा कर सकता हूं।

यह खंडन करने का प्रयास शक्तियों पोंकारे यूलर योग के लिए k=6(वहाँ Diophantine समीकरण के लिए कोई सकारात्मक पूर्णांक समाधान मौजूद है A^6+B^6+C^6+D^6+E^6==F^6, जिसके लिए कोई पाया प्रति किया गया है)।

R=[1]
while 1:R+=[R[-1]+1];eval(("[1/("+"+%s**6"*5+"!=%%s**6)%s]"%("for %s in R "*6))%(*"ABCDEF"*2,))

पायथन 2 (104 बाइट्स) में:

R=[1]
while 1:R+=[R[-1]+1];eval(("[1/("+"+%s**6"*5+"!=%%s**6)%s]"%("for %s in R "*6))%tuple("ABCDEF"*2))

कम गोल्फ वाला:

x=2
while 1:
    R=range(1,x)
    [1/(A**6+B**6+C**6+D**6+E**6!=F**6)for F in R for E in R for D in R for C in R for B in R for A in R]
    x+=1

मैथल संस्करण जिसका कोई प्रमाण नहीं है:

R=range
x=2
while 1:
    for i in R(x**6):1/(sum(map(lambda x:x**6,[1+(i%x**-~j/x**j)for j in R(6)]))-i%x-1)
    x+=1

वैकल्पिक संदर्भ: शक्तियों के अनुमान के यूलर के योग - मैथवर्ल्ड

Answer 25

पायथन, 68 बाइट्स

n=2
while"".join(str((i+2)**n)[0]for i in range(8))!="23456789":n+=1

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

Gelfand के सवालों में से एक का जवाब देने की कोशिश करता है ।

2. क्या पंक्ति "23456789" कभी n> 1 के लिए दिखाई देगी? N <= 10 ^ 5 के लिए कोई नहीं करता है। ...

Answer 26

क्लोजर, 154 बाइट्स

(loop[x 82001](if(= 0(reduce +(map{true 1 false 0}(for[y(range 3 6)](true?(for[z(str(range 2 y))](.indexOf z(Integer/toString x y))))))))x(recur(inc x))))

चेक करता है कि 82,000 से ऊपर की संख्या है जिसमें केवल 0 है और 1 का आधार 2 के लिए सभी तरह से आधार 5 है। दूसरे शब्दों में, यह जाँचता है कि क्या इस क्रम में एक और संख्या है ।

कि विशेष समूह के अंतर्गत, केवल 3 नंबर दिए गए हैं: 0, 1और 82,000। ऐसी कोई संख्या नहीं है जो उस नियम का पालन करती है जो लगभग से कम है 3*10^19723।

Answer 27

Pyt , 14 बाइट्स

27*²0`ŕĐ₫+Đ₽¬ł

Mbomb007 के उत्तर का पोर्ट ।