यह चुनौती है कि बाइट्स

Question

मुझे सज़ा के नामों पर सोचना बंद करना होगा

आपका कार्य बहुत से स्निपेट बनाना है (ऐसे प्रोग्राम जिनमें इनपुट और आउटपुट बिल्ट-इन हैं), फ़ंक्शंस या पूर्ण प्रोग्राम जो संभव हो, जो आपकी भाषा के पूर्णांक सरणियों का संस्करण आरोही क्रम में है, लेकिन प्रत्येक प्रोग्राम के लिए, आपको केवल अनुमति है ASCII (या आपकी भाषा के कोड पृष्ठ पर वर्णों का उपयोग करने के लिए, यदि यह सीधे ASCII के रूप में निर्दिष्ट नहीं है) जिसका उपयोग पिछले कार्यक्रमों में नहीं किया गया है।

यह एक उदाहरण का जवाब है (अलग-अलग कार्यक्रमों को अलग-अलग समाचारों द्वारा अलग किया गया है):

Derp
ASdFGHJKLAAA
qwEEERtyRty

इस (काल्पनिक भाषा) में, मेरा पहला जवाब है Derp, का इस्तेमाल किया जो D, e, rऔर p। दूसरे कार्यक्रम में, मुझे उन वर्णों का फिर से उपयोग करने की अनुमति नहीं है, लेकिन मैं जितने वर्ण चाहता हूं, उनका पुन: उपयोग कर सकता हूं। तीसरे कार्यक्रम के साथ भी, और इसी तरह।

प्रत्येक प्रोग्राम को एक पूर्णांक बनाना चाहिए, इसलिए ऐसा कुछ हो (मान्य इनपुट / आउटपुट शैलियों के लिए इनपुट / आउटपुट उदाहरण देखें):

[3 4 -2 5 7 196 -44 -2]

और इसे आरोही क्रम में एक सरणी के रूप में आइटम को आउटपुट करना होगा:

[-44 -2 -2 3 4 5 7 196]

आपका स्कोर सबमिशन की कुल राशि होगी। यदि कोई टाई है, तो सबसे कम बायटेकाउंट (आपके कोड में कम से कम बाइट्स) जीतता है!

कार्यक्रमों के नियम:

• सभी प्रस्तुतियाँ एक भाषा संस्करण (इसलिए Python 2 != Python 3) में सही ढंग से चलनी चाहिए ।
• आपके प्रस्तुतियाँ स्निपेट्स, फ़ंक्शन या पूर्ण कार्यक्रम हो सकते हैं। आपको उन्हें मिक्स और मैच करने की भी अनुमति है - हालाँकि, आपको कहना होगा कि कौन सा है, और कार्यशील सबमिशन के लिंक प्रदान करें।
• यदि संभव हो तो सभी समाधानों के लिए ऑनलाइन लिंक प्रदान करें।
• सभी प्रस्तुतियाँ इनपुट के रूप में एक सरणी (या किसी भी वर्ण के साथ एक स्ट्रिंग सीमांकित) को लेना चाहिए, और क्रमबद्ध किए गए सरणी को आउटपुट करें (आपकी भाषा के सरणी रूप में या {any character}-delimited स्ट्रिंग के रूप में)।
• आपको ASCII (या आपकी भाषा का कोड पृष्ठ) के बाहर किसी भी वर्ण का उपयोग करने की अनुमति नहीं है।

उदाहरण के लिए, ये मान्य इनपुट / आउटपुट हैं:

[1 2 3 4]    (Clojure style arrays)
[1, 2, 3, 4] (Python style arrays)
1 2 3 4 5    (Space-delimited - separated by spaces)
1#2#3#4#5    ("#"-delimited - separated by "#" characters)
1\n2\n3\n4\n (newline-delimited)

इनपुट के लिए चश्मा:

• आपको गारंटी है कि सरणी में केवल पूर्णांक हैं। हालांकि, नकारात्मक संख्याएं हो सकती हैं, और संख्याएं अनिश्चित काल तक दोहरा सकती हैं।

Comments

जितना बेहतर हो उतना अच्छा दंड!

आपको पता चलता है कि जो कोई भी ब्रेनफक में इसे हल करने के लिए परेशान हो सकता है उसे स्कोर 128 के साथ एक पेंगुइन समाधान मिल जाता है ? वैकल्पिक रूप से, एक भी ग्लिफ़ो समाधान 42 स्कोर कर सकता था।

— मार्टिन

@ Qwerp-Derp शायद थोड़ा थकाऊ है, लेकिन निश्चित रूप से उल्लेखनीय है। वास्तव में, मुझे उम्मीद है कि I / O सबसे अधिक कष्टप्रद हिस्सा होगा (यदि आप वर्ण कोड की सूची के रूप में इनपुट पढ़ने की अनुमति नहीं देते हैं)।

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

@WheatWizard मैं ASCII को चुनौती देने के बाद से केवल 128 उपलब्ध पात्रों की गिनती कर रहा था।

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

