Aufgabe

• Der Benutzer gibt einen Satz ein - nur Wörter. Alle Eingaben außer Buchstaben oder Leerzeichen, einschließlich Ganzzahlen und Interpunktion, sollten eine Ausnahme auslösen: "Satz darf nur Buchstaben verwenden".
• Die Ausgabe hat ein Muster, bei dem einige Wörter umgekehrt und andere Wörter normal sind.
• Das Muster beginnt als normales Wort, die nächsten zwei Wörter werden umgekehrt, dann sind die nächsten zwei Wörter normal und das Muster wird fortgesetzt.
• Ein Beispiel, wo die Wörter normal sein sollten und wo Wörter umgekehrt sind, ist unten:

Normal - Umgekehrt - Umgekehrt - Normal - Normal - Umgekehrt - Umgekehrt - Normal ...

Eingabebeispiel

Sie verkauft Muscheln an der Küste

Ausgabebeispiel

Sie schleudert Muscheln an der Küste

Zusätzliche Regeln

• Wenn Großbuchstaben verwendet werden, sollten sie auf dem Brief bleiben, auf dem sie ursprünglich geschrieben wurden.
• Mehrere Leerzeichen, die ursprünglich bei der Eingabe eingegeben wurden, sollten auf ein Leerzeichen reduziert werden. Zum Beispiel Programming Puzzles and Code GolfwirdProgramming selzzuP dna Code Golf

Kürzester Code gewinnt !!

Viel Spaß beim Codieren ...

TeaScript , 55 Bytes 58 60 69 76 78 80 87 89

xO`a-z `?xl(#~-i&2?l:lv(),/ +/):Ld`SÀZn­ Û § «e Ò5s`

Das ist extrem kurz, ich bin sehr zufrieden damit.

Die letzten ~ 20 Zeichen mögen wie Kauderwelsch aussehen, aber das ist "Satz darf nur Buchstaben enthalten", verschlüsselt. Alle Zeichen haben Zeichencodes unter 256, sodass jedes ein Byte ist

Erläuterung

xO`a-z `?  // If input contains only a-z and space...

   xl(#       // Loop through input 
      ~-i&2?  // If (index - 1 "unary and"ed with 2) isn't 0...
          :l,     // Leave alone
          lv()    // Otherwise, reverse string
       / +/ // Loops on spaces
   )

:Ld`SÀZn­ Û § «e Ò5s` // Otherwise... decompress and print  the error string

• Probieren Sie es online aus
• Pastebin

Haskell, 141 Bytes

r=reverse
f x|all(`elem`(' ':['a'..'z']++['A'..'Z']))x=unwords$zipWith($)(cycle[id,r,r,id])$words x|1<2=error"Sentence must only use letters"

Fast 2/3 des Codes dienen der Fehlerprüfung. Scheint die erste echte Herausforderung zu sein.

Die Arbeit wird erledigt, indem unwords$zipWith($)(cycle[id,reverse,reverse,id])$words xdie Eingabe in eine Liste von Wörtern aufgeteilt, mit der zyklischen Liste von Funktionen komprimiert [id,reverse,reverse,id,id,reverse...]und das Ergebnis mit Leerzeichen zu einer einzelnen Zeichenfolge verknüpft wird.

Danke an @Christian Irwan für 2 Bytes.

JavaScript (ES6) 122

f=s=>/[^a-z ]/i.test(s)?"Sentence must only use letters":s.split(/ +/).map((w,i)=>~-i&2?w:[...w].reverse().join``).join` `

alert(f(prompt('?','She sells Sea shells on the Sea shore')))

Retina , 103 Bytes

\s+

(?<=^\S+ (\S+ )?((\S+ ){4})*)
;
+`(;\S*)(\S)
$2$1
;

i`.*[^a-z ].*
Sentence must only use letters

In der zweiten Zeile sollte ein Leerzeichen stehen, das SE zu schlucken scheint. Führen Sie den Code aus einer einzelnen Datei mit dem -sFlag aus.

Retina kennt keine Ausnahmebedingungen, daher wird die Ausgabe einfach ersetzt, Sentence must only use letterswenn die Eingabe Nicht-Buchstaben-Zeichen ohne Leerzeichen enthält.

Pyth, 61 Bytes

?.A}R+G\ rz0jd.e_W%%k4 3bfTczd"Sentence must only use letters

