एक स्ट्रिंग को रेखांकित करें


48

हम पहले से ही अब इसके रिक्त स्थान से एक स्ट्रिंग कैसे करें।

हालांकि, उचित सज्जनों / महिलाओं के रूप में, हम नहीं बल्कि चाहिए कपड़े उतारने यह।


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

उदाहरण, " codegolf "(पांच प्रमुख और अनुगामी स्थान) के साथ शुरू :

     codegolf     
    codegolf     
    codegolf    
   codegolf    
   codegolf   
  codegolf   
  codegolf  
 codegolf  
 codegolf 
codegolf 
codegolf

  1. पहले आउटपुट अपरिवर्तित स्ट्रिंग। फिर, हर कदम पर आउटपुट। एक अग्रणी स्थान को हटाने से शुरू करें (यदि लागू हो - नियम # 2 देखें)।

  2. इनपुट में अग्रणी और अनुगामी रिक्त स्थान की एक अलग संख्या हो सकती है। यदि आप एक तरफ रिक्त स्थान से बाहर निकलते हैं, तो दूसरे को तब तक दबाए रखें जब तक कि स्ट्रिंग नंगे न हो।

  3. इनपुट में कोई अग्रणी और न ही अनुगामी स्थान हो सकता है। अगर ऐसा है, तो इसे आउटपुट के रूप में देखें।

  4. PPCG के डिफ़ॉल्ट I / O विधियों का उपयोग करें । PPCG डिफ़ॉल्ट कमियां निषिद्ध हैं।

  5. खाली इनपुट, या इनपुट पर अपरिभाषित व्यवहार जिसमें केवल रिक्त स्थान होते हैं, ठीक है।

  6. आप मान सकते हैं कि स्ट्रिंग में केवल ASCII प्रिंट करने योग्य स्थान ( 0x20से 0x7E) के वर्ण होंगे ।


उदाहरण - रिक्त स्थान को .बेहतर पठनीयता के लिए डॉट्स द्वारा प्रतिस्थापित किया जाता है:

4 leading spaces, 5 trailing: "....Yes, Sir!....."
....Yes, Sir!.....
...Yes, Sir!.....
...Yes, Sir!....
..Yes, Sir!....
..Yes, Sir!...
.Yes, Sir!...
.Yes, Sir!..
Yes, Sir!..
Yes, Sir!.
Yes, Sir!

6 leading, 3 trailing: "......Let's go golfing..."
......Let's go golfing...
.....Let's go golfing...
.....Let's go golfing..
....Let's go golfing..
....Let's go golfing.
...Let's go golfing.
...Let's go golfing
..Let's go golfing
.Let's go golfing
Let's go golfing

0 leading, 2 trailing: "Hello.."
Hello..
Hello.
Hello

0 leading, 0 trailing: "World"
World

21 leading, 5 trailing: ".....................a....."
.....................a.....
....................a.....
....................a....
...................a....
...................a...
..................a...
..................a..
.................a..
.................a.
................a.
................a
...............a
..............a
.............a
............a
...........a
..........a
.........a
........a
.......a
......a
.....a
....a
...a
..a
.a
a

एक सज्जन / महिला संक्षिप्त है, इसलिए बाइट्स में सबसे कम उत्तर जीतता है



क्या हम मान सकते हैं कि कम से कम एक गैर-अंतरिक्ष चरित्र होगा?
मार्टिन एंडर

2
@KevinCruijssen आपको केवल मुद्रण योग्य स्थान ( 0x20में 0x7E) में ASCII वर्णों को संभालना होगा । अन्य लोग पूर्वनिर्धारित व्यवहार हैं।
नाथन.इलिशा शिरैनी

1
@ केविनक्रूजसेन हां, इस तरह का कोई टेस्ट केस नहीं होगा। " test\r "या " \v test"तो जैसी कोई चीज होगी ही नहीं ।
नाथन.इलिशा शिरैनी

1
क्या यह वैध परीक्षण मामला है ".....................a....."? अगर ऐसा है तो मैं इसे जोड़ने का सुझाव देता हूं क्योंकि कुछ जवाब इस तरह के परीक्षण को विफल करते हैं। (डॉट्स पाठ्यक्रम की बेहतर पठनीयता के लिए हैं)
Cinaski

जवाबों:


11

रेटिना , 26 बाइट्स

{m`^ (.+)\z
$&¶$1
 $
 ¶$%`

इसे ऑनलाइन आज़माएं! (टेस्ट सूट स्पष्टता के लिए अवधियों का उपयोग करता है। पाद लेख और हेडर उन्हें मुख्य कोड के लिए रिक्त स्थान पर और उससे परिवर्तित करते हैं।)

व्याख्या

यह अच्छा होगा यदि हम एक अग्रणी और एक अनुगामी स्थान को छोड़ने और प्रत्येक बार मध्यवर्ती परिणाम को प्रिंट करने के बीच वैकल्पिक कर सकते हैं। समस्या यह है कि वर्तमान में रेटिना सशर्त रूप से प्रिंट नहीं कर सकता है, इसलिए यह इस मध्यवर्ती परिणाम को भी प्रिंट करेगा यदि कोई डुप्लिकेट उत्पन्न करते हुए कोई अग्रणी या कोई अनुगामी स्थान नहीं बचा है। (रेटिना 1.0 में एक विकल्प मिलेगा जो केवल परिणाम को प्रिंट करता है यदि स्ट्रिंग को ऑपरेशन द्वारा बदल दिया गया था, लेकिन हम अभी तक वहां नहीं हैं ...)

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

{m`^ (.+)\z
$&¶$1

{एक पाश जो बंद हो जाता है जब तक स्ट्रिंग को बदलने को दोहराता में wraps कार्यक्रम के दोनों चरणों (जो कोई नेतृत्व कर रहे हैं / रिक्त स्थान छोड़ दिया अनुगामी का मतलब है)। चरण स्वयं स्ट्रिंग की अंतिम पंक्ति और उस अंतिम पंक्ति पर एक प्रमुख स्थान से मेल खाता है, और फिर मैच को वापस लिखता है, साथ ही एक नई लाइन पर अंतरिक्ष के बाद सामान (जिससे कॉपी में अग्रणी स्थान को छोड़ देता है)।

 $
 ¶$%`

ट्रेलिंग स्पेस को हटाना थोड़ा आसान है। यदि हम केवल अंतिम स्थान से मेल खाते हैं, तो हम इसके सामने (उसी लाइन पर) सामान को एक्सेस कर सकते हैं, $%`जिसके साथ उपसर्ग प्रतिस्थापन का एक लाइन-अवेयर वेरिएंट है $`


11

अजगर 2 , 122 107 103 102 98 95 93 91 90 88 87 बाइट्स

s=input()+' '
a=0
while-a*s!=id:
 if a:id=s
 a=~a
 if'!'>s[a]:s=s[1+a:len(s)+a];print s

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


पायथन 3 , 97 95 93 90 बाइट्स

s=input()
a=p=print
p(s)
while s!=a:
 a=s
 if'!'>s:s=s[1:];p(s)
 if'!'>s[-1]:s=s[:-1];p(s)

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


s=input()एक समारोह के बजाय का उपयोग कम बाइट्स ले जाएगा।
जोनाथन फ्रेच

की चर्चा करते हुए 5. Undefined behaviour on empty input, or input that only contains spaces, is OK., 98 बाइट्स
जोनाथन फ्रेच


@JonathanFrech मैंने ऐसा नहीं देखा था; धन्यवाद :)
TFeld

2
आप इसे शुरू में परिभाषित करने के लिए सहेजने के लिए aअंतर्निहित फ़ंक्शन के साथ बदलकर पायथन 2 कोड को आगे बढ़ा सकते हैं id-2 बाइट्स।
11

7

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

3 बाइट्स @nwellnhof की बदौलत सहेजे गए।

{($_,{$++%2??S/" "$//!!S/^" "//}...*)[^.comb*2].unique}

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

स्पष्टीकरण : ($_,{$++%2??S/" "$//!!S/^" "//}...*)एक पुनरावर्ती अनंत अनुक्रम है जो मूल स्ट्रिंग ( $_) के साथ शुरू होता है और अगला तत्व पिछले तत्व पर बुलाया ब्लॉक द्वारा दिया जाता है।

ब्लॉक ही $_चर में स्ट्रिंग प्राप्त करता है। ऑपरेटर S/(regex)/(string)/का पहला मामला के लिए खोज करेंगे (regex)में $_, इसके साथ बदलता है (string), और परिणाम देता है। यदि कोई मेल नहीं है, तो यह $_अपरिवर्तित की सामग्री लौटाता है । हम ?? !!स्थिति के साथ टर्नरी ऑपरेटर का उपयोग करते हैं $++%2, जो ( Falseऔर एक निशुल्क चर है जो ब्लॉक में कॉल पर अपनी सामग्री को संरक्षित करता है।)True$

सबसे खराब स्थिति में (एक तरफ और 1 अन्य चरित्र के सभी स्थान), हम हर 2 चरणों में 1 स्थान हटाते हैं। तो हम यह सुनिश्चित कर सकते हैं कि 2 * (स्ट्रिंग की लंबाई) चरणों में, सभी रिक्त स्थान हटा दिए गए होंगे। हम पुनरावर्ती अनुक्रम से कई तत्वों को लेते हैं [^.comb*2]और अंत में डुप्लिकेट को छोड़ देते हैं (जो तब भी होता है जब किसी स्थान को हटा दिया जाना चाहिए था लेकिन यह वहां नहीं है) .unique। यह स्ट्रिंग्स की सूची लौटाता है, उत्तरोत्तर रिक्त स्थान छीन लिया जाता है।


[^.comb*2]2 बाइट्स बचाता है। किसी कारण से यह काम करता है, लेकिन [^2*.comb]ऐसा नहीं है। पता नहीं क्यों। ?? !!रेगेक्स का चयन करने के लिए एक टर्नरी का उपयोग करना एक और बाइट बचाता है।
nwellnhof

धन्यवाद! मैंने कोशिश की [^2*.comb]और यह काम नहीं किया, इसलिए मैंने सिर्फ इस्तेमाल किया [0..2*.comb]। और टर्नरी के लिए धन्यवाद, मुझे लगा कि यह बहुत महंगा है और मेरे साथ ऐसा नहीं हुआ कि मैंने इसे कुछ और भी महंगी चीज़ों से बदल दिया ...
Ramillies

7

05AB1E , 21 15 बाइट्स

=v¬ðQi¦=}¤ðQi¨=

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

स्पष्टीकरण ^

=                 # print input
 v                # for each character in input
  ¬ðQi  }         # if the first char in the current string is a space
      ¦=          # remove it and print without popping
         ¤ðQi     # if the last char in the current string is a space
             ¨=   # remove it and print without popping

डांग, मैंने कुछ इसी तरह की कोशिश की, लेकिन किसी कारण से मुझे यकीन था कि सिर / पूंछ स्ट्रिंग्स पर काम नहीं करती थी, और मैं इसके बारे में एक मुद्दा उठाने वाला था। डिबग लॉग को गलत पढ़ा होगा। :-)
स्कूटनीट ने

1
@scottinet: मुझे अंत में जांच के लिए चारों ओर जाने का रास्ता मिल गया :)
Emigna

ओह ... हमने पहले क्यों नहीं सोचा? चूँकि हम सशर्त रूप से प्रिंट करते हैं, इसलिए सही समय के लिए लूप की कोई आवश्यकता नहीं है, हमें केवल पर्याप्त समय पर लूप करने की आवश्यकता है। मैं अपने उत्तर को बेहतर बनाने के लिए उस विचार को उधार ले रहा हूं :-)
scottinet

1
@scottinet: हाँ। जब आप इसके बारे में सोचते हैं तो यह स्पष्ट होता है, लेकिन कभी-कभी उन चीजों को याद करना आसान होता है: P
Emigna

टीएफडब्लू
क्लंकी

7

सी (जीसीसी) , 89 84 बाइट्स

पुनरावर्ती संस्करण छोटा है ;-)

j;f(char*s){puts(s);*s^32||puts(++s);s[j=strlen(s)-1]<33?s[j]=0,f(s):*s^32||f(s+1);}

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

सी (जीसीसी) , 107 102 101 100 99 बाइट्स

रिक्त स्थान और ~ का उपयोग करके @Jonathan Frech के लिए 2 बाइट्स धन्यवाद सहेजे गए

i,j,k;f(char*s){for(i=~++k,puts(s);i^k;k=s[j=strlen(s)-1]<33?s[j]=0,puts(s):0)*s^32?i=0:puts(++s);}

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


2
मुझे लगता है कि प्रश्न वास्तव में आप डॉट्स के बजाय रिक्त स्थान को निकालना चाहते हैं। रिक्त स्थान का उपयोग करने का एक फायदा भी है; आप ==46के <33रूप में जगह के साथ बदल सकते हैं सबसे छोटा मुद्रण योग्य चरित्र है और आपको केवल उन लोगों को संभालना होगा।
जोनाथन फ्रेच

क्या करता ++k+है?
जोनाथन फ्रेच

@JonathanFrech यह पूर्व-वेतन वृद्धि करता है kऔर एक को जोड़ता है, जो k = k + 1; i = k + 1;या के बराबर है i = k + 2; k = k + 1
हाइपरनेत्रिनो

तकनीकी रूप से i=k+++2भी काम करता है जो मैंने इस्तेमाल किया होगा क्योंकि +++अजीब लग रहा है: पी
हाइपरनेट्रिनो

@ हायपरनेट्रिनो हाँ, मुझे पता है कि पूर्व वेतन वृद्धि ऑपरेटर क्या करता है; हालांकि मुझे यह नहीं पता कि इसके बिना कोड कैसे काम करता है । तो वास्तव में मैं यह पूछ रहा था कि यह क्या भूमिका निभाता है, बजाय इसके कि इसे कैसे परिभाषित किया गया है।
जोनाथन फ्रेच

6

जावास्क्रिप्ट (ईएस 6) 92

@ यूपोटर्स: नीचे दिए गए दूसरे जेएस उत्तर पर एक नज़र है जो 76 बाइट्स लंबा है

(s,q,l=2,p=0)=>{for(alert(s);l--;p=!p)s[+p&&s.length-p]<'!'&&alert(s=s.slice(!p,-p||q,l=2))}

एक लूप सामने या अंत में एक जगह की तलाश में है। अगर मिल जाए तो स्पेस और आउटपुट स्ट्रिंग हटा दें। यदि 2 बार कोई स्थान नहीं मिला, तो रुकें।

F=
(s,q,l=2,p=0)=>{for(alert(s);l--;p=!p)s[+p&&s.length-p]<'!'&&alert(s=s.slice(!p,-p||q,l=2))}

// some trick to show dots instead of spaces, for test
alert=x=>console.log(x
  .replace(/^ +/g,z=>'.'.repeat(z.length))
  .replace(/ +$/g,z=>'.'.repeat(z.length))
)

function go() {F(I.value.replace(/\./g,' '))}

go()
<input ID=I value='....yes Sir!....'> (use dot instead of space)
<button onclick='go()'>Go</button>


आप के साथ अंतरिक्ष के लिए जाँच करके एक बाइट बचा सकता है <'!'। अपने स्निपेट को अभी भी काम करने के लिए आप replaceअपने कार्य से गुजरने से पहले रिक्त स्थान के साथ पीरियड्स कर सकते हैं ।
जस्टिन मैरिनर

@JustinMariner अब ठीक है, क्योंकि ओपी ने कहा कि कोई चार '' से कम की उम्मीद है। धन्यवाद
edc65

6

पर्ल 5, 32 बाइट्स

@Abigail के कारण 4 बाइट्स बचे

1while s/^ /!say/e+s/ $/!say/e

-pl2 के रूप में गिने जाने की आवश्यकता होती है -E

नमूना उपयोग

$ echo '   test   ' | perl -plE'1while s/^ /!say/e+s/ $/!say/e'
   test   
  test   
  test  
 test  
 test 
test 
test

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


अनुगामी रिक्त स्थान के बिना तार के लिए सही ढंग से काम नहीं करता है।
nwellnhof

print;s/^ //&&print,s/ $//&&print while/^ | $/-nध्वज के साथ काम करता है , यह भी -lआवश्यक नहीं है
नहुएल फौइलुल

@nwellnhof तय की।
Primo

5

सी # (.NET कोर) , 192 183 182 181 179 178 बाइट्स

-3 बाइट्स केविन क्रूज़सेन की बदौलत

n=>{var o=n+"\n";for(var e=1;n.Trim()!=n;){if(1>(e^=1))if(n[0]<33)n=n.Remove(0,1);else continue;else if(n.TrimEnd()!=n)n=n.Remove(n.Length-1);else continue;o+=n+"\n";};return o;}

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


गोल्फ के लिए कुछ चीजें: var e=1;while(n.Trim()!=n)-> for(var e=1;n.Trim()!=n;); if(n[0]==' ')->if(n[0]<33)
केविन क्रूज़सेन

मैंने दूसरे के बारे में सोचा है, लेकिन क्या होगा अगर टेस्ट स्ट्रिंग में नई सुर्खियाँ हों?
कोई

ठीक है, <33ओपी के नए जोड़े गए नियम के कारण संभव है: " आप मान सकते हैं कि स्ट्रिंग में केवल ASCII प्रिंट करने योग्य स्थान ( 0x20से 0x7E) तक वर्ण होंगे
केविन क्रूज़सेन

5

जावा 8, 150 146 145 137 बाइट्स

s->{String r=s;for(int f=0;s!=s.trim();f^=1)r+="\n"+(s=f+s.charAt(0)<33|!s.endsWith(" ")?s.substring(1):s.replaceAll(" $",""));return r;}

-4 बाइट्स @ नोवे को बदलने के (f<1&s.charAt(0)<33)लिए धन्यवाद f+s.charAt(0)<33। इसके बजाय @someone के C # .NET उत्तर से चाल
का उपयोग करके -1 बाइट । -8 बाइट्स @Nevay को फिर से बदलने के लिए धन्यवाद , क्योंकि " इस स्ट्रिंग की एक प्रतिलिपि प्रमुख और अनुगामी श्वेत स्थान के साथ हटा दी जाएगी, या यह स्ट्रिंग यदि इसमें कोई अग्रणी या अनुगामी श्वेत स्थान नहीं है ", तो इस प्रकार संदर्भ समान रहता है यह जांचने के लिए उपयोग किया जा सकता है कि क्या वे समान मान की बजाय एक ही संदर्भ हैं ।!s.trim().equals(s)s.matches(" .*|.* ")
!s.trim().equals(s)s!=s.trim()String#trim!=.equals

स्पष्टीकरण:

इसे यहाँ की कोशिश करो (या एक और अधिक दृश्य संस्करण की कोशिश यहाँ के साथ #बजाय रिक्त स्थान की)।

s->{                               // Method with String as both parameter and return-type
  String r=s;                      //  Result-String (starting at the input)
  for(int f=0;                     //  Flag-integer (starting at 0)
      s!=s.trim();                 //  Loop as long as `s` contains leading/trailing spaces
      f^=1)                        //    And XOR(1) `f` after every iteration (0->1; 1->0)
    r+="\n"                        //   Append the result with a new-line
       +(                          //    Followed by:
         s=f+                      //     If `f` is 0,
             s.charAt(0)<33        //     and `s` starts with a space
           |!s.endsWith(" ")?      //     Or doesn't end with a space
            s.substring(1)         //      Remove the first leading space
           :                       //     Else:
            s.replaceAll(" $",""));//      Remove the last trailing space
                                   //  End of loop (implicit / single-line body)
  return r;                        //  Return the result-String
}                                  // End of method

1
आप (-4 बाइट्स) के s=f+s.charAt(0)<33बजाय उपयोग कर सकते हैं (f<1&s.charAt(0)<33)
नेवई

1
आप (-8 बाइट्स के s!=s.trim()बजाय) का उपयोग कर सकते हैं !s.trim().equals(s);
नेवई


4

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

Ḋ=⁶Ḣ$¡UµÐĿ¹Ṛƭ€QY

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

-2 बाइट्स मीर की बदौलत आउटगोल्फ
-1 बाइट के लिए धन्यवाद

व्याख्या

Ḋ=⁶Ḣ$¡UµÐĿ¹Ṛƭ€QY  Main link
       µÐĿ        While the results are unique (collecting intermediate results), apply the last link (`µ` creates a new monadic link):
Ḋ=⁶Ḣ$¡            Remove a space from the beginning if there is one
 =⁶Ḣ$             If the first character is a space, then 1, else 0
 =                Compare each character to
  ⁶               ' '
   Ḣ              Get the first comparison
Ḋ                 Then Dequeue the string (s -> s[1:])
    ¡             That many times
     U            And reverse the string (the next time this is called, it will remove spaces from the end instead)
             €    For each string
            ƭ     Alternate between two commands:
          ¹       Identity (do nothing), and
           Ṛ      Reverse
          ¹Ṛƭ€    Correct all strings that are reversed to remove the trailing space
              Q   Remove duplicates (where there was no space to remove)
               Y  Join on newlines

ḣ1Ḣ=⁶->=⁶Ḣ
निकली

@EriktheOutgolfer धन्यवाद, संपादन आ रहा है।
हाइपरन्यूट्रिनो

रिवर्स / पहचान के वैकल्पिक आदेशों के साथ अच्छा विचार!
15

@Emigna धन्यवाद! : DI ज्यादातर सिर्फ नया त्वरित उपयोग करने का बहाना चाहता था ...
heh

ƭयदि श्रृंखला दो से अधिक लंबी हो तो केवल एक निलाद की जरूरत होती है। ¹Ṛƭयहाँ ठीक काम करता है।
मील


3

जावा (ओपनजेडके 8) , 161 147 146 बाइट्स

x->{for(int l=0,r=x.length(),k=-1,u,v;((u=32-x.charAt(l)>>k)*(v=32-x.charAt(r-1)>>-1))<1;x+="\n"+x.substring(l-=k&~u|v,r+=(k=~k)&~v|u));return x;}

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

-1 बाइट @Kevin क्रूज़सेन को धन्यवाद !

x -> {
    /*
     * l: left index (inclusive)
     * r: right index (exclusive)
     * k: side to remove from, -1:=left, 0:=right
     * u: left character   0:=space, <0:=no space (-1 if k is left side)
     * v: right character  0:=space, -1:=no space
     */
    for (int l = 0, r = x.length(), k = -1, u, v;
            ((u = 32 - x.charAt(l) >> k)
           * (v = 32 - x.charAt(r - 1) >> -1)) < 1; // loop while left or right has space(s)
            x += "\n" + x.substring(                // append newline and substring
                    l -= k & ~u | v,                // inc. left  if k is left side
                                                    //               and left has space
                                                    //            or right has no space
                    r += (k = ~k) & ~v | u));       // dec. right if k is right side
                                                    //               and right has space
                                                    //            or left has no space
    return x;
}

1
हे, मैंने आपका डिलीट किया हुआ उत्तर देखा और सोच रहा था कि क्या आप मेरे 150 बाइट से नीचे हैं और इसे हटा देंगे। ;)
केविन क्रूज़सेन

1
मुझे पूरा यकीन नहीं है, लेकिन मुझे लगता है कि आप एक बाइट को बदल (u=32-x.charAt(l)>>-1)सकते हैं(u=32-x.charAt(l)>>k)
केविन क्रूज़सेन

@KevinCruijssen काम नहीं करेगा, kहै 0हर दूसरे यात्रा।
नेवई सेप

1
हां, लेकिन अजीब हिस्सा यह है कि टीआईओ काम करता है और इस बदलाव के साथ सभी परीक्षण मामलों के लिए सही परिणाम देता है u। यह नहीं है जब मैं भी -1करने के kलिए बदल जाते हैं v। मैं उलझन में हूं कि यह क्यों काम करता है, क्योंकि kवास्तव में इसके 0बाद बन जाएगा k=~k..: एस
केविन क्रूज़सेन

1
@KevinCruijssen k=0परिदृश्य के लिए: यदि रिक्त स्थान छोड़ दिया है, तो uपहले जैसा ही मान है ( 0); यदि बाईं ओर कोई स्थान नहीं बचा है, तो (k=~k)&~v|uमूल्यांकन करता है -1|u( ~0&-1|u), इस प्रकार अपरिभाषित (नकारात्मक) मान uमायने नहीं रखता ( -1|x==-1)।
नेवई सेप

3

05AB1E , 25 17 बाइट्स

एमिगा से नो-नीड-फॉर-एंड-एंड-चेक विचार उधार लेकर -8 बाइट्स

,v2F¬ðQi¦DNiR},}R

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

