Цель этой задачи - получить входные и выходные данные, но с обратным порядком предложений. Пример ввода:

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.

Как видно из примеров, ваша программа имеет дело с вопросительными знаками, восклицательными знаками и точками. Можно предположить, что каждое предложение имеет пунктуацию и пробел перед следующим предложением. Завершающие пробелы / переводы строки в порядке, если они читабельны. Самый короткий код выигрывает.

Удачи!

РЕДАКТИРОВАТЬ: Вы можете предположить, что предложения не имеют кавычек или скобок, но если вы сделаете свой код способным справиться с обоими из них, то вы получите -5 байт Пример вывода для паренов / кавычек:

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

Юлия, 45 42 байта - 5 бонусов = 37

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

Это создает анонимную функцию, которая принимает строку в качестве входных данных и возвращает строку с обращенными предложениями. Это обрабатывает любой специальный символ надлежащим образом, хотя двойные кавычки и знаки доллара должны быть экранированы, иначе они не являются допустимыми строками в Julia.

Ungolfed + объяснение:

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

Примеры:

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."

И если вам не нравится смотреть на экранированные кавычки в выводе:

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.

Сэкономили 3 байта на регулярном выражении благодаря Мартину Бюттнеру! Ранее это использовали назад ' : (?<=[.?!]).

CJam, 23 22 байта

Я не уверен, имеет ли это право на бонус или нет, но здесь идет решение:

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

Расширение кода (немного устаревшее) :

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

Попробуйте онлайн здесь

J, 35 32

Он почти обрабатывает ввод бонусов, за исключением того, что я должен избегать одиночных апострофов, так что, думаю, это не считается. (Также мое первое представление здесь)

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

Использование:

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

Или из командной строки:

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

PHP, 60

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

Bash + coreutils, 40 байт

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

Это читает из STDIN, поэтому ввод может быть перенаправлен из файла или просто передан, например:

$ 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. 
$ 

зернышко , 25 байт

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

После добавления пробела во входную строку мы находим все индексы .,? и! добавьте 2, и использовать^@ сплит-на операторе , чтобы разорвать строку в предложения (каждый с завершающими пробелами). Обратный список, и он автоматически печатается в конце программы. Вуаля!

Пример, показывающий этапы основного вычисления с вводом 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 байт

Кредиты Nutki для сокращения этого на 24 байта.

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

Где <empty>обозначает пустую строку. Предполагается, что #это не является частью ввода, но если это не законно, я мог бы заменить его на любой другой символ, включая" (который мне нужно было бы обработать только для бонуса) или что-то непечатное. Вы можете запустить такой код в одном файле, если вы используете-s флаг, или вы можете поместить каждую строку в отдельный файл и передать их все в Retina.

Поменять это с помощью одной замены регулярных выражений возможно, но действительно громоздко. Даже с балансировочными группами .NET мне нужно что-то около 90 байт, поэтому я попытался сделать это в несколько этапов.

В Retina каждая пара линий представляет собой одну стадию замены, где первая строка - это шаблон, а вторая - это замена.

^
#

Этот этап просто подготавливает строку для дальнейшей обработки. Это выглядит #как маркер. Этот маркер указывает на то, что все, что находится перед ним, уже размещено в нужном месте, и все, что после него, все еще необходимо обработать.

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

Этот этап меняет предложения, многократно перемещая последнее предложение перед #(которое перемещается вперед по строке в процессе). +`Инструктирует Retina повторить этот этап , пока выход не перестанет изменяться. В качестве примера, вот как foo. bar! blah?будет обрабатываться ввод :

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

И, наконец, мы просто удаляем маркер:

#
<empty>

Ява, 113

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

JavaScript (ES6) 47 45

Как уже говорилось, это простое упражнение с регулярными выражениями. В 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

Не собираюсь улучшать бонус, так как он, вероятно, не стоит байтовой стоимости.

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

Matlab (93 байта)

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

• Это предполагает, что входные данные не содержат начальные или конечные пробелы
• Использует стандартный ввод и вывод
• Проверено в Matlab 2014b

Рубин 41

В других ответах по Ruby не хватает WTF.

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

По крайней мере , работает в Рубине 2. Если aи Fпереключатель работает в 1.8.7, я думаю , вы могли бы упасть$_= , чтобы сохранить три символа.

Обращает каждую строку в stdin и печатает в stdout:

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

Рубин, 48 (42 без пут) байтов

reverse_sentence.rb

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

Использование:

ruby reverse_sentence.rb '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.

Критика более чем приветствуется.

к, 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 байт

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

Консольное приложение C # 189 - 5 = 184 байта

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

регулярное выражение беззастенчиво порется от Алекса А. :)

Clojure - 44 71 символ

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

Улучшено и упрощено RE, устранены лишние пробелы.

Выходные данные представляют собой последовательность предложений в исходной строке с обратным порядком предложений:

Входные данные: «Привет, друг. Что ты делаешь? Могу поспорить, это то, что я тоже хочу сделать!» Вывод: («Могу поспорить, это то, что я тоже хочу сделать!» «Что ты делаешь?» «Привет, друг».)

Руби, 47

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

Авторы благодарны Мартину Бюттнеру за спасение некоторых персонажей.

CJam, 21 байт

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

Это работает, превращая пробелы после !s, .s и ?s в число 1 (не символ 1 и не символ с кодовой точкой 1, поэтому входные данные все еще могут содержать их), разделяя их на 1, изменяя порядок получающихся кусков и объединяя по пробелам.

Попробуйте онлайн в интерпретаторе CJam .

Как это устроено

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)