मुझे भाषा प्रतिबंध से 3 समस्याएं हैं। (1) भाषाओं की मनमानी कक्षाओं को प्रतिबंधित करना क्योंकि वे एक चालान में अच्छे होंगे मजेदार नहीं है। (2) जावास्क्रिप्ट की तरह ("पहले से ही जवाब है)" सबसे सामान्य "प्रोग्रामिंग भाषाएं आवश्यकताओं को पूरा नहीं करती हैं, जो निश्चित रूप से नहीं है। प्रतिबंध का इरादा, और एक बार फिर, मज़ा नहीं। (३) मुझे नहीं लगता कि यह वास्तव में एक अवलोकन योग्य आवश्यकता है। "विशिष्ट कार्य" बहुत ही अवलोकन योग्य नहीं है, मैं अमूर्त की कई परतों के माध्यम से तर्क दे सकता हूं कि ग्लिफ़ो पात्रों में वास्तव में विशिष्ट कार्य हैं जो छिपे हुए चर के सेट पर काम करते हैं।

— गेहूं जादूगर

Answer 1

जेली , 10 कार्यक्रम, 65 बाइट्स

Ṣ
¹Þ
Ụị
Œ!Ṃ
7778Ọv
Ẋ>2\S$¿
ĠFḣṪ¥@€
~Ṁ~rṀxLœ&
C»/ð+ÆNPÆfÆC_ḷ
<þḅ1‘WiþJḄ³ṫZḢ

@ लिन के जेली उत्तर के साथ कुछ अपरिहार्य ओवरलैप हैं । बोगोसॉर्ट विचार का श्रेय उसे जाता है।

इसे ऑनलाइन आज़माएं! या विशिष्टता सत्यापित करें ।

वे कैसे काम करते हैं

Ṣ               Main link. Argument: A (array)

Ṣ               Sort A.

¹Þ              Main link. Argument: A (array)

¹Þ              Sort A, using the identity function as the key.

Ụị              Main link. Argument: A (array)

Ụ               Grade up; yield all indices of A, sorted by their corr. values.
 ị              Index into A.

Œ!Ṃ             Main link. Argument: A (array)

Œ!              Yield all permutations of A.
  Ṃ             Minimum; yield the lexicographically smallest permutation.

7778Ọv          Main link. Argument: A (array)

7778Ọ           Unordinal; yield chr(7778) = 'Ṣ'.
     v          Evaluate with argument A.

Ẋ>2\S$¿         Main link. Argument: A (array)

      ¿         While the condition it truthy, execute the body.
 >2\S$            Condition:
     $              Combine the two links to the left into a monadic chain.
 >2\                  Perform pairwise greater-than comparison.
    S                 Sum; add the results.
                    This returns 0 iff A contains an unsorted pair of integers.
Ẋ                 Body: Shuffle A.

ĠFḣṪ¥@€         Main link. Argument: A (array)

Ġ               Group the indices of A by their sorted values.
 F              Flatten the result.
      €         Apply the link to the left to each index in the previous result, 
                calling it with the index as left argument and A as the right one.
    ¥@            Combine the two links to the left into a dyadic chain and swap
                  its arguments, so A is left one and the index i is the right one.
  ḣ               Head; take the first i elements of A.
   Ṫ              Tail; yield the last of the first i, i.e., the i-th element of A.

~Ṁ~rṀxLœ&       Main link. Argument: A (array)

~               Take the bitwise NOT of all integers in A.
 Ṁ              Take the maximum.
  ~             Take the bitwise NOT of the maximum, yielding the minimum of A.
    Ṁ           Yield the maximum of A.
   r            Range; yield [min(A), ... max(A)].
      L         Yield the length of A.
     x          Repeat each integer in the range len(A) times.
       œ&       Take the multiset-intersection of the result and A.

C»/ð+ÆNPÆfÆC_ḷ  Main link. Argument: A (array)

C               Complement; map (x -> 1-x) over A.
 »/             Reduce by dyadic maximum, yielding 1-min(A).
   ð            Begin a new, dyadic chain. Arguments: 1-min(A), A
    +           Add 1-min(A) to all elements of A, making them strictly positive.
     ÆN         For each element n of the result, yield the n-th prime number.
       P        Take the product.
        Æf      Factorize the product into prime numbers, with repetition.
          ÆC    Prime count; count the number of primes less than or equal to p,
                for each prime p in the resulting factorization.
             ḷ  Yield the left argument, 1-min(A).
            _   Subtract 1-min(A) from each prime count in the result to the left.

<þḅ1‘WiþJḄ³ṫZḢ  Main link. Argument: A (array)

<þ              Construct the less-than matrix of all pairs of elements in A.
  ḅ1            Convert each row from base 1 to integer (sum each).
    ‘           Increment. The integer at index i now counts how many elements
                of A are less than or equal to the i-th.
     W          Wrap the resulting 1D array into an array.
        J       Yield the indices of A, i.e., [1, ..., len(A)].
      iþ        Construct the index table; for each array T in the singleton array
                to the left and index j to the right, find the index of j in T.
                This yields an array of singleton arrays.
         Ḅ      Unbinary; convert each singleton from base 2 to integer, mapping
                ([x]-> x) over the array.
          ³     Yield A.
           ṫ    Tail; for each integer i in the result of `Ḅ`, create a copy of A
                without its first i-1 elements.
            Z   Zip/transpose. The first column becomes the first row.
             Ḣ  Head; yield the first row.

Answer 2

जेली, 8 कार्यक्रम

Ṣ                   Built-in sort.
¹Þ                  Sort-by the identity function.
Ụị                  Sort indices by values, then index into list.
Œ!Ṃ                 Smallest permutation.
7778Ọv              Eval Unicode 7778 (Ṣ).
ẊI>@-.S$$¿          Bogosort.
<;0œṡ0⁸ṁjµ/         Insertion sort.
AṀ‘¶+Ç©ṬT_©®³ċЀ®x' A terrifying hack.

अंतिम कार्यक्रम वास्तव में कष्टप्रद है ...

AṀ‘¶+Ç©               Add ® = abs(max(L)) + 1 to the entire list.
                      Now it’s offset to be entirely positive.
       Ṭ              Create a binary array with 1s at these indices.
        T             Find the indices of 1s in this array.
                      The result is sorted, but offset wrong, and lacks duplicates.
         _©®          Subtract the offset, saving this list to ®.
                      Now restore the duplicates:
            ³ċЀ      Count occurences in the original list.
                ®x'   Repeat the elements of ® that many times.

अगर मैं œṡसे हटा सकते हैं <;0œṡ0⁸ṁjµ/, यह भी एक अजीब है ²SNr²ZFœ&:। मदद की सराहना की है।

Comments

Roots → polynomial, polynomial → rootsप्रतिभाशाली है!

— लुइस मेन्डो

ऐसा प्रतीत होता है कि आउटपुट ऑर्डर उलट है । सौभाग्य Uसे मुक्त है

— लुइस मेंडो

ऊग, नकारात्मक पूर्णांक ... मैं देखूंगा कि मैं उन लोगों के बारे में क्या कर सकता हूं

— लिन

मुझे लगता है कि हमें कुछ और चाहिए, लेकिन मुझे नहीं पता कि हम इसे कैसे सुधार सकते हैं।

— मैथ्यू रो

@ETHproductions फिक्स्ड, अब।

— लिन

Answer 3

05AB1E , स्कोर = 6

05AB1E CP-1252 एन्कोडिंग का उपयोग करता है ।

कार्यक्रम 4 के लिए केविन क्रूज़सेन का धन्यवाद ।
धन्यवाद कार्यक्रम 6 की प्रेरणा के लिए रिले के लिए धन्यवाद ।

कार्यक्रम 1

{               # sort          

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

कार्यक्रम 2

`[Ž.^]¯

`               # flatten input list to stack
 [Ž  ]          # loop until stack is empty
   .^           # add top of stack to global list in sorted order
      ¯         # push global list

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

कार्यक्रम 3

WrZŠŠŸvy†

Wr              # get minimum value in input list and reverse stack
  ZŠ            # get maximum value in input list and swap move it to bottom of stack
    Š           # move input down 2 levels of the stack
     Ÿ          # create a range from max to min
      v         # for each y in range
       y†       # move any occurrence of it in the input list to the front

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

कार्यक्रम 4

ϧ

œ               # get a list of all permutations of input
 ß              # pop the smallest

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

कार्यक्रम 5

êDgFDNè¹sUXQOFXs}}\)

ê                      # sort with duplicates removed
 Dg                    # duplicate and get length
   F                   # for N in [0 ... len-1] do
    DNè                # duplicate and get the Nth element in the unique list
       ¹s              # push input and move the Nth element to top of stack
         UX            # save it in X
           Q           # compare each element in the list against the Nth unique element
            O          # sum
             FXs}      # that many times, push X and swap it down 1 level on stack
                 }     # end outer loop
                  \    # remove the left over list of unique items
                   )   # wrap stack in a list

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

कार्यक्रम ६