मुझे पूरा यकीन है कि कम सीधा दृष्टिकोण उस समाधान को आसानी से हरा सकता है। अभी के लिए...

स्पष्टीकरण:

,v2F¬ðQi¦DNiR},}R           Full Programm
,                           Print the input string
 v                          For each char of the string
                               (we don't really care, we only need to loop
                                enough times to accomplish our task, since
                                we print conditionally we can loop more
                                times than necessary)
  2F...........}            Two times...
    ¬õQi                       Is 1st item a space?
        ¦D                        Remove 1st item + duplicate
          NiR}                    If on the second pass: reverse the list
              ,                   Pop & print with newline
               }               End If
                 R          Reverse the list

मुझे लूप के साथ आपका दृष्टिकोण पसंद है :) मैं कई आईएफएस के बिना एक पास में सब कुछ करने का एक तरीका जानने की कोशिश कर रहा हूं, लेकिन मैंने अभी तक इसका पता नहीं लगाया है। इसके अलावा, आपके स्पष्टीकरण में रिक्त स्थान के बजाय एक रिक्त स्ट्रिंग है।
Emigna

धन्यवाद! मैंने स्पष्टीकरण तय किया, मैं (-1 बाइट) के Sबजाय अपने कोड को गॉल्फ़ करने पर "खाली है" भाग को संपादित करना भूल गया #। लूप ... अच्छी तरह से ... यह एक सीधा दृष्टिकोण की तुलना में एक चक्कर 1 बाइट बचाता है। मैं वर्तमान में कार्य के अंत का पता लगाने के लिए एक छोटे तरीके की तलाश कर रहा हूं (इसके लिए 5 बाइट्स बहुत हैं), और मैं पूरी तरह से एक अलग दृष्टिकोण पर भी विचार कर रहा हूं। मुझे लगता है कि इस चुनौती को हल करने के लिए एक अधिक चतुर तरीका है।
स्कूटनीट

