Tujuan dari tantangan ini adalah untuk menerima input dan output input tersebut tetapi dengan urutan kalimat terbalik. Input Contoh:

Hello friend. What are you doing? I bet it is something I want to do too!

Contoh Output:

I bet it is something I want to do too! What are you doing? Hello friend.

Seperti yang dapat Anda katakan dari contoh, program Anda harus berurusan dengan tanda tanya, poin seru, dan titik. Anda dapat menganggap setiap kalimat memiliki tanda baca dan spasi sebelum kalimat berikutnya. Trailing spasi / baris baru ok, asalkan bisa dibaca. Kode terpendek menang.

Semoga berhasil!

EDIT: Anda dapat mengasumsikan kalimat tidak memiliki tanda kutip atau tanda kurung, tetapi jika Anda membuat kode Anda dapat menangani keduanya, maka Anda mendapatkan -5 byte Contoh output untuk paren / kutipan:

"Hello, " she said. (I didn't know what she was talking about.) --> (I didn't know what she was talking about.) "Hello, " she said.

Julia, 45 42 byte - 5 bonus = 37

s->join(reverse(split(s,r"[.?!]\K "))," ")

Ini menciptakan fungsi anonim yang menerima string sebagai input dan mengembalikan string dengan kalimatnya terbalik. Ini menangani setiap karakter khusus dengan tepat, meskipun tanda kutip ganda dan tanda dolar harus diloloskan, jika tidak mereka tidak memiliki string yang valid di Julia.

Penjelasan + tidak dikumpulkan:

function f(s)
    # Get individual sentences by splitting on the spaces that
    # separate them. Spaces are identified by matching punctuation
    # then moving the position beyond that match and matching a
    # space. This is accomplished using \K.

    sentences = split(s, r"[.?!]\K ")

    # Reverse the order of the array of sentences.

    reversed_order = reverse(sentences)

    # Join the array elements into a string, separated by a space.

    join(reversed_order, " ")
end

Contoh:

julia> f("Hello friend. What are you doing? I bet it is something I want to do too!")
"I bet it is something I want to do too! What are you doing? Hello friend."

julia> f("\"Hello, \" she said. (I didn't know what she was talking about.)")
"(I didn't know what she was talking about.) \"Hello, \" she said."

Dan jika Anda tidak suka melihat kutipan yang keluar di output:

julia> println(f("\"Hello, \" she said. (I didn't know what she was talking about.)"))
(I didn't know what she was talking about.) "Hello, " she said.

Disimpan 3 byte pada ekspresi reguler berkat Martin Büttner! Sebelumnya ini digunakan lookbehind a: (?<=[.?!]).

CJam, 23 22 byte

Saya tidak yakin apakah ini memenuhi syarat untuk bonus atau tidak, tapi begini solusinya:

Sq{1$".?!"-{])[}|}%]W%

Ekspansi Kode (sedikit kedaluwarsa) :

Sq+                      e# Read the input and prepend with a space
   {            }%       e# For each input character
    _".?!"&              e# Copy and check if its one of ., ? and !
           {][}&         e# If it is one of the above, wrap everything till now in an array
                         e# and start a new array to be wrapped next time we get one of those
                         e# three characters. We now have an array of strings, each having
                         e# a single sentence
                  W%     e# Reverse the ordering of these sentences
                    s(   e# Convert to string and remove the first space

Cobalah online di sini

J, 35 32

Ini hampir menangani input bonus, kecuali saya harus lolos dari tanda kutip tunggal, jadi saya kira itu tidak masuk hitungan. (Juga, pengiriman pertama saya di sini)

f=.;@|.@(]<;.2~'.?!'e.~])@,~&' '

Pemakaian:

f 'Hello friend. What are you doing? I bet it is something I want to do too!'

Perl, 27/25

#!perl -n
print reverse/ |[^.!?]*./g

Atau dari baris perintah:

$perl -nE'say reverse/ |[^.!?]*./g'

PHP, 60

echo join(' ',array_reverse(preg_split('/(?<=[?!.])/',$s)));

Bash + coreutils, 40 byte

sed 's/\([?.!]\) */\1\n/g'|tac|tr \\n \ 

Ini berbunyi dari STDIN sehingga masukan dapat saya arahkan kembali dari file, atau cukup pip, misalnya:

$ printf 'Hello friend. What are you doing? I bet it is something I want to do too!' | sed 's/\([?.!]\) */\1\n/g'|tac|tr \\n \ 
I bet it is something I want to do too! What are you doing? Hello friend. 
$ 

Pip , 25 byte

a.:sRV(a^@2+$ALa@*^".?!")

Setelah menambahkan ruang untuk string input, kita menemukan semua indeks ., ?dan !, tambahkan 2, dan menggunakan^@ split-pada operator untuk memecah string menjadi kalimat (masing-masing dengan ruang tambahan). Membalikkan daftar, dan dicetak secara otomatis di akhir program. Voa!

Contoh yang menunjukkan tahapan perhitungan utama dengan input A! B? C. D!:

              ^".?!"     ["." "?" "!"]
           a@*           [[7] [4] [1 10]]
        $AL              [7 4 1 10]
      2+                 [9 6 3 12]
   a^@                   ["A! " "B? " "C. " "D! "]
RV(                 )    ["D! " "C. " "B? " "A! "]

                         D! C. B? A! 

Retina , 61 34 33 30 byte

Kredit ke nutki untuk memotong ini sebanyak 24 byte.