Probieren Sie es online aus.

Python, 163 160 157 145

k=raw_input()
k=["Sentence tsum ylno use letters",k][k.replace(' ','').isalpha()]
for i,x in enumerate(k.split()):print x[::-1if(i+1)/2%2else 1],

15 Zeichen entfernt, danke Mego !!

Bash + Coreutils, 108

[ ${@//[a-zA-Z]/} ]&&echo Sentence must only use letters||for t;{
((++i/2%2))&&rev<<<$t||echo $t
}|tr \\n \ 

_{Das letzte Zeichen dieses Programms ist ein Leerzeichen.}

Die Eingabe erfolgt über die Befehlszeile:

$ ./norrevvevnor.sh Programming Puzzles and Code$'\n' Golf
Programming selzzuP dna Code Golf $ 
$ ./norrevvevnor.sh Programming Puzzles and Code$'\n' Golf1
Sentence must only use letters
$ 

Pyth, 72

=zflTc?:z"[^A-Za-z ]"0"Sentence tsum ylno use letters"zdjd.e?%/hk2 2_bbz

Schlägt die andere Pyth-Antwort nicht, aber ich habe bereits Zeit investiert, um sie zu schreiben. Es ist im Grunde eine Übersetzung meiner Python-Antwort .

Probieren Sie es online aus

Julia, 109 Bytes

s->(i=0;join([isalpha(w)?(i+=1)%4>1?reverse(w):w:error("Sentence must only use letters")for w=split(s)]," "))

i=0und (i+=1)%4>1werden verwendet, um zu entscheiden, ob jedes Wort reversed bekommt oder nicht. isalphaGilt für die Wörter nach dem Teilen, um split(s)zu bestimmen, ob es Zeichen gibt, die keine Buchstaben sind (Leerzeichen wurden zu diesem Zeitpunkt bereits entfernt). joinStellt den String nach der Manipulation wieder her, es sei denn, der errorwird geworfen.

Julia, 150 134 Bytes

s->ismatch(r"[^a-z ]"i,s)?error("Sentence must only use letters"):(i=3;join([(i+=1;isodd((i+1)i÷2)?reverse(w):w)for w=split(s)]," "))

Ungolfed:

function f(s::AbstractString)
    if ismatch(r"[^a-z ]"i, s)
        error("Sentence must only use letters")
    else
        i = 3
        a = [(i += 3; isodd((i + 1)i ÷ 2) ? reverse(w) : w) for w = split(s)]
        return join(a, " ")
    end
end

16 Bytes gespart dank Glen O!

Pyth, 55 Bytes

?--rz0Gd"Sentence must only use letters"jd.e_W%%k4 3bcz

%%k4 3Hat das Stück von Pietu1998 ausgeliehen. Ein weiteres Byte gespeichert.

Probieren Sie es online aus: Demo oder Test Suite

Erläuterung

?--rz0Gd"..."jd.e_W%%k4 3bcz   implicit: z = input string
   rz0                         convert z to lower-case
  -   G                        remove all letters
 -     d                       remove all spaces
?                              if there is some chars left than
        "..."                    print the string "Sentence must only ..."
                               else:
                          cz     split z by spaces or multiple spaces
               .e                map each pair (k index, b string) of ^ to: 
                 _       b          b or reversed of b, depending on
                  W%%k4 3           (k mod 4) mod 3
             jd                  join the result by spaces

Perl 5 -ap , 80 Bytes

map$_=++$i%4>1?reverse:$_,@F;$_=/[^a-z ]/i?"Sentence must use only letters":"@F"

Probieren Sie es online!

Java, 215 Bytes

Regex macht Spaß

s->{if(s.split("[^a-zA-Z ]").length>1)throw new Error("Sentence must only contains letters");else{int i=1;for(String a:s.split(" "))System.out.print((i++%2<1?new StringBuffer(a).reverse():a)+(a.isEmpty()?"":" "));}}

Probieren Sie es online!

Jelly , 39 Bytes

³Ḳ¹ƇUJ2&TƲ¦K
“*[,ṛDṾȧƤ°Ġṛ©¦»
ØẠ” ṭ³eƇ⁼£

Probieren Sie es online!

Vielen Dank an Erik den Outgolfer. Er rettete mich vor ein paar zusätzlichen Bytes und vor vielen Stunden Frustration.

Hier ist eine 46-Byte-Lösung

Tatsächlich wird ein Python-Syntaxfehler ausgegeben, wenn die Eingabe ungültige Zeichen enthält.

³Ḳ¹ƇUJ2&TƲ¦K
“çỤḷṁŀDṀẠṠGmḟĖƲƑ⁽Ḳḟ»ŒV
ØẠ” ṭ³eƇ⁼£

Probieren Sie es online!

Japt v2.0a0 -S, 41 Bytes

¸¬è\L ?`SÀZn­ Û § «e Ò5s`:UeS²S ¸ËzEc2

Versuch es

¸¬è\L ?`...`:UeS²S ¸ËzEc2     :Implicit input of string U
¸                             :Split on spaces
 ¬                            :Join
  è                           :Count occurrences of
   \L                         :RegEx /[^A-Z]/gi
      ?`...`:                 :If truthy return the compressed string "Sentence must only use letters", else
             Ue               :Recursively replace in U
               S²S            :  Two spaces with one
                   ¸          :Split on spaces
                    Ë         :Map each element at 0-based index E
                     z        :  Rotate clockwise by 90 degrees multiplied by
                      Ec2     :    E rounded up to the nearest multiple of 2
                              :Implicit output, joined with spaces

05AB1E , 36 Bytes

ðKDáÊi“¸–ƒ—€É€Å™ê“.ªFë#áεN4%>2÷iR]ðý

Probieren Sie es online aus.

Löst den folgenden Fehler aus, wenn die Eingabe nicht nur enthält [A-Za-z ]:

(RuntimeError) Konnte nicht konvertiert werden Satz darf nur Buchstaben in Ganzzahlen verwenden.

Erläuterung:

ðK                   # Remove all spaces from the (implicit) input-string
  Dá                 # Create a copy, and remove everything except for letters from this copy
    Êi               # If the copy with letters removed and the original are NOT equal:
      “¸–ƒ—€É€Å™ê“   #  Push dictionary string "sentence must only use letters"
                  .ª #  With sentence capitalization
      F              #  And try to loop that many times, causing the error above
     ë               # Else:
      #              #  Split the (implicit) input-string on spaces
       á             #  Only keep letters (which will remove empty items caused by multiple
                     #  adjacent spaces in the input, which is shorter than `õK`)
        ε            #  Map each word to:
         N4%>2÷      #   Calculate ((index modulo-4) + 1) integer-divided by 2
                     #   (results in 0,1,1,2,0,1,1,2,0,1 for indices 0,1,2,3,4,5,6,7,8,9)
               i     #   If this is exactly 1:
                R    #    Reverse the current word
     ]               # Close the if-statement, map, and if-else statement
      ðý             # Join the modified word-list by spaces
                     # (and then output it implicitly as result)

Sehen Sie diese 05AB1E Spitze von mir (Abschnitt Wie das Wörterbuch benutzen? ) Zu verstehen , warum “¸–ƒ—€É€Å™ê“ist "sentence must only use letters".

PHP , 147 Bytes

foreach(explode(' ',$argn)as$a){if(!ctype_alpha($a))throw new Exception('Sentence must only use letters');$o.=(++$i%4>1?strrev($a):$a).' ';}echo$o;

Probieren Sie es online!

Oder wenn die()als "Ausnahme" akzeptabel ist:

PHP , 131 Bytes

foreach(explode(' ',$argn)as$a){if(!ctype_alpha($a))die('Sentence must only use letters');$o.=(++$i%4>1?strrev($a):$a).' ';}echo$o;

Probieren Sie es online!