यदि आप कोशिश करते हैं और एक पास में सब कुछ करते हैं (जैसा कि मैं वर्तमान में देख रहा हूं), तो लूप से बाहर निकलने के लिए मेरे पास सबसे अच्छा चेक 8 बाइट्स है ...
एमिग्ना

3

आर , 145 133 111 बाइट्स

-12 बाइट्स @Giuseppe के लिए धन्यवाद, subएक नए चर के परिणाम को संग्रहीत करके और इसे बदल दिया है के लिए परीक्षण

-22 बाइट्स न्यूलाइन के साथ एक स्ट्रिंग के बजाय स्ट्रिंग्स के एक वेक्टर को वापस करके

function(s){L=s
while(grepl("^ | $",s)){if((x=sub("^ ","",s))!=s)L=c(L,x)
if((s=sub(" $","",x))!=x)L=c(L,s)}
L}

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

आंशिक रूप से अनलॉक्ड संस्करण पर स्पष्टीकरण:

function(s){
  L=s                          # Initialise a vector with the original string
  while(grepl("^ | $",s)){     # While there are leading or trailing spaces...
    if((x=sub("^ ","",s))!=s){ # Check whether we can remove a leading space
      L=c(L,x)                 # If so, add the shortened string to the vector
    }
    if((s=sub(" $","",x))!=x){ # Check whether we can remove a trailing space
      L=c(L,x)                 # If so, add the shortened string to the vector
    }
  }
  L                            # Return the vector
}                              