©€Ý逤þ((®€Ý逤(þ(Rì

©                        # store a copy of input in register
 €Ý                      # map range[0 ... n] over list
   é                     # sort by length
    €¤                   # map get_last_element over list
      þ((                # keep only non-negative numbers
                         # now we have all positive numbers sorted
         ®€Ý逤(þ(       # do the same thing again on input 
                         # except now we only keep negative numbers
                  R      # reverse sorting for negative numbers
                   ì     # prepend the sorted negative numbers to the positive ones

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

Comments

ϧएक अतिरिक्त स्कोर के लिए इस्तेमाल किया जा सकता है। इसे यहाँ आज़माएँ।

— केविन क्रूज़सेन

@ केविनक्रूजसेन: धन्यवाद! मैं बस एक œसमाधान देख रहा था , लेकिन मुझे भी पता नहीं था ß:)

— एमिग्ना

मैं पूरी तरह से ईमानदार रहूंगा, मुझे यह यहां से मिला । ;)

— केविन क्रूज़सेन

@ रिले जब तक मैं कुछ गलत कर रहा हूँ, यह एक गलत आउटपुट देता है

— केविन क्रूज़सेन

क्या पूंछ और पॉप प्राप्त करने का एक तरीका है? €Ý逤अगर ¤मूल्य प्राप्त करने के बजाय अगर यह हो तो काम करेगा ।

— रिले

Answer 4

ब्रेकीलॉग , स्कोर =  4  5

कार्यक्रम 1 - साधा तरह

ṣ.↔: 1≥₎∧ | ↰

हम फेरबदल करते हैं और जांचते हैं कि सूची का उलटा होना गैर-बढ़ती है। यदि हम पुनरावर्ती रूप से नहीं करते हैं।

कार्यक्रम 2 - क्रमचय क्रम

p≤₁

पहली क्रमपरिवर्तन को आउटपुट करें जो गैर-घटती है।

प्रोग्राम 3 - बिल्ट-इन

ओ

आदेश।

प्रोग्राम 4 - बिल्ट-इन

≜ᵒ

लेबल लगाकर ऑर्डर करें। चूंकि सूची में पूर्णांक पहले से ही तय हैं, इसलिए यह वैसा ही हैo ।

कार्यक्रम 5 - न्यूनतम मुद्रण

जी ~ KKT ~ एलजी ~ केके {⌋M और ~ cṪ↺Th [एम] hẉTb↺c} ⁱ⁾

यहाँ प्रकृति की इस राक्षसी के लिए एक स्पष्टीकरण दिया गया है:

g~kK                                K = [Input list, a variable]
    t~lg~kK                         That variable is the length of the Input list
           {                  }ⁱ⁾   Iterate length-of-the-Input times on the Input:
            ⌋M                        M is the min of the input
              &~cṪ                    Ṫ is a triplet of lists which concatenate to the input
                 Ṫ↺Th[M]              T is Ṫ cyclically permuted once ccw; [M] is
                                        the first element of T
                        hẉ            Write M followed by a new line
                          Tb↺c        Remove the first element of T (i.e. [M]), cyclically
                                        pemute T once ccw and concatenate; this is
                                        the input for the next iteration

Comments

— क्रोस

@NoOneIsHere मैंने धोखा दिया और उस को दरकिनार करने के लिए लाइन बढ़ा दी!

— घातक

पूंछ पुनरावृत्ति + बोगोसॉर्ट। एक नुस्खा की तरह लग रहा है f-RecursionError: maximum call stack size exceeded

— फल

@ चैलेंजर 5 टेल रीसर्शन को प्रोलॉग में अच्छी तरह से लागू किया गया है ताकि ऐसा न हो।

— घातक

Answer 5

जावास्क्रिप्ट, स्कोर 1 2

@ETHproductions की बदौलत स्कोर को दोगुना किया जिसने मुझे स्ट्रिंग भागने की याद दिलाई

स्निपेट 1 (21 बाइट्स, वर्ण \ ,-.=>289`Facehilnorstux)

Function`return this.sort\x28\x28t,h\x29=>t-h\x29`.call

स्निपेट 2 (9117 बाइट्स, वर्ण (+)[!])

[][(![]+[])[+[]]+([![]]+[][[]])[+!+[]+[+[]]]+(![]+[])[!+[]+!+[]]+(![]+[])[!+[]+!+[]]][([][(![]+[])[+[]]+([![]]+[][[]])[+!+[]+[+[]]]+(![]+[])[!+[]+!+[]]+(!![]+[])[+[]]+(!![]+[])[!+[]+!+[]+!+[]]+(!![]+[])[+!+[]]]+[])[!+[]+!+[]+!+[]]+(!![]+[][(![]+[])[+[]]+([![]]+[][[]])[+!+[]+[+[]]]+(![]+[])[!+[]+!+[]]+(!![]+[])[+[]]+(!![]+[])[!+[]+!+[]+!+[]]+(!![]+[])[+!+[]]])[+!+[]+[+[]]]+([][[]]+[])[+!+[]]+(![]+[])[!+[]+!+[]+!+[]]+(!![]+[])[+[]]+(!![]+[])[+!+[]]+([][[]]+[])[+[]]+([][(![]+[])[+[]]+([![]]+[][[]])[+!+[]+[+[]]]+(![]+[])[!+[]+!+[]]+(!![]+[])[+[]]+(!![]+[])[!+[]+!+[]+!+[]]+(!![]+[])[+!+[]]]+[])[!+[]+!+[]+!+[]]+(!![]+[])[+[]]+(!![]+[][(![]+[])[+[]]+([![]]+[][[]])[+!+[]+[+[]]]+(![]+[])[!+[]+!+[]]+(!![]+[])[+[]]+(!![]+[])[!+[]+!+[]+!+[]]+(!![]+[])[+!+[]]])[+!+[]+[+[]]]+(!![]+[])[+!+[]]]((!![]+[])[+!+[]]+(!![]+[])[!+[]+!+[]+!+[]]+(!![]+[])[+[]]+([][[]]+[])[+[]]+(!![]+[])[+!+[]]+([][[]]+[])[+!+[]]+(+[![]]+[][(![]+[])[+[]]+([![]]+[][[]])[+!+[]+[+[]]]+(![]+[])[!+[]+!+[]]+(!![]+[])[+[]]+(!![]+[])[!+[]+!+[]+!+[]]+(!![]+[])[+!+[]]])[+!+[]+[+!+[]]]+(!![]+[])[+[]]+(+(+!+[]+[+[]]+[+!+[]]))[(!![]+[])[+[]]+(!![]+[][(![]+[])[+[]]+([![]]+[][[]])[+!+[]+[+[]]]+(![]+[])[!+[]+!+[]]+(!![]+[])[+[]]+(!![]+[])[!+[]+!+[]+!+[]]+(!![]+[])[+!+[]]])[+!+[]+[+[]]]+(+![]+([]+[])[([][(![]+[])[+[]]+([![]]+[][[]])[+!+[]+[+[]]]+(![]+[])[!+[]+!+[]]+(!![]+[])[+[]]+(!![]+[])[!+[]+!+[]+!+[]]+(!![]+[])[+!+[]]]+[])[!+[]+!+[]+!+[]]+(!![]+[][(![]+[])[+[]]+([![]]+[][[]])[+!+[]+[+[]]]+(![]+[])[!+[]+!+[]]+(!![]+[])[+[]]+(!![]+[])[!+[]+!+[]+!+[]]+(!![]+[])[+!+[]]])[+!+[]+[+[]]]+([][[]]+[])[+!+[]]+(![]+[])[!+[]+!+[]+!+[]]+(!![]+[])[+[]]+(!![]+[])[+!+[]]+([][[]]+[])[+[]]+([][(![]+[])[+[]]+([![]]+[][[]])[+!+[]+[+[]]]+(![]+[])[!+[]+!+[]]+(!![]+[])[+[]]+(!![]+[])[!+[]+!+[]+!+[]]+(!![]+[])[+!+[]]]+[])[!+[]+!+[]+!+[]]+(!![]+[])[+[]]+(!![]+[][(![]+[])[+[]]+([![]]+[][[]])[+!+[]+[+[]]]+(![]+[])[!+[]+!+[]]+(!![]+[])[+[]]+(!![]+[])[!+[]+!+[]+!+[]]+(!![]+[])[+!+[]]])[+!+[]+[+[]]]+(!![]+[])[+!+[]]])[+!+[]+[+[]]]+(!![]+[])[+[]]+(!![]+[])[+!+[]]+([![]]+[][[]])[+!+[]+[+[]]]+([][[]]+[])[+!+[]]+(+![]+[![]]+([]+[])[([][(![]+[])[+[]]+([![]]+[][[]])[+!+[]+[+[]]]+(![]+[])[!+[]+!+[]]+(!![]+[])[+[]]+(!![]+[])[!+[]+!+[]+!+[]]+(!![]+[])[+!+[]]]+[])[!+[]+!+[]+!+[]]+(!![]+[][(![]+[])[+[]]+([![]]+[][[]])[+!+[]+[+[]]]+(![]+[])[!+[]+!+[]]+(!![]+[])[+[]]+(!![]+[])[!+[]+!+[]+!+[]]+(!![]+[])[+!+[]]])[+!+[]+[+[]]]+([][[]]+[])[+!+[]]+(![]+[])[!+[]+!+[]+!+[]]+(!![]+[])[+[]]+(!![]+[])[+!+[]]+([][[]]+[])[+[]]+([][(![]+[])[+[]]+([![]]+[][[]])[+!+[]+[+[]]]+(![]+[])[!+[]+!+[]]+(!![]+[])[+[]]+(!![]+[])[!+[]+!+[]+!+[]]+(!![]+[])[+!+[]]]+[])[!+[]+!+[]+!+[]]+(!![]+[])[+[]]+(!![]+[][(![]+[])[+[]]+([![]]+[][[]])[+!+[]+[+[]]]+(![]+[])[!+[]+!+[]]+(!![]+[])[+[]]+(!![]+[])[!+[]+!+[]+!+[]]+(!![]+[])[+!+[]]])[+!+[]+[+[]]]+(!![]+[])[+!+[]]])[!+[]+!+[]+[+[]]]](!+[]+!+[]+[+!+[]])[+!+[]]+([![]]+[][[]])[+!+[]+[+[]]]+(![]+[])[!+[]+!+[]+!+[]]+(+(+!+[]+[+!+[]]+(!![]+[])[!+[]+!+[]+!+[]]+[!+[]+!+[]]+[+[]])+[])[+!+[]]+(![]+[])[!+[]+!+[]+!+[]]+(!![]+[][(![]+[])[+[]]+([![]]+[][[]])[+!+[]+[+[]]]+(![]+[])[!+[]+!+[]]+(!![]+[])[+[]]+(!![]+[])[!+[]+!+[]+!+[]]+(!![]+[])[+!+[]]])[+!+[]+[+[]]]+(!![]+[])[+!+[]]+(!![]+[])[+[]]+(![]+[][(![]+[])[+[]]+([![]]+[][[]])[+!+[]+[+[]]]+(![]+[])[!+[]+!+[]]+(!![]+[])[+[]]+(!![]+[])[!+[]+!+[]+!+[]]+(!![]+[])[+!+[]]])[!+[]+!+[]+[+[]]]+(![]+[][(![]+[])[+[]]+([![]]+[][[]])[+!+[]+[+[]]]+(![]+[])[!+[]+!+[]]+(!![]+[])[+[]]+(!![]+[])[!+[]+!+[]+!+[]]+(!![]+[])[+!+[]]])[!+[]+!+[]+[+[]]]+(![]+[])[+!+[]]+[[]][([][(![]+[])[+[]]+([![]]+[][[]])[+!+[]+[+[]]]+(![]+[])[!+[]+!+[]]+(!![]+[])[+[]]+(!![]+[])[!+[]+!+[]+!+[]]+(!![]+[])[+!+[]]]+[])[!+[]+!+[]+!+[]]+(!![]+[][(![]+[])[+[]]+([![]]+[][[]])[+!+[]+[+[]]]+(![]+[])[!+[]+!+[]]+(!![]+[])[+[]]+(!![]+[])[!+[]+!+[]+!+[]]+(!![]+[])[+!+[]]])[+!+[]+[+[]]]+([][[]]+[])[+!+[]]+([][(![]+[])[+[]]+([![]]+[][[]])[+!+[]+[+[]]]+(![]+[])[!+[]+!+[]]+(!![]+[])[+[]]+(!![]+[])[!+[]+!+[]+!+[]]+(!![]+[])[+!+[]]]+[])[!+[]+!+[]+!+[]]+(![]+[])[+!+[]]+(!![]+[])[+[]]]([[]])+[]+(+(+!+[]+[+!+[]]))[(!![]+[])[+[]]+(!![]+[][(![]+[])[+[]]+([![]]+[][[]])[+!+[]+[+[]]]+(![]+[])[!+[]+!+[]]+(!![]+[])[+[]]+(!![]+[])[!+[]+!+[]+!+[]]+(!![]+[])[+!+[]]])[+!+[]+[+[]]]+(+![]+([]+[])[([][(![]+[])[+[]]+([![]]+[][[]])[+!+[]+[+[]]]+(![]+[])[!+[]+!+[]]+(!![]+[])[+[]]+(!![]+[])[!+[]+!+[]+!+[]]+(!![]+[])[+!+[]]]+[])[!+[]+!+[]+!+[]]+(!![]+[][(![]+[])[+[]]+([![]]+[][[]])[+!+[]+[+[]]]+(![]+[])[!+[]+!+[]]+(!![]+[])[+[]]+(!![]+[])[!+[]+!+[]+!+[]]+(!![]+[])[+!+[]]])[+!+[]+[+[]]]+([][[]]+[])[+!+[]]+(![]+[])[!+[]+!+[]+!+[]]+(!![]+[])[+[]]+(!![]+[])[+!+[]]+([][[]]+[])[+[]]+([][(![]+[])[+[]]+([![]]+[][[]])[+!+[]+[+[]]]+(![]+[])[!+[]+!+[]]+(!![]+[])[+[]]+(!![]+[])[!+[]+!+[]+!+[]]+(!![]+[])[+!+[]]]+[])[!+[]+!+[]+!+[]]+(!![]+[])[+[]]+(!![]+[][(![]+[])[+[]]+([![]]+[][[]])[+!+[]+[+[]]]+(![]+[])[!+[]+!+[]]+(!![]+[])[+[]]+(!![]+[])[!+[]+!+[]+!+[]]+(!![]+[])[+!+[]]])[+!+[]+[+[]]]+(!![]+[])[+!+[]]])[+!+[]+[+[]]]+(!![]+[])[+[]]+(!![]+[])[+!+[]]+([![]]+[][[]])[+!+[]+[+[]]]+([][[]]+[])[+!+[]]+(+![]+[![]]+([]+[])[([][(![]+[])[+[]]+([![]]+[][[]])[+!+[]+[+[]]]+(![]+[])[!+[]+!+[]]+(!![]+[])[+[]]+(!![]+[])[!+[]+!+[]+!+[]]+(!![]+[])[+!+[]]]+[])[!+[]+!+[]+!+[]]+(!![]+[][(![]+[])[+[]]+([![]]+[][[]])[+!+[]+[+[]]]+(![]+[])[!+[]+!+[]]+(!![]+[])[+[]]+(!![]+[])[!+[]+!+[]+!+[]]+(!![]+[])[+!+[]]])[+!+[]+[+[]]]+([][[]]+[])[+!+[]]+(![]+[])[!+[]+!+[]+!+[]]+(!![]+[])[+[]]+(!![]+[])[+!+[]]+([][[]]+[])[+[]]+([][(![]+[])[+[]]+([![]]+[][[]])[+!+[]+[+[]]]+(![]+[])[!+[]+!+[]]+(!![]+[])[+[]]+(!![]+[])[!+[]+!+[]+!+[]]+(!![]+[])[+!+[]]]+[])[!+[]+!+[]+!+[]]+(!![]+[])[+[]]+(!![]+[][(![]+[])[+[]]+([![]]+[][[]])[+!+[]+[+[]]]+(![]+[])[!+[]+!+[]]+(!![]+[])[+[]]+(!![]+[])[!+[]+!+[]+!+[]]+(!![]+[])[+!+[]]])[+!+[]+[+[]]]+(!![]+[])[+!+[]]])[!+[]+!+[]+[+[]]]](!+[]+!+[]+[+[]])+(!![]+[][(![]+[])[+[]]+([![]]+[][[]])[+!+[]+[+[]]]+(![]+[])[!+[]+!+[]]+(!![]+[])[+[]]+(!![]+[])[!+[]+!+[]+!+[]]+(!![]+[])[+!+[]]])[!+[]+!+[]+[+[]]]+([]+[])[(![]+[])[+[]]+(!![]+[][(![]+[])[+[]]+([![]]+[][[]])[+!+[]+[+[]]]+(![]+[])[!+[]+!+[]]+(!![]+[])[+[]]+(!![]+[])[!+[]+!+[]+!+[]]+(!![]+[])[+!+[]]])[+!+[]+[+[]]]+([][[]]+[])[+!+[]]+(!![]+[])[+[]]+([][(![]+[])[+[]]+([![]]+[][[]])[+!+[]+[+[]]]+(![]+[])[!+[]+!+[]]+(!![]+[])[+[]]+(!![]+[])[!+[]+!+[]+!+[]]+(!![]+[])[+!+[]]]+[])[!+[]+!+[]+!+[]]+(!![]+[][(![]+[])[+[]]+([![]]+[][[]])[+!+[]+[+[]]]+(![]+[])[!+[]+!+[]]+(!![]+[])[+[]]+(!![]+[])[!+[]+!+[]+!+[]]+(!![]+[])[+!+[]]])[+!+[]+[+[]]]+(![]+[])[!+[]+!+[]]+(!![]+[][(![]+[])[+[]]+([![]]+[][[]])[+!+[]+[+[]]]+(![]+[])[!+[]+!+[]]+(!![]+[])[+[]]+(!![]+[])[!+[]+!+[]+!+[]]+(!![]+[])[+!+[]]])[+!+[]+[+[]]]+(!![]+[])[+!+[]]]()[+!+[]+[+!+[]]]+([]+[])[([![]]+[][[]])[+!+[]+[+[]]]+(!![]+[])[+[]]+(![]+[])[+!+[]]+(![]+[])[!+[]+!+[]]+([![]]+[][[]])[+!+[]+[+[]]]+([][(![]+[])[+[]]+([![]]+[][[]])[+!+[]+[+[]]]+(![]+[])[!+[]+!+[]]+(!![]+[])[+[]]+(!![]+[])[!+[]+!+[]+!+[]]+(!![]+[])[+!+[]]]+[])[!+[]+!+[]+!+[]]+(![]+[])[!+[]+!+[]+!+[]]]()[!+[]+!+[]]+(![]+[])[+!+[]]+(+((+(+!+[]+[+!+[]]+(!![]+[])[!+[]+!+[]+!+[]]+[!+[]+!+[]]+[+[]])+[])[+!+[]]+[+[]+[+[]]+[+[]]+[+[]]+[+[]]+[+[]]+[+[]]+[+[]]+[+[]]+[+!+[]]])+[])[!+[]+!+[]]+(+(+!+[]+[+!+[]]))[(!![]+[])[+[]]+(!![]+[][(![]+[])[+[]]+([![]]+[][[]])[+!+[]+[+[]]]+(![]+[])[!+[]+!+[]]+(!![]+[])[+[]]+(!![]+[])[!+[]+!+[]+!+[]]+(!![]+[])[+!+[]]])[+!+[]+[+[]]]+(+![]+([]+[])[([][(![]+[])[+[]]+([![]]+[][[]])[+!+[]+[+[]]]+(![]+[])[!+[]+!+[]]+(!![]+[])[+[]]+(!![]+[])[!+[]+!+[]+!+[]]+(!![]+[])[+!+[]]]+[])[!+[]+!+[]+!+[]]+(!![]+[][(![]+[])[+[]]+([![]]+[][[]])[+!+[]+[+[]]]+(![]+[])[!+[]+!+[]]+(!![]+[])[+[]]+(!![]+[])[!+[]+!+[]+!+[]]+(!![]+[])[+!+[]]])[+!+[]+[+[]]]+([][[]]+[])[+!+[]]+(![]+[])[!+[]+!+[]+!+[]]+(!![]+[])[+[]]+(!![]+[])[+!+[]]+([][[]]+[])[+[]]+([][(![]+[])[+[]]+([![]]+[][[]])[+!+[]+[+[]]]+(![]+[])[!+[]+!+[]]+(!![]+[])[+[]]+(!![]+[])[!+[]+!+[]+!+[]]+(!![]+[])[+!+[]]]+[])[!+[]+!+[]+!+[]]+(!![]+[])[+[]]+(!![]+[][(![]+[])[+[]]+([![]]+[][[]])[+!+[]+[+[]]]+(![]+[])[!+[]+!+[]]+(!![]+[])[+[]]+(!![]+[])[!+[]+!+[]+!+[]]+(!![]+[])[+!+[]]])[+!+[]+[+[]]]+(!![]+[])[+!+[]]])[+!+[]+[+[]]]+(!![]+[])[+[]]+(!![]+[])[+!+[]]+([![]]+[][[]])[+!+[]+[+[]]]+([][[]]+[])[+!+[]]+(+![]+[![]]+([]+[])[([][(![]+[])[+[]]+([![]]+[][[]])[+!+[]+[+[]]]+(![]+[])[!+[]+!+[]]+(!![]+[])[+[]]+(!![]+[])[!+[]+!+[]+!+[]]+(!![]+[])[+!+[]]]+[])[!+[]+!+[]+!+[]]+(!![]+[][(![]+[])[+[]]+([![]]+[][[]])[+!+[]+[+[]]]+(![]+[])[!+[]+!+[]]+(!![]+[])[+[]]+(!![]+[])[!+[]+!+[]+!+[]]+(!![]+[])[+!+[]]])[+!+[]+[+[]]]+([][[]]+[])[+!+[]]+(![]+[])[!+[]+!+[]+!+[]]+(!![]+[])[+[]]+(!![]+[])[+!+[]]+([][[]]+[])[+[]]+([][(![]+[])[+[]]+([![]]+[][[]])[+!+[]+[+[]]]+(![]+[])[!+[]+!+[]]+(!![]+[])[+[]]+(!![]+[])[!+[]+!+[]+!+[]]+(!![]+[])[+!+[]]]+[])[!+[]+!+[]+!+[]]+(!![]+[])[+[]]+(!![]+[][(![]+[])[+[]]+([![]]+[][[]])[+!+[]+[+[]]]+(![]+[])[!+[]+!+[]]+(!![]+[])[+[]]+(!![]+[])[!+[]+!+[]+!+[]]+(!![]+[])[+!+[]]])[+!+[]+[+[]]]+(!![]+[])[+!+[]]])[!+[]+!+[]+[+[]]]](!+[]+!+[]+[+[]])+(!![]+[][(![]+[])[+[]]+([![]]+[][[]])[+!+[]+[+[]]]+(![]+[])[!+[]+!+[]]+(!![]+[])[+[]]+(!![]+[])[!+[]+!+[]+!+[]]+(!![]+[])[+!+[]]])[!+[]+!+[]+[+[]]])[([][(![]+[])[+[]]+([![]]+[][[]])[+!+[]+[+[]]]+(![]+[])[!+[]+!+[]]+(!![]+[])[+[]]+(!![]+[])[!+[]+!+[]+!+[]]+(!![]+[])[+!+[]]]+[])[!+[]+!+[]+!+[]]+(![]+[])[+!+[]]+(![]+[])[!+[]+!+[]]+(![]+[])[!+[]+!+[]]]

आप अपने ब्राउज़र के कंसोल में दोनों संस्करणों का परीक्षण कर सकते हैं। पहला संस्करण सिर्फ एक फ़ंक्शन है, दूसरा संस्करण एक स्निपेट है जिसमें कोष्ठक और तर्क को जोड़ा गया है।

उदाहरण

< {function snippet here}([1, -44, 65, -105, 12])
> [-105, -44, 1, 12, 65]

कैसे?

पहला स्निपेट उस सरणी विधि पर कॉल करता है जिसे आप इसे पास करते हैं। डिफ़ॉल्ट रूप से, सॉर्ट विधि लेक्सोग्राफिक को सॉर्ट करती है, जो पूर्णांकों (विशेष रूप से बहु-अंक नकारात्मक संख्या) के लिए खराब है। जैसे, हमें इसे एक तीर फ़ंक्शन के रूप में कॉलबैक पास करना होगा जो दो तत्वों को लेता है और बाद वाले को पूर्व से घटाता है। परिणामी मूल्य के आधार पर, दो तत्वों को फिर से व्यवस्थित किया जाता है: यदि यह 0 से छोटा है , तो aपहले दिखाई देगा b, यदि यह 0 से बड़ा है, तो aबाद में दिखाई देगाb , और यदि यह 0 है, तो दोनों तत्व एक दूसरे के बगल में समाप्त हो जाएंगे।

दूसरा स्निपेट पहले स्निपेट के एन्कोडेड संस्करण से ज्यादा कुछ नहीं है और यह इस तथ्य का फायदा उठाता है कि जावास्क्रिप्ट में, object.function()बराबर होता है object["function"]()। यह !सभी प्रकार के तार उत्पन्न करने के लिए खाली सरणियों, ऑपरेटरों और नंबर कास्टिंग का भी उपयोग करता है , जिसमें फ़ंक्शन नाम के लिए आवश्यक वर्ण पाए जा सकते हैं। फिर ब्रैकेट को एक बार फिर से एक निश्चित इंडेक्स में वर्ण को प्राप्त करने के लिए उपयोग किया जाता है, और उन सभी वर्णों को संक्षिप्त किया जाता है, जिसके परिणामस्वरूप निम्नलिखित जावास्क्रिप्ट कोड होता है:

[]["fill"]["constructor"]("return this.sort((a,b)=>a-b)")["call"]

[]["fill"]के बराबर होती है [].fill, जिसका ["constructor"]है Functionवस्तु। फिर हम इसे एक स्ट्रिंग के साथ कहते हैं (जिसे मूल्यांकन किया जाता है जब फ़ंक्शन कहा जाता है), जो पहला फ़ंक्शन है, लेकिन ध्यान दें कि तर्क को बदल दिया गया है this। thisतर्क के मूल्य को निर्धारित करने के लिए, हमें इस फ़ंक्शन पर एक फ़ंक्शन को कॉल करने की आवश्यकता है, अर्थात् ["call"]। पारंपरिक जावास्क्रिप्ट में, आप इसे इस प्रकार लिखेंगे:

function _() {
    return this.sort((a,b)=>a-b);
}
_.call(argument);

Comments

मुझे यकीन है कि इसके बजाय बैकस्टिक्स का उपयोग करते हुए, कोष्ठक के बिना एक समाधान प्राप्त करना संभव है। Function`return a=>a.sort\x28\x28a,b\x29=>a-b\x29` उदाहरण के लिए, लेकिन आपके द्वारा पहले से उपयोग किए गए वर्णों का उपयोग किए बिना

— ETHproductions

ऐसा नहीं है कि यह मायने रखता है, लेकिन आप शायद दूसरी स्निपेट में बाइट्स की एक महत्वपूर्ण राशि को बचा सकते 'हैं, जैसे '('कि JSF जो कुछ भी उत्पन्न करता है, उसके बजाय शुरू और कर के । (भी, का उपयोग करें fऔर के tबजाय vars के रूप में , aऔर शाब्दिक लागत के बारे में 3000 chars)bb

— ETHproductions

Answer 6

वी , स्कोर 3 , 4

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

• संख्यात्मक मान द्वारा क्रमित करें n,

• हेक्साडेसिमल मूल्य के आधार पर छाँटें x, और

• फ्लोटिंग पॉइंट वैल्यू द्वारा क्रमबद्ध करें f

थोड़ा साइड-नोट: जब मैं कुछ लिखता हूं <esc>या <C-r>, यह वास्तव में एक सिंगल-बाइट है। यह अप्राप्य वर्णों का प्रतिनिधित्व करता है, और चूँकि V दुर्भाग्यवश अप्रमाणित वर्णों पर बहुत अधिक निर्भर करता है, यह विधि सब कुछ आसान कर देती है। टीआईओ लिंक में -vझंडा होता है, जो वी दुभाषिया को पढ़ता है जैसे कि वे चरित्र थे जो वे प्रतिनिधित्व करते हैं।

कार्यक्रम 1, 2 बाइट्स

ún

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

यह V विशिष्ट सॉर्ट फ़ंक्शन को कॉल करता है।

कार्यक्रम 2, 10 बाइट्स

Qsor x
vi

यह सीधे तौर पर 'सॉर्ट' कहता है। इसके बारे में केवल दिलचस्प बात यह है कि हम इसे exमोड से करते हैं, जो एक अजीब मोड है जो पाठ संपादक 'पूर्व', वी के पर-परदादा का अनुकरण करता है। viके लिए एक शॉर्टकट है visual, कमांड का उपयोग पूर्व मोड को छोड़ने के लिए किया जाता है। इसके लिए एक अनुगामी न्यूलाइन की आवश्यकता होती है।

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

कार्यक्रम 3, 14 बाइट्स

OSOR X<esc>V~DJ:<C-r>"

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

ठीक है, यहां वह जगह है जहां स्पष्टीकरण थोड़ा अजीब होने लगता है। यदि हम पाठ का निर्माण कर सकते हैं sor x, तो हम इसे हटा सकते हैं और इसे वर्तमान कमांड में डाल सकते हैं <C-r><register-name>। तो हम इसे ऊपर दर्ज करेंगे।

O                       " Open a newline above the current line, and enter insert mode
 SOR X                  " From insert mode, enter 'SOR X'
      <esc>             " Leave insert mode
           V            " Select this whole line
            ~           " And toggle the case of every selected character ('u' would also work here)
             D          " Delete this line (into register '"')
              J         " Get rid of a newline
               :        " Enter command-line mode
                <C-r>"  " Insert register '"'
                        " Implicitly hit enter, running the 'sor x' command
                        " Implicitly print the buffer

कार्यक्रम 4, 19 बाइट्स

YPC<C-v>58fbe a<C-c>g?_dd@1

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

और यहां वह जगह है जहां स्पष्टीकरण बहुत अजीब होने लगते हैं । पिछली बार की तरह, हम कमांड को सामान्य मोड में बनाएंगे ताकि हम विभिन्न कुंजियों का उपयोग कर सकें।

YP                          " Create a copy of this line up one line. This is mostly so that we have a line to work with without messing with the numbers.
  C                         " Delete this line and enter insert mode
   <C-v>58                  " Insert ASCII '58' (which is ':')
          fbe a             " Insert 'fbe a'
               <C-c>        " Pretty much equivalent to <esc>
                    g?_     " ROT13 this line. Now the line is ':sor n'
                       dd   " Delete this whole line
                         @1 " And run it as if typed

Answer 7

CJam, स्कोर 4

प्रोग्राम 1: बिल्ट-इन

$

प्रोग्राम 2: एवल'ड बिल्ट-इन

36c~

36 का ASCII मान है $।

कार्यक्रम 3: क्रमचय क्रमबद्धता

e!0=

e!     e# Find unique permutations of the input
  0=   e# Take the first one, which happens to be in sorted order

कार्यक्रम 4: न्यूनतम मूल्य

[{__)\;\{_@_@<{\}&;}*^{1m<}{)\}?}h;]

इस अस्पष्ट रूप से विमुद्रीकरण की व्याख्या:

[             e# Begin working in an array
{             e# Do this block while the TOS is truthy (doesn't pop)
 __           e#  Duplicate TOS twice (the array)
 )\;          e#  Take the last element of the array
 \            e#  Swap top two elements, bringing the other array copy to the top
 {            e#  Reduce the array using this block
  _@_@<{\}&;  e#   The minimum of two values (e was already used, so can't use e<)
 }*           e#  (result is the minimum value from the array)
 ^            e#  Bitwise XOR of last element with minimum element;
              e#   if the numbers are the same, result is 0, otherwise non-zero
 {            e#  If non-zero (i.e. last element wasn't the minimum element)
  1m<         e#   Rotate the array 1 to the left
 }{           e#  Else
  )\          e#   Remove the last element and bring the array back to TOS
 }?           e#  (end if)
}h            e# (end do-while)
;             e# Remove the empty array left behind
]             e# End the array

Comments

सुनिश्चित नहीं हैं कि यह कैसे उपयोगी है, लेकिन आप उपयोग कर सकते हैं (+के बजाय 1m<अगर आप चाहते हैं।

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

@ मैं पहले से ही <उस स्निपेट का उपयोग कर रहा हूं, इसलिए शायद इसके साथ रहना बेहतर होगा1m<

— बिजनेस कैट

हालांकि मुझे यकीन नहीं है कि मैं ब्लॉक का उपयोग किए बिना अब और भी कर पाऊंगा ...

— बिजनेस कैट

Answer 8

जाप , स्कोर = 4

कार्यक्रम 1

n

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

कार्यक्रम 2

ñ

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

कार्यक्रम 3

s)$.sort((a,b)=>a-b

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

कार्यक्रम 4

Ov85d +110d

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

Comments

अच्छा है। मुझे लगता है कि आप तीसरे कार्यक्रम में यू को बचा सकते हैं s)$.sort(..., यह सुनिश्चित नहीं है कि यह उपयोगी है।

— ETHproductions

@ETHproductions धन्यवाद। मुझे वास्तव में यकीन नहीं है कि मैं और भी बहुत कुछ कर सकता हूं; किसी भी अधिक Japt या JS को खाली नहीं कर सकता क्योंकि Oऔर $इसका उपयोग किया गया है। यदि आप छँटाई के अन्य तरीकों के बारे में सोच सकते हैं तो मैं सुझाव के लिए खुला हूँ! :)

— टॉम

Answer 9

अष्टक, 2 अंक

यह एसोलंगों के साथ प्रतिस्पर्धा करना कठिन है, लेकिन यहाँ जाता है:

अगर कोई ऐसा करता है तो मैं प्रभावित हूं। uniqueमूल्यों को सॉर्ट करने के लिए उपयोग किया जा सकता है, लेकिन यह डुप्लिकेट को बाहर कर देगा। डुप्लिकेट को सम्मिलित करने के लिए आपको कोष्ठक की आवश्यकता होगी, और वे बबल-सॉर्ट में उपयोग किए जाते हैं। आपको भी आवश्यकता होगी @, जिसका उपयोग किया जाता है।

संख्या 1:

यह काफी सरल है: एक अनाम फ़ंक्शन बनाएं, जिसे चर को सौंपा गया है ans।

@sort

इसे इस तरह से कॉल करें ans([-5, 3, 0, -2, 100]):। यह tio पर काम नहीं करता है, लेकिन यह ऑक्टेव-ऑनलाइन पर काम करता है ।

---

संख्या 2:

यह केवल वर्णों का उपयोग किए बिना, बबल सॉर्ट का कार्यान्वयन है @sort। हम वजह से इस एक समारोह कर सकते हैं नहीं, oहै, और हम उपयोग नहीं कर सकते inputक्योंकि की t। हम इसलिए फंस गए हैं eval।

eval(['a=inpu',116,'("");']);i=1;k=0;
while~k,k=1;i=1;while i<numel(a),if a(i)>a(i+1),a([i+1,i]) = a([i,i+1]);k=0;
end,i++;end,end,a

eval(['a=inpu',116,'("");']);इसका मूल्यांकन करता है: a=input("");कि हम अपने इनपुट वेक्टर में प्रवेश करने के लिए उपयोग कर सकते हैं। बाकी बुलबुला-छँटाई का उपयोग किए बिना forया है mod। ध्यान दें कि यह एक स्क्रिप्ट में सहेजा जाना चाहिए और GUI / CLI से कॉल किया जाना चाहिए। आप इसे कॉपी-पेस्ट नहीं कर सकते, क्योंकि input("")(यह इनपुट के रूप में बाकी कोड का उपयोग करेगा, इस प्रकार बुरी तरह से विफल हो जाता है)।

Answer 10

हास्केल (लैम्बडाबोट), 3 कार्य

sort


vv v|vvv:vvvv<-v=vv vvvv|v==v=v
vvvv==:vvv|vvvv==vv vvvv=vvv:vvvv|v:vv<-vvvv,vvv<v=vvv:v:vv|v:vv<-vvvv=v:vv==:vvv
vv=:vvvv|v:vvv<-vvvv=vv==:v=:vvv
vv=:v=vv
v vvv=vv vvv=:vvv


fix(ap(min).ap((++).flip(map)[1].(.(0*)).(+).minimum).(.ap(\\)(flip(map)[1].(.(0*)).(+).minimum)))

मैं बहुत सारे importबयानों से बचने के लिए लैम्बडॉट वातावरण का उपयोग कर रहा हूं । यहां तक ​​कि sortजरूरत है import Data.List। lambdabot डिफ़ॉल्ट रूप से मॉड्यूल का एक गुच्छा आयात करता है। लापता के अलावाimports , यह हमारे नियमों के अनुसार मानक हास्केल कोड है।

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

कार्य 1

sort

पुस्तकालय समारोह से Data.List । यहां ज्यादा कुछ नहीं कहना है।

समारोह 2

vv v|vvv:vvvv<-v=vv vvvv|v==v=v
vvvv==:vvv|vvvv==vv vvvv=vvv:vvvv|v:vv<-vvvv,vvv<v=vvv:v:vv|v:vv<-vvvv=v:vv==:vvv
vv=:vvvv|v:vvv<-vvvv=vv==:v=:vvv
vv=:v=vv
v vvv=vv vvv=:vvv

समारोह v एक सम्मिलित-प्रकार लागू करता है।

मैं ()मापदंडों के लिए बचने के लिए पैटर्न गार्ड का उपयोग करता हूं । से तुलना vv v|vvv:vvvv<-v=...करेंvv(vvv:vvvv)=... ।

vvखाली सूची बनाने के लिए पहली पंक्ति, फ़ंक्शन एक सहायक फ़ंक्शन है। इसके साथ मुझे []शाब्दिक खाली सूची लिखने के लिए उपयोग करने की आवश्यकता नहीं है । अधिक पठनीय:

mkEmpty list | hd:tl <- list = mkEmpty tl | otherwise = list

(==:)सम्मिलित किया जाता है, जो एक तत्व को क्रमबद्ध सूची में सम्मिलित करता है, ताकि परिणामी सूची अभी भी क्रमबद्ध हो। अधिक पठनीय:

list `insert` el
  | list == []           = el:list
  | hd:tl <- list, el<hd = el:hd:tl
  | hd:tl <- list        = hd : tl `insert` el

(=:)कम हो गया है। अधिक पठनीय:

acc `reduce` list
  | hd:tl <- list = (acc `insert` hd) `reduce` tl
acc `reduce` list = acc

और अंत में vजो इनपुट सूची को कम कर देता है []:

sort list = [] `reduce` list

समारोह 3

fix(ap(min).ap((++).flip(map)[1].(.(0*)).(+).minimum).(.ap(\\)(flip(map)[1].(.(0*)).(+).minimum)))

sortसमारोह से 1 सूची-पैदल कार्य (के सबसे बनाता है fold, scan, until) अनुपलब्ध है। रिकर्सन की जरूरत है =जो फंक्शन 2 में उपयोग किया जाता है। केवल एकमात्र विकल्प बचा हुआ है जो फ़िक्सपॉइंट कॉम्बिनेटर का उपयोग कर रहा है fix। मैंने शुरुआत कर दी है

fix (\f x -> min x ([minimum x]++f(x\\[minimum x])))

जो एक चयन प्रकार है। इसे पॉइंट-फ्री में बदलना (मैं लैम्ब्डा का उपयोग नहीं कर सकता \f x ->..., क्योंकि -इसका उपयोग फंक्शन 2 में पैटर्न गुरु द्वारा किया जाता है:

fix (ap min . ap ((++) . return . minimum) . (. ap (\\) (return . minimum)))

सिंगलटन सूचियों को किसी मूल्य के साथ बनाना returnनिषिद्ध है (उसी के लिए pure), इसलिए मुझे अपना स्वयं का फ़ंक्शन बनाना होगा: \x -> map (\y -> x+0*y) [1]या बिंदु-मुक्त flip map[1].(.(0*)).(+)। returnपैदावार की जगह

fix(ap(min).ap((++).flip(map)[1].(.(0*)).(+).minimum).(.ap(\\)(flip(map)[1].(.(0*)).(+).minimum)))

Answer 11

MATL , 3 कार्यक्रम

कार्यक्रम 1

S

यह अंतर्निहित इनपुट और डिस्प्ले के साथ बिल्टइन फ़ंक्शन का उपयोग करता है।

इसे MATL पर ऑनलाइन आज़माएं ।

कार्यक्रम 2

`GGnZrd0<a}3M

जब तक परिणाम के सभी निरंतर अंतर गैर-नकारात्मक नहीं हो जाते हैं, तब तक यह इनपुट के यादृच्छिक क्रम को उत्पन्न करता रहता है (यह @og द्वारा नोट किया गया है )। चलने का समय गैर नियतात्मक है और बहुत तेजी से इसकी औसत बढ़ जाती है इनपुट आकार (यानी, 𝒪 (साथ n! ) एक आकार- के लिए n सभी प्रविष्टियों विभिन्न साथ सरणी)।

इसे MATL ऑनलाइन पर आज़माएं ।

कार्यक्रम 3

t:"tt_X>_=&)]&h

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

इसे MATL पर ऑनलाइन आज़माएं ।

Comments

अच्छा पार्श्व सोच!

— ग्रेग मार्टिन

क्या वह बोगो-सॉर्ट है?

— c ..

@ लो गोगल्स बोगो-सॉर्ट दरअसल! टीआईएल

— लुइस मेंडो

Answer 12

पिप , 4 कार्यक्रम

प्रोग्राम 1 - बिलिन

स्निपेट; में मान लेता है x।

SNx

( SNसॉर्ट न्यूमेरिक के लिए)

कार्यक्रम 2 - फ़िल्टर क्रमपरिवर्तन

स्निपेट; में मान लेता है y। लगभग 7 वस्तुओं की तुलना में इनपुट के लिए बहुत धीमा।

Y$<=_FIPMyPOy

       PMy     List of permutations of y
     FI        Filter on this lambda function:
 $<=_           Fold on less-than-or-equal
                (gives 1 if the permutation is sorted ascending, 0 otherwise)
Y              Yank that result back into y
               Filter returned a list of (one or more) permutations, so we need to
          POy  Pop the first one

कार्यक्रम 3 - eval

स्निपेट; में मान लेता है z।

V J C[83 78 122]

    C[83 78 122]  Apply chr to each number; yields ["S" "N" "z"]
  J               Join that list into a string
V                 Eval

कार्यक्रम 4 - मर्जसॉर्ट

अनाम फ़ंक्शन; तर्क (जैसे के रूप में सूची के साथ फोन ({...} [1 2])या f:{...} (f [1 2])।

{b:#a>o?(fa@(,#a/2))lc:#a>o?(fa@(#a/2,()))aa:lWb{Wb@0>c@0|b@0Qc@0{aAE:c@0c@>:o}t:bb:cc:t}aALc}

Ungolfed:

{
 ; If more than one element in a, b gets result of recursion with first half
 ; else b gets l (empty list)
 b: #a>o ? (f a@(,#a/2)) l
 ; If more than one element in a, c gets result of recursion with second half
 ; else c gets a
 c: #a>o ? (f a@(#a/2,())) a
 ; Now we merge b and c
 ; We'll put the results in a, which must be initialized to l (empty list)
 a:l
 ; Loop while b is nonempty
 W b {
  ; Loop while 0th element of c exists and is less than or equal to 0th element
  ; of b (note: Q is string equality)
  W b@0>c@0 | b@0Qc@0 {
   ; Append 0th element of c to a
   a AE: c@0
   ; Slice c from 1st element on and assign that back to c (removing 0th)
   c @>: o
  }
  ; Swap b and c
  t:b
  b:c
  c:t
 }
 ; When b is empty, we only need append the rest of c to a and return
 aALc
}

Answer 13

पॉवरशेल , २

|sort

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

यह एक स्निपेट है जो आरईपीएल के पावरशेल के समकक्ष (जैसे) चलता है। TIO लिंक उपयोग दिखाता है। sortके लिए एक उपनाम है Sort-Objectcmdlet।

---

PARAM($A)[ARRAY]::SORT($A);$A

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

PowerShell कमांड केस-असंवेदनशील हैं, इसलिए हम sortएक के SORTलिए और दूसरे के लिए उपयोग कर सकते हैं । यह एक इनपुट सरणी लेता है, इसे इन-प्लेस पर सॉर्ट करता है, और फिर इसे आउटपुट करता है।

Answer 14

रूबी, 2 कार्यक्रम

पहला - सीधा:

->t{t.sort}

दूसरा - मुश्किल हिस्सा:

def w(g)
    eval ""<<103<<46<<115<<111<<114<<116
end

Answer 15

जम्मू

कार्यक्रम एक: 3 बाइट्स

/:~

जैसा कि /:~ 3,1,2,1आउटपुट में है1 1 2 3

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

जे में नोट, नकारात्मक संख्या _ से पहले नहीं हैं - इसलिए आप 4, _10,56, _333 आदि की कोशिश कर सकते हैं।

कार्यक्रम दो: 5 बाइट्स

|.\:~

Comments

मैंने आपका उत्तर ठीक कर दिया ताकि कोड ठीक से प्रदर्शित हो। अच्छा जवाब! इसके अलावा, Try it onlineबात यह है कि आप ऐसा कर सकते हैं एक जवाब में एक पृष्ठ को जोड़ने के लिए, TIO पर एक वेबपेज के लिए लिंक [displayed text](link)।

— क्लिस्मिक

धन्यवाद! बस बाहर शुरू तो यह धीरे से लटका हो रही है! लगता है अब बेहतर लग रहा है। आपकी मदद की बहुत सराहना की। रिचर्ड

— रिचर्ड डोनोवन

आपके द्वारा लिखे गए प्रोग्राम किसी भी वर्ण को साझा नहीं कर सकते हैं; के रूप में किया जाता है, :और ~उन दोनों में होते हैं।

— लिन

Answer 16

PHP 7, 2 कार्यक्रम

दोनों कार्यक्रमों को और अधिक निखारा जा सकता है।

कार्यक्रम 1, 254 बाइट्स, वर्ण ! "$&+.01:;=>?[]adeginoprtv

$a=$argv;0 .$a[1+1]?$i=$n=$d=0:print$a[1]and die;g:$r=0 .$a[++$i+1];$i=!$r?1:$i;$n=!$r?$n+1:$n;$v=$i+1;$d=$v>$d?$v:$d;$n>$d?print$a[$d]and die:0;$e=$d>$n&&$a[$i]>$a[$v];$t=$a[$i];$a[$i]=$e?$a[$v]:$a[$i];$a[$v]=$e?$t:$a[$v];$n==$d?print"$a[$i] ":0;goto g;

बबल शॅाट। gotoएक लूप बनाने के लिए उपयोग करता है जैसा कि अंतर्निहित लूप की आवश्यकता होती है() ।

कार्यक्रम 2, 155 बाइट्स, वर्ण #%'(),-67ACEFINORTUYZ^_{|}~

IF(CREATE_FUNCTION('','NEFTIEZIENAECCERCTZIENA~N~UEEFECTZIENAUERTEF~CFACTY~YRZIENAUE'^')))6()~(7)7~6-677|~(7)7%~#|~6)77|~(7)7|~77-)^))(-|~^~~~(7)7|~')()){}

IF(...){}के उपयोग से बचा जाता है ;। मुख्य कोड XOR के साथ एन्कोडेड है, क्योंकि $पहले से ही पिछले प्रोग्राम में उपयोग किया जा चुका है। कोड:

global$argv;unset($argv[0]);sort($argv);echo join(' ',$argv);