ट्राइफ़िड सिफर (बिना कीवर्ड)


19

परिचय:

मेरे पास एक दस्तावेज के रूप में संग्रहीत विभिन्न सिफर के भार हैं, जिन्हें मैंने एक बार एक बच्चे के रूप में संकलित किया था, मैंने उनमें से कुछ को चुना जो मुझे लगा कि चुनौतियों के लिए सबसे उपयुक्त हैं (बहुत तुच्छ नहीं, और बहुत कठिन नहीं) और उन्हें चुनौतियों में तब्दील कर दिया। उनमें से ज्यादातर अभी भी सैंडबॉक्स में हैं, और मुझे अभी तक यकीन नहीं है कि मैं उन सभी को पोस्ट करूंगा या केवल कुछ। यहाँ दूसरा है ( कंप्यूटर सिफर पहला पोस्ट था जिसे मैंने पोस्ट किया था)।


के लिए त्रिशिखा सिफर वर्णमाला (एक कीवर्ड का उपयोग किए बिना) (और एक अतिरिक्त वाइल्डकार्ड) तीन 3 से 3 टेबल में विभाजित है:

table 1:     table 2:     table 3:
 |1 2 3       |1 2 3       |1 2 3
-+-----      -+-----      -+-----
1|a b c      1|j k l      1|s t u
2|d e f      2|m n o      2|v w x
3|g h i      3|p q r      3|y z  

एक पाठ जिसे हम आत्मसात करना चाहते हैं वह तालिका-पंक्ति-स्तंभ संख्याओं में कूटबद्ध चरित्र द्वारा पहला वर्ण है। उदाहरण के लिए, पाठ this is a trifid cipherबन जाता है:

        t h i s   i s   a   t r i f i d   c i p h e r
table:  3 1 1 3 3 1 3 3 1 3 3 2 1 1 1 1 3 1 1 2 1 1 2
row:    1 3 3 1 3 3 1 3 1 3 1 3 3 2 3 2 3 1 3 3 3 2 3
column: 2 2 3 1 3 3 1 3 1 3 2 3 3 3 3 1 3 3 3 1 2 2 3

फिर हम तीन के समूहों में ऊपर की पंक्ति में एक दूसरे पंक्ति के बाद सब कुछ डालते हैं:

311 331 331 332 111 131 121 121 331 331 313 133 232 313 332 322 313 313 132 333 313 331 223

और वे एक ही तालिकाओं का उपयोग करके वर्णों में बदल जाते हैं:

s   y   y   z   a   g   d   d   y   y   u   i   q   u   z   w   u   u   h       u   y   o

ध्यान देने वाली एक बात, इनपुट-लंबाई 3. तक होनी चाहिए। इसलिए यदि लंबाई 3 से अधिक है, तो हम इनपुट-लंबाई को एक या दो नहीं, बल्कि एक या दो अनुगामी रिक्त स्थान जोड़ते हैं।

चुनौती:

एक तार दिया sentence_to_encipher , जैसा कि ऊपर बताया गया है, उसे लागू करें।

आपको केवल दी गई जानकारी को पूरा करना होगा sentence_to_encipher , इसलिए एक डिक्रिपरिंग प्रोग्राम / फ़ंक्शन भी बनाने की आवश्यकता नहीं है। मैं भविष्य में डिक्रीफ़रिंग के लिए एक भाग 2 चुनौती बना सकता हूँ (हालाँकि मुझे लग रहा है कि यह तुच्छ / enciphering प्रक्रिया के समान है)।

चुनौती नियम:

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

सामान्य नियम:

  • यह , इसलिए बाइट्स जीत में सबसे छोटा जवाब है।
    कोड-गोल्फ भाषाओं को गैर-कोडगॉल्फिंग भाषाओं के साथ उत्तर पोस्ट करने से हतोत्साहित न करें। 'किसी भी' प्रोग्रामिंग भाषा के लिए यथासंभव संक्षिप्त उत्तर के साथ आने का प्रयास करें।
  • डिफ़ॉल्ट I / O नियमों के साथ आपके उत्तर के लिए मानक नियम लागू होते हैं , इसलिए आपको उचित पैरामीटर और रिटर्न-प्रकार, पूर्ण कार्यक्रमों के साथ STDIN / STDOUT, फ़ंक्शन / विधि का उपयोग करने की अनुमति है। तुम्हारा फोन।
  • डिफ़ॉल्ट लूपोल्स निषिद्ध हैं।
  • यदि संभव हो, तो कृपया अपने कोड (यानी TIO) के लिए एक परीक्षण के साथ एक लिंक जोड़ें ) के ।
  • साथ ही, आपके उत्तर के लिए स्पष्टीकरण जोड़ने की अत्यधिक अनुशंसा की जाती है।

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