^
#
+`(#.*[.!?]) (.+)
$2 $1
#
<empty>

Dimana <empty> singkatan dari baris kosong. Ini mengasumsikan bahwa #itu bukan bagian dari input, tetapi jika itu tidak sah, saya dapat menukar dengan karakter lain, termasuk "(yang saya hanya perlu menangani untuk bonus) atau sesuatu yang tidak patut dicetak. Anda dapat menjalankan kode seperti itu dalam satu file jika menggunakan -sflag, atau Anda dapat meletakkan setiap baris dalam file terpisah dan meneruskannya ke Retina.

Membalikkan ini dengan penggantian regex tunggal adalah mungkin, tetapi benar-benar rumit. Bahkan dengan grup .NET balancing, saya membutuhkan sekitar 90 byte, jadi saya mencoba melakukannya dalam beberapa langkah.

Di Retina, setiap pasangan garis adalah satu tahap penggantian, di mana garis pertama adalah pola dan garis kedua adalah penggantian.

^
#

Tahap ini hanya menyiapkan string untuk diproses lebih lanjut. Ini menambahkan a# sebagai penanda. Marker ini menunjukkan bahwa semua yang ada di depannya telah diletakkan di tempat yang tepat, dan semua yang setelah itu masih perlu diproses.

+`(#.*[.!?]) (.+)
$2 $1

Tahap ini bertukar kalimat, dengan berulang kali menggerakkan kalimat terakhir di depan #(yang bergerak maju melalui string dalam proses). The +`menginstruksikan Retina mengulangi tahap ini sampai output berhenti berubah. Sebagai contoh, berikut adalah bagaimana input foo. bar! blah?akan diproses:

#foo. bar! blah?
blah? #foo. bar!
blah? bar! #foo.

Dan akhirnya kita cukup menghapus penanda:

#
<empty>

Jawa, 113

s->{String t[]=s.split("(?<=[\\.?!]) "),u="";for(int i=t.length;i-->0;)u+=t[i]+" ";return u.replaceAll(".$","");}

JavaScript (ES6) 47 45

Seperti yang dinyatakan, ini adalah latihan regex sederhana. Dalam javascript:

// ES6 - FireFox only
F=t=>t.match(/\S[^.!?]+./g).reverse().join(' ')

// ES5 - so much longer
function G(t){return t.match(/\S[^.!?]+./g).reverse().join(' ')}

// TEST

alert(G("Hello friend. What are you doing? I bet it is something I want to do too!"))
 

Python 2, 62

Tidak akan meningkatkan untuk bonus, karena itu mungkin tidak sebanding dengan biaya byte.

import re
print' '.join(re.split('(?<=[?!.]).',input())[::-1])

Matlab (93 byte)

y=[32 input('','s')];y=sortrows([cumsum(ismember(y,'?!.'),'reverse');y]',1)';disp(y(4:2:end))

• Ini mengasumsikan input tidak mengandung spasi di depan atau di belakang
• Menggunakan input dan output standar
• Diuji dalam Matlab 2014b

Ruby 41

Jawaban Ruby lainnya tidak memiliki cukup WTF.

#!ruby -apF(?<=[.!?])\s
$_=$F.reverse*" "

Ini setidaknya berfungsi di Ruby 2. Jika adan Fswitch berfungsi di 1.8.7, saya kira Anda bisa drop$_= untuk menyimpan tiga karakter.

Membalikkan setiap baris di stdin dan mencetak ke stdout:

$ ruby foo.rb <<< "Hello. Hi. How are you? Good, you? fine, thanks."
fine, thanks. Good, you? How are you? Hi. Hello.

Ruby, 48 (42 tanpa put) byte

reverse_sentence.rb

puts $*[0].scan(/\S[^.!?]+./).reverse.join(" ")

Pemakaian:

ruby reverse_sentence.rb 'Hello friend. What are you doing? I bet it is something I want to do too!'

Keluaran:

I bet it is something I want to do too! What are you doing? Hello friend.

Criticism more than welcome.

k, 31

{1_,/|(0,1+&x in"?!.")_x:" ",x}

.

k){1_,/|(0,1+&x in"?!.")_x:" ",x} "Hello friend. What are you doing? I bet it is something I want to do too!"
"I bet it is something I want to do too! What are you doing? Hello friend."

C# - LINQPAD - 93 - 5 = 88 bytes

void Main(){string.Join(" ",Regex.Split(Console.ReadLine(),"(?<=[.?!]) ").Reverse()).Dump();}

C# Console App 189 - 5 = 184 bytes

using System;using System.Linq;using System.Text.RegularExpressions;class P{static void Main(){Console.WriteLine(string.Join(" ",Regex.Split(Console.ReadLine(), "(?<=[.?!]) ").Reverse()));}}

regex shamelessly flogged from Alex A. :)

Clojure - 44 71 chars

(defn rs[s](reverse(re-seq #"\S.+?[.!?]"s)))

Improved and simplified RE, eliminated unnecessary whitespace.

Output is a sequence of the sentences in the original string, with the order of the sentences reversed:

Input: "Hello friend. What are you doing? I bet it is something I want to do too!" Output: ("I bet it is something I want to do too!" "What are you doing?" "Hello friend.")

Ruby, 47

$><<gets.strip.split(/(?<=[.?!]) /).reverse*' '

credits to Martin Büttner, for saving some characters.

CJam, 21 bytes

1q{1?_"!.?"-}%1a/W%S*

This works by turning spaces after !s, .s and ?s into the number 1 (not the character 1 nor the character with code point 1, so the input can still contain those), splitting at 1's, reversing the order of the resulting chunks and joining by spaces.

Try it online in the CJam interpreter.

How it works

1                     e# B := 1
 q                    e# Q := input()
  {         }%        e# for each C in Q (map):
   1?                 e#   C := B ? C : 1
     _"!.?"-          e#   B := string(C).strip("!.?")
              1a/     e# Q := Q.split([1])
                 W%   e# Q := reverse(Q)
                   S* e# Q := Q.join(" ")
                      e# print(Q)