क्या आप C(s<-sub(),\n)एक अलग प्रिंट स्टेटमेंट के बजाय उपयोग नहीं कर सकते ? आह, नहीं, क्योंकिsep=" "
Giuseppe

@Giuseppe हां, मुझे लगता है कि इसे जोड़ने की आवश्यकता के कारण इसे एक ही बयान में शामिल करने के लिए थोड़ा अधिक समय तक काम करना पड़ता है sep=""। ज्यादातर चुनौतियों में अतिरिक्त ट्रेलिंग स्पेस मायने नहीं रखता, लेकिन यहां दुर्भाग्य से ऐसा होता है!
user2390246

133 बाइट्स - आपके उपयोग के बारे में कुछ subयह सुझाव दिया, IDK क्यों
Giuseppe

@Giuseppe बहुत खूबसूरत!
user2390246

क्या आप अभी L=sतार के वेक्टर को सेट और वापस कर सकते हैं?
Giuseppe

3

जावा (ओपनजेडके 8) , 137 125 121 120 124 बाइट्स

s->{int i=1;do System.out.println(s);while(s!=(s=s.substring(s.charAt(0)<33?i:(i=0),s.length()-(s.endsWith(" ")?i^=1:0))));}

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


अच्छा जवाब! बस 137 बाइट के मेरे जवाब के रूप में कम है , लेकिन आप अभी भी इस तरह से 12 बाइट्स गोल्फ कर सकते हैं:s->{for(int i=0;s!=s.trim();)System.out.println(s=s.substring(s.charAt(0)<33?1-i%2:0,s.length()-(s.endsWith(" ")?i++%2:0)));}
केविन क्रूज़सेन