Input:            "this is a trifid cipher"
Output:           "syyzagddyyuiquzwuuh uyo"

Input:            "test"
Output:           "utbk"

Input:            "output"
Possible outputs: "rrvgivx" (one space) or "rrzcc lr" (two spaces)

Input:            "trifidcipher"
Possible output:  "vabbuxlzz utr" (one space) or "vabbyzv rx ie " (two spaces)

3
मैंने पढ़ा कि "बिना कीबोर्ड के "। यह एक आनंदमय चुनौती बनने जा रहा था!
Cort Ammon - मोनिका

1
इनपुट की लंबाई 3 तक क्यों होनी चाहिए? मैं नहीं देखता कि यहाँ कैसे मायने रखता है।
निधि मोनिका का मुकदमा

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

@NicHartley आप वास्तव में सही हैं कि भले ही इनपुट 3 से विभाज्य हो फिर भी आप तालिका को स्थानांतरित कर सकते हैं। मैं शुरू में सैंडबॉक्स में वह नियम नहीं था, लेकिन किसी ने मुझे कहा कि ट्राइफिड शो के विकिपीडिया के लिए यह एक या दो रिक्त स्थान जोड़ने के लिए enciphering थोड़ा और अधिक सुरक्षित बनाना चाहिए। इसलिए मैंने इसे चुनौती के हिस्से के रूप में जोड़ा, और इसे विकिपीडिया पृष्ठ (कीवर्ड द्वारा हटाए गए के अलावा) के साथ सिंक में और अधिक बनाने के लिए।
केविन क्रूज़सेन

1
@ केविनक्रूजसेन I ... वास्तव में यह नहीं देखा कि यह कैसे इसे और अधिक सुरक्षित बना देगा (यदि कुछ भी हो, तो इनपुट को एक निश्चित लंबाई का नहीं होने के कारण यह कम सुरक्षित बना देगा , क्योंकि आप अनुमान लगा सकते हैं कि अंतिम वर्ण एन्कोडिंग है space) लेकिन मैं इस बात से सहमत हूं कि विकिपीडिया के अनुरूप यहाँ के सिफर विवरण को रखना एक अच्छा विचार है। समझाने के लिए धन्यवाद!
निधि मोनिका का मुकदमा

जवाबों:


6

जेली , 29 26 25 बाइट्स

⁶Øa;3ṗ¤,©Ṛy;⁶$L3ḍƊ¡ZFs3®y

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

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

⁶Øa;3ṗ¤,©Ṛy;⁶$L3ḍƊ¡ZFs3®y  Main link. Argument: s (string)

⁶                          Set the return value to space.
 Øa;                       Append it to "a...z".
    3ṗ¤                    Yield the third Cartesian power of [1, 2, 3].
       ,©                  Pair the results and store the pair in the register.
                           The register now holds
                           [[[1, 1, 1], ..., [3, 3, 3]], ['a', ... ,'z', ' '].
         Ṛ                 Reverse the outer array.
           ;⁶$             Append a space to s...
              L3ḍƊ¡        if the length is divisible by 3.
          y                Transliterate according to the mapping to the left.
                   ZFs3    Zip/transpose, flatten, split into chunks of length 3.
                       ®y  Transliterate according to the mapping in the register.

मैं साइड-इफेक्ट आउटपुट के बारे में नियमों को कभी नहीं जानता ... लेकिन व्यवस्था 24 के लिए स्वीकार्य होने पर इसे ;L3ḍƊ¡⁶µ⁶Øa;3ṗ¤,ðṚyZFs3⁸yदूर कर सकती है µ
योनातन एलन

हमारे पास एक कमजोर सर्वसम्मति है ( + 6 / -1 ) कि यह अनुमति है, इसलिए धन्यवाद!
डेनिस

आउटपुट गलत प्रतीत होता है। मुझे नहीं लगता कि जोड़ा गया स्थान "चिपक गया"।
डेनिस

6

चारकोल , 39 बाइट्स

≔E⁺θ× ¬﹪Lθ³⌕βιθ⭆⪪E⁺÷θ⁹⁺÷θ³θ﹪鳦³§⁺β ↨³ι

इसे ऑनलाइन आज़माएं! लिंक कोड के वर्बोज़ संस्करण के लिए है। स्पष्टीकरण:

≔               Assign
   θ            Input string
  ⁺             Concatenated with
                Literal space
    ×           Repeated
         θ      Input string
        L       Length
       ﹪        Modulo
          ³     Literal 3
      ¬         Logical not
 E              Mapped over characters
             ι  Current character
           ⌕    Position found in
            β   Lowercase alphabet
              θ To variable

     θ                      List of positions
    ÷                       Vectorised integer divide by
      ⁹                     Literal 9
   ⁺                        Concatenated with
         θ                  List of positions
        ÷                   Vectorised integer divide by
          ³                 Literal 3
       ⁺                    Concatenated with
           θ                List of positions
  E                         Map over values
             ι              Current value
            ﹪               Modulo
              ³             Literal 3
 ⪪                          Split into
                ³           Groups of 3
⭆                           Map over groups and join
                   β        Lowercase alphabet
                  ⁺         Concatenated with
                            Literal space
                 §          Cyclically indexed by
                       ι    Current group
                     ↨      Converted from
                      ³     Base 3
                            Implicitly print


6

पायथ, 34 33 बाइट्स

m@+G;id3csCmtj+27x+G;d3+W!%lz3zd3

पूरा कार्यक्रम। इनपुट लोअरकेस के रूप में अपेक्षित है, आउटपुट एक चरित्र सरणी है। इसे यहाँ ऑनलाइन आज़माएँ , या यहाँ पर सभी परीक्षण मामलों को सत्यापित करें

m@+G;id3csCmtj+27x+G;d3+W!%lz3zd3   Implicit: z=input(), d=" ", G=lowercase alphabet
                           lz       Length of z
                          %  3      The above, mod 3
                        W!          If the above != 3...
                       +      zd    ... append a space to z
           m                        Map the elements of the above, as d, using:
                  +G;                 Append a space to the lowercase alphabet
                 x   d                Find the 0-based index of d in the above
              +27                     Add 27 to the above
             j        3               Convert to base 3
            t                         Discard first element (undoes the +27, ensures result is 3 digits long)
          C                         Transpose the result of the map
         s                          Flatten
        c                       3   Split into chunks of length 3
m                                   Map the elements of the above, as d, using:
     id3                              Convert to decimal from base 3
 @+G;                                 Index the above number into the alphabet + space
                                    Implicit print

वैकल्पिक 34 बाइट समाधान: sm@+G;id3csCm.[03jx+G;d3+W!%lz3zd3- बजाय लेट और पूंछ, .[030 से लंबाई के साथ पैड का उपयोग करता है 3. यदि अग्रणी sगिरा दिया गया हो तो 33 हो सकता है।

संपादित करें: sचरित्र सरणियों को मान्य आउटपुट के रूप में अग्रणी होने से एक बाइट को बचाया


5

रूबी , 153 145 138 131 बाइट्स

->a{a<<" "if a.size%3<1;a.map{|c|[(b=(c.ord%32-1)%27)/9,b%9/3,b%3]}.transpose.join.scan(/.{3}/).map{|x|((x.to_i(3)+65)%91+32).chr}}

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

एक त्वरित और अनुभवहीन दृष्टिकोण, लोअरकेस पाठ के साथ काम करता है। वर्णों के इनपुट और आउटपुट सरणियाँ।


4

जावा (JDK) , 192 बाइट्स

s->{String T="",R=T,C=T,r=T;for(int c:s){c-=c<33?6:97;T+=c/9;R+=c%9/3;C+=c%3;}for(var S:(s.length%3<1?T+2+R+2+C+2:T+R+C).split("(?<=\\G...)"))r+=(char)((Byte.valueOf(S,3)+65)%91+32);return r;}

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

बहुत भोला दृष्टिकोण। एक लोअरकेस char[]को इनपुट के रूप में लेता है लेकिन एक आउटपुट देता है String

स्पष्टीकरण

s->{                                       // char[]-accepting lambda
 String T="",                              //  declare variables Table as an empty string,
        R=T,                               //                    Row as an empty string,
        C=T,                               //                    Column as an empty string,
        r=T;                               //                    result as an empty string.
 for(int c:s){                             //  for each character
  c-=c<33?6:97;                            //   map each letter to a number from 0 to 25, space to 26.
  T+=c/9;                                  //   append the table-value to Table
  R+=c%9/3;                                //   append the row-value to Row
  C+=c%3;                                  //   append the column-value to Column
 }                                         //
 for(var S:                                //  For each token of...
     (s.length%3<1?T+2+R+2+C+2:T+R+C)      //    a single string out of table, row and column and take the space into account if the length is not coprime to 3...
      .split("(?<=\\G...)"))               //    split every 3 characters
  r+=(char)((Byte.valueOf(S,3)+65)%91+32); //   Parses each 3-characters token into a number, using base 3,
                                           //  and make it a letter or a space
 return r;                                 //  return the result
}

क्रेडिट


1
दो छोटे golfs: Integer.valueOfकरने के लिए Byte.valueOfऔर R+=c<26?(char)(c+97):' ';करने के लिएR+=(char)(c<26?c+97:32);
केविन Cruijssen


4

आर , 145 बाइट्स

function(s,K=array(c(97:122,32),rep(3,3)))intToUtf8(K[matrix(arrayInd(match(c(utf8ToInt(s),32[!nchar(s)%%3]),K),dim(K))[,3:1],,3,byrow=T)[,3:1]])

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

मैं / ओ तार के रूप में; एक स्थान जोड़ता है। अजीब पुनरावृत्ति [,3:1]है क्योंकि आर का प्राकृतिक सरणी अनुक्रमण कुछ अलग है।


डांग, आपने मुझे 200 बाइट से हराया। मैं हमेशा आपकी कोडिंग, @Giuseppe से प्रभावित हूं। मुझे कभी
उठानी

1
@ Sumner18 अच्छी तरह से धन्यवाद! मैं आमतौर पर चुनौतियों का जवाब देने से पहले एक या दो दिन गुजारने की कोशिश करता हूं क्योंकि मैं जानता हूं कि अब यहां अन्य आर गोल्फर्स काफी हैं, लेकिन मैं इस का विरोध नहीं कर सकता क्योंकि मैंने इसे सैंडबॉक्स में देखा था। आर गोल्फिंग चैटरूम में हमें गोल्फिंग के लिए विचारों को उछालने के लिए आपका हमेशा स्वागत है । :-)
ग्यूसेप

3
@ सुमनेर 18 भी कोशिश करने और कम आने में कोई शर्म नहीं है, यहाँ मेरा पहला सबमिशन भयानक था और मैंने केवल बेहतर हासिल किया है! कृपया पोस्ट करना जारी रखें, मुझे लगता है कि प्रतिक्रिया प्राप्त करना हमेशा अच्छा होता है ताकि आप सुधार कर सकें :-)
Giuseppe

3

एपीएल + विन, 102 बाइट्स

⎕av[n[c⍳(⊂[2]((⍴t),3)⍴,⍉⊃(c←⊂[2]c,(,⍉9 3⍴c←9/⍳3),[1.1]27⍴⍳3)[(⎕av[n←(97+⍳26),33])⍳t←t,(3|⍴t←⎕)↓' '])]]

स्पष्टीकरण:

t←t,(3|⍴t←⎕)↓' ' Prompts for input and applies coprime condition

(⎕av[n←(97+⍳26),33]⍳ Indices of characters in APL atomic vector 

c←⊂[2]c,(,⍉9 3⍴c←9/⍳3),[1.1]27⍴⍳3) Create a matrix of table, row column for 27 characters

⊂[2]((⍴t),3)⍴,⍉⊃ Extract columns of c corresponding to input and re-order

c⍳ Identify Column indices of re-ordered columns

⎕av[.....] Use indices back in atomic vector to give enciphered text  

परीक्षण मामले के स्क्रीन शॉट का उदाहरण:

⎕av[n[c⍳(⊂[2]((⍴t),3)⍴,⍉⊃(c←⊂[2]c,(,⍉9 3⍴c←9/⍳3),[1.1]27⍴⍳3)[(⎕av[n←(97+⍳26),33])⍳t←t,(3|⍴t←⎕)↓' '])]]
⎕:
'output'
rrvgivx  

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

बिल्कुल निश्चित नहीं है कि ऐसा कैसे किया जाए, लेकिन यह वही है जो ऐसा दिखेगा। मैं ऊपर प्रवेश करने के लिए कुछ
ग्राहम

आम तौर पर मैं टीआईओ में डायलाग क्लासिक का उपयोग कर सकता हूं लेकिन इस मामले में इसका परमाणु वेक्टर एक अलग क्रम में है इसलिए अनुक्रमण काम नहीं करेगा।
ग्राहम

3

एसएएस, 305 बाइट्स

इस एसएएस राक्षसी के लिए एक हार्दिक 'ऊफ'। वहाँ बहुत सारे यादृच्छिक स्ट्रिंग स्वरूपण हैं जो मुझे लगा कि मैं इसमें जाने से बच सकता हूं; मुझे यकीन है कि इसमें से कुछ करने के बेहतर तरीके हैं।

data;input n:&$99.;n=tranwrd(trim(n)," ","{");if mod(length(n),3)=0then n=cats(n,'{');f=n;l=length(n);array a(999);do i=1to l;v=rank(substr(n,i,1))-97;a{i}=int(v/9);a{i+l}=mod(int(v/3),3);a{i+l*2}=mod(v,3);end;f='';do i=1to l*3by 3;f=cats(f,byte(a{i}*9+a{i+1}*3+a{i+2}+97));end;f=tranwrd(f,"{"," ");cards;

कार्ड के स्टेटमेंट के बाद इनपुट को नए सिरे से दर्ज किया जाता है, जैसे:

data;input n:&$99.;n=tranwrd(trim(n)," ","{");if mod(length(n),3)=0then n=cats(n,'{');f=n;l=length(n);array a(999);do i=1to l;v=rank(substr(n,i,1))-97;a{i}=int(v/9);a{i+l}=mod(int(v/3),3);a{i+l*2}=mod(v,3);end;f='';do i=1to l*3by 3;f=cats(f,byte(a{i}*9+a{i+1}*3+a{i+2}+97));end;f=tranwrd(f,"{"," ");cards;
this is a trifid cipher
test
output
trifidcipher

वेरिएबल में आउटपुट वाले डेटासेट को आउटपुट करता है f, साथ ही हेल्पर वेरिएबल्स / एरे वैल्यूज़ का एक गुच्छा होता है।

यहाँ छवि विवरण दर्ज करें

Ungolfed / स्पष्टीकरण:

data;
input n : & $99.; /* Read a line of input, maximum 99 characters */

n=tranwrd(trim(n)," ","{"); /* Replace spaces with '{' (this is the ASCII character following 'z', so it makes it easy to do byte conversions, and lets us not have to deal with spaces, which SAS does not like) */
if mod(length(n),3)=0then n=cats(n,'{'); /* If length of n is not coprime with 3, add an extra "space" to the end */

f=n; /* Set output = input, so that the string will have the same length */
l=length(n);    /* Get the length of the input */
array a(999);   /* Array of values to store intermediate results */

do i = 1 to l; /* For each character in the input... */
    v = rank(substr(n,i,1))-97; /* Get the value of the current character, from 0-26 */

    a{i}=int(v/9);          /* Get the table of the current character and store at appropriate index, from 0-2  */
    a{i+l}=mod(int(v/3),3); /* Get the row of the current character, from 0-2 */
    a{i+l*2}=mod(v,3);      /* Get the column of the current character, from 0-2  */
end;

f='';

do i = 1 to l*3 by 3; /* For each character in the output... */
    f=cats(f,byte(a{i}*9+a{i+1}*3+a{i+2}+97)); /* Convert values back from base 3 to base 10, and convert back into ASCII value */
end;

f = tranwrd(f,"{"," "); /* Replaces our "spaces" with actual spaces for final output */

/* Test cases */
cards;
this is a trifid cipher
test
output
trifidcipher

3

जावास्क्रिप्ट (Node.js) ,  146 141 139  136 बाइट्स

I / O लोअरकेस में है।

s=>'931'.replace(/./g,d=>Buffer(s.length%3?s:s+0).map(c=>(o=(c>48?c-16:26)/d%3+o*3%27|0,++i)%3?0:(o+97)%123||32),i=o=0).split`\0`.join``

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

टिप्पणी की गई

s =>                       // s = input string
  '931'.replace(/./g, d => // for each digit d = 9, 3 and 1:
    Buffer(                //   create a buffer from:
      s.length % 3 ?       //     if the length of s is coprime with 3:
        s                  //       the original input string
      :                    //     else:
        s + 0              //       the input string + an extra '0'
    )                      //
    .map(c =>              //   for each ASCII code c from this Buffer:
      ( o =                //     update o:
        ( c > 48 ?         //       if c is neither a space nor the extra '0':
            c - 16         //         yield c - 16 (which gives 81 .. 106)
          :                //       else:
            26             //         this is the 26th character (space)
        ) / d % 3 +        //       divide by d and apply modulo 3
        o * 3 % 27 | 0,    //       add o * 3, apply modulo 27, coerce to integer
        ++i                //       increment i
      ) % 3 ?              //     if i mod 3 is not equal to 0:
        0                  //       yield 0 (NUL character)
      :                    //     else:
        (o + 97) % 123     //       convert o to the ASCII code of the output letter
        || 32              //       or force 32 (space) for the 26th character
    ),                     //   end of map()
    i = o = 0              //   start with i = o = 0
  ).split`\0`.join``       // end of replace(); remove the NUL characters

मुझे लगता है कि आपने इसे एक बार पहले समझाया है, लेकिन (o=...,++i)%3जेएस में फिर से कैसे काम करता है ? क्या (o,i)एक नलिका या कुछ और, दोनों आंतरिक पूर्णांक उनके modulo-3 में परिवर्तित हो जाते हैं? एक जावा डेवलपर के रूप में, यह अभी भी मुझे देखने के लिए थोड़ा भ्रमित करता है (a,b)%c। हालांकि अच्छा जवाब! मुझे पसंद है कि आप हर तीसरे अंक को कैसे परिवर्तित करते हैं, और फिर पहले दो नल-बाइट हटाते हैं। मुझ से +1।
केविन क्रूज़सेन

2
@KevinCruijssen Quoting MDN : "अल्पविराम ऑपरेटर अपने प्रत्येक ऑपरेंड (बाएं से दाएं) का मूल्यांकन करता है और अंतिम ऑपरेंड का मान लौटाता है। " इसलिए, मॉडुलो को ही लागू किया जाता है ++i
अरनौलड

3

05AB1E , 25 बाइट्स

g3Öð׫SAð«3L3㩇ø˜3ô®Að«‡

चूंकि किसी ने 05AB1E उत्तर अभी तक पोस्ट नहीं किया है, मुझे लगा कि मैं अपना स्वयं का समाधान पोस्ट करूंगा। मैं देख रहा हूं कि यह @ डेनिस elly 'जेली के उत्तर के समान है , हालांकि मैंने चुनौती पोस्ट करने से पहले स्वतंत्र रूप से इसके साथ आया था।

स्ट्रिंग के रूप में इनपुट, वर्णों की सूची के रूप में आउटपुट। एक स्थान जोड़ता है यदि लंबाई 3 से विभाज्य है।

इसे ऑनलाइन आज़माएं या सभी परीक्षण मामलों को सत्यापित करें

स्पष्टीकरण:

g3Ö         # Check if the length of the (implicit) input is divisible by 3
            # (results in 1 for truthy or 0 for falsey)
            #  i.e. "out" → 1
            #  i.e. "test" → 0
   ð×       # Repeat a space that many times
            #  i.e. 1 → " "
            #  i.e. 0 → ""
     «      # And append it to the (implicit) input
            #  i.e. "out" and " " → "out "
            #  i.e. "test" and "" → "test"
      S     # Then make the string a list of characters
            #  i.e. "out " → ["o","u","t"," "]
            #  i.e. "test" → ["t","e","s","t"]
A           # Push the lowercase alphabet
 ð«         # Appended with a space ("abcdefghijklmnopqrstuvwxyz ")
   3L       # Push list [1,2,3]
     3ã     # Cartesian repeated 3 times: [[1,1,1],[1,1,2],...,[3,3,2],[3,3,3]]
       ©    # Save that list of triplets in the registry (without popping)
           # Transliterate, mapping the letters or space to the triplet at the same index
            #  i.e. ["o","u","t"," "] → [[2,2,3],[3,1,3],[3,1,2],[3,3,3]]
            #  i.e. ["t","e","s","t"] → [[3,1,2],[1,2,2],[3,1,1],[3,1,2]]
ø           # Zip, swapping all rows/columns
            #  i.e. [[2,2,3],[3,1,3],[3,1,2],[3,3,3]] → [[2,3,3,3],[2,1,1,3],[3,3,2,3]]
            #  i.e. [[3,1,2],[1,2,2],[3,1,1],[3,1,2]] → [[3,1,3,3],[1,2,1,1],[2,2,1,2]]
 ˜          # Flatten the list
            #  i.e. [[2,3,3,3],[2,1,1,3],[3,3,2,3]] → [2,3,3,3,2,1,1,3,3,3,2,3]
            #  i.e. [[3,1,3,3],[1,2,1,1],[2,2,1,2]] → [3,1,3,3,1,2,1,1,2,2,1,2]
  3ô        # Split it into parts of size 3
            #  i.e. [2,3,3,3,2,1,1,3,3,3,2,3] → [[2,3,3],[3,2,1],[1,3,3],[3,2,3]]
            #  i.e. [3,1,3,3,1,2,1,1,2,2,1,2] → [[3,1,3],[3,1,2],[1,1,2],[2,1,2]]
®           # Push the triplets from the registry again
 Að«        # Push the lowercase alphabet appended with a space again
           # Transliterate again, mapping the triplets back to letters (or a space)
            # (and output the result implicitly)
            #  i.e. [[2,3,3],[3,2,1],[1,3,3],[3,2,3]] → ["r","v","i","x"]
            #  i.e. [[3,1,3],[3,1,2],[1,1,2],[2,1,2]] → ["u","t","b","k"]

3

जाप , 42 बाइट्स

;Êv3 ?UpS:U
m!bS=iC)®+27 ì3 ÅÃÕc ò3 £SgXì3

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