यह वर्तमान में "... स्ट्रिंग को अपरिवर्तित आउटपुट" नहीं करता है और प्रमुख स्थानों और कोई अनुगामी स्थानों के साथ इनपुट के लिए विफल रहता है।
नेवई

1
शायद आप s->{int i=1;do System.out.println(s);while(s!=(s=s.substring(s.charAt(0)<33?i:(i=0),s.length()-(s.endsWith(" ")?i^=1:0))));}(124 बाइट्स) का उपयोग कर सकते हैं (सही प्रतीत होता है, लेकिन बहुत परीक्षण नहीं किया है)।
नेवई

3

MATL , 21 16 बाइट्स

tnE:"t@o&)w46-?x

यह अधिक स्पष्टता के लिए रिक्त स्थान के बजाय डॉट्स का उपयोग करता है। रिक्त स्थान के लिए बदलने के 46द्वारा 32

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

व्याख्या

tn      % Input (implicit). Duplicate and push length, say L
E       % Multiply by 2
:       % Push range [1 2 ... 2*L]
"       % For each k in that array
  t     %   Duplicate the string at the top of the stack
  @     %   Push k
  o     %   Parity: gives 1 or 0
  &)    %   Two-ouput indexing. Pushes the k-th entry of the string and then
        %   the rest of the string. The 1-st output is the first, the 0-th
        %   is the last (indexing is 1-based dand modular)
  w     %   Swap
  46-   %   Subtract 46, which ias ACII for '.'
  ?     %   If non-zero
    x   %     Delete sub-string that was obained by removing that entry
        %   End (implicit)
        % End (implicit)
        % Display stack (implicit)

3

हस्क , 23 22 बाइट्स

u§↑L`G`I¢e₁ȯ↔₁↔
?tI<"!

-1 बाइट के लिए लियो को धन्यवाद।

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

व्याख्या

फ़ंक्शन `G`Iवास्तव में एक अंतर्निहित होना चाहिए ...

?tI<"!  Helper function: remove initial space.
?  <"!  If less than the string "!",
 t      remove first character,
  I     else return as is.
u§↑L`G`I¢e₁ȯ↔₁↔  Main function.
         e       List containing
          ₁      the helper function
           ȯ↔₁↔  and the composition reverse-helper-reverse.
        ¢        Repeat it cyclically.
    `G`I         Cumulative reduce from left by function application
                 using input string as initial value.
 §↑L             Take first length(input) values.
u                Remove duplicates.

अच्छा! वास्तव में हमें चक्रवाती कार्यों को लागू करने के लिए और अधिक निर्माणों की आवश्यकता होगी ... btw मैं पहली जगह को हटाने के लिए एक sligthly कम रास्ता मिल गया है: tio.run/##yygtzv7/v/…
सिंह

@Leo धन्यवाद! उपयोग ?करने से स्पष्ट लगता है ...
Zgarb

3

सी ++, 196 193 189 186 183 बाइट्स

-10 बाइट्स की
बदौलत जोनाथन फ्रेच -3 बाइट्स ज़ाचार्ज़ी को धन्यवाद

#include<iostream>
#include<string>
#define D std::cout<<s<<'\n'
#define R ~-s.size()
auto u=[](auto s){D;while(s[0]<33||s[R]<33){if(s[0]<33)s.erase(0,1),D;if(s[R]<33)s.erase(R),D;}};

MSVC के साथ संकलन के लिए SDL जाँचों के सक्रियण की आवश्यकता होती है


आप के ==32साथ बदलने में सक्षम हो सकता है <33
जोनाथन फ्रेच

मैं कोई सी ++ मास्टर नहीं हूं, हालांकि #include<string> वास्तव में आवश्यक है ?
जोनाथन फ्रेच

if(...){...;D;}-> if(...)...,D;
जोनाथन फ्रैच

@JonathanFrech आपने जो किया, वह विशिष्ट था, मानक द्वारा निर्देशित नहीं। VC ++ स्ट्रिंग के स्पष्ट समावेश के बिना << ऑपरेटरों की परिभाषा नहीं पा सकता है।
HatsuPointerKun 13

#define R ...<33, ||R){और if(R){-> #define R ...<33), ||R{और if(R{
जोनाथन फ्रेच

2

सी # (.NET कोर) , 176 170 बाइट्स

using System;s=>{Action o=()=>Console.WriteLine(s);o();Func<int>l=()=>s.Length-1;while(s!=s.Trim()){if(s[0]<33){s=s.Remove(0,1);o();}if(s[l()]<33){s=s.Remove(l());o();}}}

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