इस उत्तर का मूल शैगी द्वारा हटाए गए उत्तर से आता है, लेकिन वह 3 से विभाज्य लंबाई के इनपुट को संभालने के लिए कभी वापस नहीं आया, इसलिए यह एक निश्चित संस्करण है

स्पष्टीकरण:

;                                 #Set C to the string "abcdefghijklmnopqrstuvwxyz"

 Ê                                #Get the length of the input
  v3 ?                            #If it is divisible by 3:
      UpS                         # Add a space
         :U                       #Otherwise don't add a space
                                  #Store the result in U

   S=iC)                          #Set S to C plus a space
m                                 #For each character in U:
 !bS                              # Get the position of that character in S
        ®        Ã                #For each resulting index:
             ì3                   # Convert to base 3
         +27    Å                 # Including leading 0s up to 3 places
                  Õ               #Transpose rows and columns
                   c              #Flatten
                     ò3           #Cut into segments of length 3
                        £         #For each segment:
                           Xì3    # Read it as a base 3 number
                         Sg       # Get the letter from S with that index

3

सी # (विजुअल सी # इंटरएक्टिव कंपाइलर) , 178 बाइट्स

s=>{int[]a={9,3,1},b=(s.Length%3>0?s:s+0).Select(c=>c<97?26:c-97).ToArray();s="";for(int i=0,k,l=b.Length;i<l*3;s+=(char)(k>25?32:97+k))k=a.Sum(p=>b[i%l]/a[i++/l]%3*p);return s;}

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

कम गोल्फ ... यह अभी भी भ्रामक है :)

// s is an input string
s=>{
  // powers of 3
  int[]a={9,3,1},
  // ensure the length of s is coprime to 3
  // and convert to numbers from 0-26
  b=(s.Length%3>0?s:s+0).Select(c=>c<97?26:c-97).ToArray();
  // reset s to collect result
  s="";
  // main loop
  for(
    // i is the main index variable
    // k is the value of the encoded character
    // l is the length
    int i=0,k,l=b.Length;
    // i continues until it is 3x the length of the string
    i<l*3;
    // convert k to a character and append
    s+=(char)(k>25?32:97+k)
  )
    // compute the trifid
    // (this is the confusing part :)
    k=a.Sum(p=>b[i%l]/a[i++/l]%3*p);
  // return the result
  return s;
}
हमारी साइट का प्रयोग करके, आप स्वीकार करते हैं कि आपने हमारी Cookie Policy और निजता नीति को पढ़ और समझा लिया है।
Licensed under cc by-sa 3.0 with attribution required.