यह @ किसी के उत्तर का एक विकल्प है , और सीधे स्ट्रिंग्स को आउटपुट करता है।


आपका प्रोग्राम रिक्त स्थान हटाने से पहले स्ट्रिंग को अनमॉडिफ़ाइड आउटपुट नहीं करता है।
नाथन.इलिशा शिरैनी

@ Nathan.EilishaShiraini मैंने उस गलती को सुधारा और कुछ बाइट्स को वैसे भी कम किया जैसे बाइट की गिनती को कम करना।
बेंगवर्कर

2

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

f=(s,r,n,l=s.length)=>s[r?--l:0]<"!"?s+`
`+f(s.slice(!r,l),!r):n?s:f(s,!r,1)

एक बहुस्तरीय स्ट्रिंग के रूप में आउटपुट।

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

रिक्त स्थान के बजाय डॉट्स का उपयोग करना, जैसा कि अधिकांश उत्तर कर रहे हैं।



2

ऑक्टेव , 88 83 बाइट्स

स्टेवी ग्रिफिन के लिए 5 बाइट्स धन्यवाद !

x=[input('') 0];for p=mod(1:sum(x),2)if x(~p+end*p)<33,disp(x=x(2-p:end-p)),end,end

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


बहुत अच्छा। "वैसे भी, देखें कि क्या आप कुछ बाइट्स निकाल सकते हैं " :-P
स्टीवी ग्रिफिन

@StewieGriffin मैं आपके जवाब में था ...: अच्छा विचार, धन्यवाद!
लुइस मेंडो

मैं अपने को नष्ट कर सकता हूं ... इसकी तुलना में यह बहुत ही बेकार है ...
स्टीवी ग्रिफिन

@StewieGriffin यहां दो बाइट निकालने का विचार है । दया जो कि सिकुड़ने के minकारण आवश्यक हैs
लुइस मेंडो

2

लिनक्स के लिए x86 मशीन कोड, 60 बाइट्स

e8 1f 00 00 00 31 c0 80 3f 20 75 09 47 4d 74 10
e8 0f 00 00 00 80 7c 2f ff 20 74 05 84 c0 75 e5
c3 4d eb dc 6a 04 58 50 31 db 43 89 f9 89 ea cd
80 58 6a 0a 89 e1 89 da cd 80 58 c3

यह लिनक्स x86 के लिए एक फ़ंक्शन है। यह स्ट्रिंग में ediऔर स्ट्रिंग लंबाई में इनपुट पॉइंटर के रूप में लेता है ebp

परीक्षण के लिए कुछ बुनियादी ढांचे के साथ अनफॉर्म्ड, (एफएएसएम के साथ संकलन, प्रोग्राम तर्क के रूप में स्ट्रिंग के साथ चलाएं; undress:वास्तविक फ़ंक्शन कोड के लिए लेबल देखें):

format ELF executable
segment executable
SYS_WRITE = 4
    jmp     callUndress
; -------------------- the function itself --------------------------------
; Input:
;   edi=string
;   ebp=length
undress:
undressLoopPrint:
    call    print
undressLoop:
    xor     eax, eax    ; flag of having printed anything on this iteration
    cmp     byte [edi], ' '
    jne     startsWithoutSpace
    inc     edi
    dec     ebp
    jz      quit
    call    print
startsWithoutSpace:
    cmp     byte [edi+ebp-1], ' '
    je      endsWithSpace
    test    al, al      ; if print has been called, then we have 0x0a in eax
    jnz     undressLoop
quit:
    ret
endsWithSpace:
    dec     ebp
    jmp     undressLoopPrint
print:
    push    SYS_WRITE
    pop     eax
    push    eax
    xor     ebx, ebx
    inc     ebx ; STDOUT
    mov     ecx, edi
    mov     edx, ebp
    int     0x80
    pop     eax
    push    0x0a    ; will print newline
    mov     ecx, esp
    mov     edx, ebx ; STDOUT=1, which coincides with the length of newline
    int     0x80
    pop     eax
    ret
; --------------------- end undress ---------------------------------------
SYS_EXIT = 1
STDERR = 2
callUndress:
    pop     eax     ; argc
    cmp     eax, 2
    jne     badArgc
    pop     eax     ; argv[0]
    pop     edi
    mov     al, 0
    cld
    mov     ecx, -1
    repne   scasb
    lea     edi, [edi+ecx+1] ; argv[1]
    neg     ecx
    sub     ecx, 2
    mov     ebp, ecx     ; strlen(argv[1])
    call    undress
    xor     ebx, ebx
exit:
    mov     eax, SYS_EXIT
    int     0x80
    ud2
badArgc:
    mov     esi, eax
    mov     eax, SYS_WRITE
    mov     ebx, STDERR
    mov     ecx, badArgcMsg
    mov     edx, badArgcMsgLen
    int     0x80
    mov     ebx, esi
    neg     ebx
    jmp     exit
badArgcMsg:
    db      "Usage: undress YourString",0x0a,0
badArgcMsgLen = $-badArgcMsg
segment readable writable
string:
    db      100 dup(0)
    stringLen = $-string

sys_write()eaxगैर-शून्य बनाता है (विशेष रूप से 1, लिखे गए वर्णों की संख्या, यह मानते हुए कि यह नहीं है -errno), तो printक्या आप pop eaxअंत में नहीं करेंगे । आप xor eax,eaxइससे पहले cmp byte [edi], ' 'और बचा सकते थे mov al,1, और शायद कुछ eaxबचा / बहाल कर सकते थे। यद्यपि आप वास्तव में इसे क्लोबबेरिंग के बाद तक नहीं बचाते हैं SYS_WRITE। हम्म, के बजाय 0, आप SYS_WRITEबनाम का उपयोग कर सकते हैं 1, चूंकि cmp al, imm8आकार के समान है test al,al
पीटर कॉर्ड्स

क्या आप दूसरे को करने के बजाय '\n'सरणी में डाल सकते हैं ? (और मुद्रण के बाद लंबाई में वृद्धि?) आप कुछ निर्देश बचा सकता है। mov byte [ecx + edx], '\n'write()
पीटर कॉर्ड्स

असल में, print()वर्तमान में छोड़ देता '\n'है eax, जो इससे अलग है SYS_WRITE, इसलिए आप अभी भी जांच कर सकते हैं। मैंने सोचा था कि आप बचत कर रहे थे / बहाल कर रहे थे eax, लेकिन वह बस बाइट्स को एक स्थिर नकल की बचत कर रहा था। लंबे समय तक तार के लिए, sys_write()ईनेक्स नॉन-जीरो के उच्च बाइट्स को छोड़ सकते हैं, ताकि दुर्भाग्य से बस उपयोग करने से बाहर निकल जाए mov al, SYS_WRITE
पीटर कॉर्ड्स

@PeterCordes वास्तव में हाँ, mov al, 1बाहरी था। -2 बाइट्स अब, धन्यवाद।
रुस्लान

एक रजिस्टर कॉलिंग कन्वेंशन आपको लोड निर्देशों को बचाएगा। कोड-गोल्फ में, एक कस्टम कॉलिंग कन्वेंशन सामान्यतः एएसएम के लिए उचित खेल है। OTOH, यदि आप मानक स्टैक-आर्ग्स को गोल्फ सम्मेलन कहते हैं, तो यह भी दिलचस्प है।
पीटर कॉर्ड्स

2

PHP , 117 बाइट्स

मैं शुरुआत में एक अतिरिक्त स्थान जोड़ता हूं, इसलिए यह अंतरिक्ष को बाहर ले जाएगा और बिना किसी अतिरिक्त कोड के मूल दिखाएगा।

Kinda इस के लिए नया ... क्या PHP फ़ाइल के प्रारंभ में <? Php और स्थान 6 अतिरिक्त बाइट जोड़ते हैं या क्या मुझे मुफ्त में मिलता है?

$s=" $argn";while($r!=$s){$r=$s;if($s[0]==" ")echo($s=substr($s,1))."
";if($s[-1]==" ")echo($s=substr($s,0,-1))."
";}

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


1
अपनी विधि का उपयोग करके 6 बाइट्स कम किए जा सकते हैं: इसे ऑनलाइन आज़माएं!
रात 2

1
आप PHP के उद्घाटन टैग को छोड़ सकते हैं क्योंकि आप इसे इस तरह से कमांड के साथ चला सकते हैं: php -r "echo 1;"लेकिन यदि आप कुछ का उपयोग करना चाहते <?=1;हैं जैसे आपको टैग को बाइट्स काउंट में शामिल करना है।
रात 2

1

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

QW<lrKQ6lQ=hZ?&%Z2qdhQ=tQ=PQ

यहाँ कोशिश करो! या सभी परीक्षण मामलों को सत्यापित करें!

व्याख्या

QW<lrKQ6lQ=hZ?&%Z2qdhQ=tQ=PQ   ~ Full program. Q is autoinitialized to input.

Q                              ~ Output the input.
 W<lrKQ6lQ                     ~ Loop while the condition is met.
  <                            ~ Is smaller?
   lrKQ6                       ~ The length of the original input, stripped on both sides.
        lQ                     ~ The length of the current Q.
          =hZ                  ~ Increment a variable Z, initially 0
             ?&%Z2qdhQ         ~ If Z % 2 == 1 and Q[0] == " ", then:
                      =tQ      ~ Make Q equal to Q[1:] and output, else:
                         =PQ   ~ Make Q equal to Q[:-1] and output.

1

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

-1 बाइट @JonathanFrech को धन्यवाद

f=lambda s,i=1:[s]+(s>i*'!'and'!'>s[-1]and f(s[:-1])or'!'>s and f(s[1:],0)or[])

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

परीक्षण सूट की जगह "."के साथ " "समारोह कॉल करने से पहले और की जगह " "के लिए वापस "."स्पष्टता के लिए परिणाम मुद्रण से पहले।


'!'*i and-> i*'!'and
जोनाथन फ्रेच


1

ऑक्टेव , 89 बाइट्स

s=input('');while any(s([1,end])<33)if s(1)<33,s(1)=[],end,if s(end)<33,s(end)=[],end,end

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

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

यहां अंतिम पत्र वर्तनी हैं: "प्रेषक"। काश endएक चर के रूप में संग्रहीत करने और उस का उपयोग करने का एक तरीका था , लेकिन लगता है कि क्या ...


क्या यह आउटपुट के साथ मान्य है s = ...? (सामान्य प्रश्न, मुझे पता है)
लुइस मेंडो

वैसे भी, देखें कि क्या आप कुछ बाइट्स निकाल सकते हैं :-P
लुइस मेंडू

1

बैश, 98 94 बाइट्स

अनुक्रमों के बजाय सबशेल का उपयोग करके सहेजे गए 4 बाइट्स (खराब प्रदर्शन)

r()(s=$1;[[ $s = $b ]]||([[ $s = $a ]]||echo "$s"
b=$a a=$s;((i=!i))&&r "${s# }"||r "${s% }"))

पहले जवाब दो

r(){ s=$1;[[ $s = $b ]]||{ [[ $s = $a ]]||echo "$s"
b=$a a=$s;((i=!i))&&r "${s# }"||r "${s% }";};}

ध्यान दें कि !इंटरैक्टिव मोड में बच जाना चाहिए

हमारी साइट का प्रयोग करके, आप स्वीकार करते हैं कि आपने हमारी Cookie Policy और निजता नीति को पढ़ और समझा लिया है।
Licensed under cc by-sa 3.0 with attribution required.