Витягніть рядок із заданого рядка


17

Вам надається рядок і два символи. Ви повинні надрукувати рядок між цими символами з рядка.

Вхідні дані

Спочатку вхід буде містити рядок (не порожній або null). У наступному рядку буде два символи, розділені пробілом.

Виклик

Поверніть рядок між двома символами

Приклад

Hello! What's your name?
! ?

має призвести до виходу:

" What's your name"

Правила

  • Рядок не буде довше 100 символів і міститиме лише символи ASCII в діапазоні (пробіл) до ~(тильда) (символьні коди від 0x20 до 0x7E включно). Див ASCII таблицю для довідки.
  • Ви повинні взяти дані з stdin(або найближчої альтернативи).
  • Вихід повинен бути оточений лапками ( ").
  • Ви можете написати повну програму або функцію, яка приймає введення та виводить заключний рядок
  • Два символи будуть містити лише символи ASCII в діапазоні (пробіл) до ~(тильда) (коди символів від 0x20 до 0x7E включно). Див ASCII таблицю для довідки.
  • Немає гарантії, що обидва символи будуть в рядку.
  • Якщо жодного з символів не знайдено в рядку, надрукуйте "null".
  • Якщо будь-який із символів зустрічається більше одного разу (якщо обидва символи однакові) у рядку, надрукуйте "null".
  • Якщо обидва символи однакові, надрукуйте рядок "null".

Випробування

1)

<HTML>code</HTML>
> <                       --> "null"

2)

What's what?
' '                       --> "null"

3)

abcdefghijklmnopqrstuvwxyz
n k                       --> "lm"

4)

Testing...
e T                       --> ""

5)

Last test-case
  -                       --> "test"

Оцінка балів

Це код гольфу, тому виграє найкоротше подання (у байтах).


3
Чи можуть символи зустрічатися в зворотному порядку в рядку? Якщо так, то це може використати тестовий випадок.
Мартін Ендер

1
Що робити, якщо підрядок містить a "? Чи варто просто оточити його ще однією парою цитат і не піклуватися про це?
jimmy23013

@ MartinBüttner, так. Дивіться відредагований тестовий випадок 3. Дякую, що нагадали про це
Spikatrix

@ user23013, так. Приклад введення: one"two-three \n" -вихід: "two"( \nце новий рядок)
Spikatrix

1
Я не прихильник чудернацьких деталей щодо маркерів, які не з’являються або з’являються кілька разів. Я думаю, що проблему було б приємніше вирішити з більш сильними гарантіями на вхід.
xnor

Відповіді:


3

CJam, 34 33 32 байт

'"l_l2%&2*2>NerN/0"null"t_,3=='"

Спробуйте його в Інтернеті в інтерпретаторі CJam .

Ідея

  1. Видаліть другий символ із рядка 2.

  2. Сформуйте рядок, що складається з однієї копії всіх символів, які мають обидва рядки.

  3. Повторіть отриманий рядок двічі і відмовтеся від перших двох символів.

    У результаті виходить двосимвольна рядок (якщо символи з другого рядка і обидва зустрічаються в рядку 1) або порожній рядок.

  4. Замініть символи отриманого рядка в рядку 1 рядковими каналами.

  5. Розділіть рядок 1 на лінійках.

    Другим елементом масиву буде бажаний рядок, якщо масив містить рівно три фрагменти.

  6. Замініть перший елемент масиву рядком null .

  7. Отримайте другий елемент масиву, якщо його довжина дорівнює 3, а перший в іншому випадку.

  8. Додайте та додайте подвійну цитату.

Код

'"       e# Push a double quote.
l_       e# Read one line from STDIN. Push a copy.
l2%      e# Read one line from STDIN. Only keep characters at odd indexes.
&        e# Intersect both strings.
2*2>     e# Repeat the intersection twice and discard the first two characters.
Ner      e# Replace the characters of the resulting string with linefeeds.
N/       e# Split the result at linefeeds.
0"null"t e# Replace the first element of the resulting array with "null".
_,3=     e# Push 1 if the length of the array is 3 and 0 otherwise.
=        e# Retrieve the corresponding element from the array.
'"       e# Push a double quote.

2

CJam, 38 байт

l:Tl2%f#_W-$2,=2,@f#$~T<>1>"null"?'"_o

Надто довго...

Пояснення

l:T             e# Read a line and store in T.
l2%             e# Read the two characters into a list.
f#              e# Find each character in the list of two characters.
_W-             e# Copy and remove not found results.
$2,=            e# Sort and check if the result is exactly [0 1].
                e# If true:
2,@f#           e# Find 0 and 1 in the original results.
$               e# Sort.
~T<>            e# Get a slice of T between the two positions (left-closed).
1>              e# Remove the first character.
                e# If false:
"null"          e# The string "null".
?               e# End if.
'"_o            e# Append a quote and output another quote at the beginning.

2

Pyth, 37 36 34 байт

p?"null"njT9m/zd{J%2wt:z.uSmxzdJNN

Завдяки @isaacg за два байти збереження.

Спробуйте в Інтернеті: компілятор / виконавець Pyth

Пояснення:

                                     implicit: z = first input line
                    w                second input line
                  %2                 only use every 2nd char
                 J                   and store in J
                {J                   set(J), gets rid of duplicates
            m/zd                     count the number of appearances of each char
        njT1                         != [1, 1] ([1,1] is 10 in base 9)
 ?      njT1m/zd{J%2w                ... if [1,1] != number of appearances else ...
  "null"                               string "null"
                           mxzdJ     find the index for each char
                          S          sort the indices
                      :z.u           take the substring of z using these indices
                     t               remove the first char

p                               NN  print '"' + ... + '"'

*2]1коротше [1 1)і - ... 1все ж коротше.
isaacg

@isaacg -...1не працює, оскільки мені також потрібно перевірити, чи є рівно два числа.
Якубе

2
Я просто подумав про 3 персонажа спосіб зробити [1 1): jT9.
isaacg

2

Python 3, 149 байт

s,i=input(),input();a,b=s.find(i[0]),s.find(i[2]);print('"'+('null',[s[a+1:b],s[b+1:a]][b<a])[(s.count(i[0])==s.count(i[2])==1)*(a!=b)*(a*b>-1)]+'"')

Версія без заготівлі:

string, chars = input(), input()
a, b = string.find(chars[0]), string.find(chars[2])

    if string.count(chars[0]) == string.count(chars[2]) == 1 and a!=b and a*b>-1:
        if b<a:
            print('"' + string[b+1:a] + '"')
        else:
            print('"' + string[a+1:b] + '"')
else:
    print('"null"')

Це моя перша відповідь тут, тому поради та критика дуже цінуються.


2

Рубі, 108 95 94

->s,f,l{a,b=[f,l].map{|u|(f==l||s.count(u)>1)&&abort('"null"');s.index u}.minmax;p s[a+1...b]}

І для версії, що не має волі

def between(string, first, last)
    left, right = [first, last].map do |substring|
        abort('"null"') if first == last || string.count(substring) != 1
        string.index(substring)
    end.minmax
    p string[left + 1 ... right]
end

Чому я не бачу жодного виводу, коли я запускаю тут ваш код ?
Spikatrix

@CoolGuy Це неназвана функція, тому вам потрібно називати її так. ->s,f,l{begin a,b=[f,l].map{|u|raise if f==l||s.count(u)>1;s.index u}.minmax;p s[a+1...b];rescue;p'null'end}["<html>test</html>",?>,?<]На [...]завершення - це те, що викликає функцію.
blutorange

@blutorange, Гаразд. Це працювало, але як я перевіряю останній тестовий випадок?
Spikatrix

@CoolGuy Використовуйте звичайно цитовані рядки:->s,f,l{begin a,b=[f,l].map{|u|raise if f==l||s.count(u)>1;s.index u}.minmax;p s[a+1...b];rescue;p'null'end}["Last test-case"," ","-"]
blutorange

Замість того, щоб викликати помилку з raise, ви можете замінити raiseневизначеною змінною, такою як _або y. Це викликає помилку NameError. Крім того, я думаю, ви могли б зберегти ще кілька байтів без явного порятунку:->s,f,l{a,b=[f,l].map{|u|(f==l||s.count(u)!=1)&&p('null')&&exit;s.index u}.minmax;p s[a+1...b]}
blutorange

1

C, 192 байти

f(){char b[101],c,d,*p,*t;scanf("%[^\n]%*c%c%*c%c",b,&c,&d);p=strchr(b,c);t=strchr(b,d);c==d||!p||!t||strchr(p+1,c)||strchr(t+1,d)?puts("\"null\""):printf("\"%s\"",p<t?(*t=0,p+1):(*p=0,t+1));}

Невикористаний код:

f()
{
    char b[101],c,d,*p,*t; //Variables

    scanf("%[^\n]%*c%c%*c%c",b,&c,&d); //Scan input

    p=strchr(b,c);
    t=strchr(b,d); //Find occurrence of characters

    c==d         ||  //If both characters are the same
    !p           ||  //If no occurrence of first character found
    !t           ||  //If no occurrence of second character found
    strchr(p+1,c)||  //If two occurrence of first character found
    strchr(t+1,d) ?  //If two occurrence of second character found
    puts("\"null\"") //Print "null"
                  :  //else
    printf("\"%s\"",p<t?(*t=0,p+1):(*p=0,t+1)); //print the string
}

Тестуйте це тут


1

Пітон 3, 172 байти

x=input()
a=input()
a,b=a[0],a[2]
if(a!=b)&(x.count(b)==x.count(a)==1):
 if x.index(a)>x.index(b):q=a;a=b;b=q
 print('"'+x.split(a)[1].split(b)[0]+'"')
else:print('"null"')

1

Javascript ( ES6 ), 125 123 байт

Ідея сильно вкрадена з рішення @ edc65.

[a,,b]=(p=prompt)(s=p()),[,c,d,e,,f]=s.split(RegExp('(['+(a+b).replace(/\W/g,'\\$&')+'])'))
p('"'+(!e||f||c==e?null:d)+'"')


Мені найбільше подобається [a,,b]=, я використаю його наступного разу. Оскільки регулярні вирази - це клопоти, ось рішення, що не містить регулярних [a,,b]=(P=prompt)(s=P()), P((s=s.split(a)).length==2& (s=[].concat(...s.map(s=>s.split(b)))).length==3 ?``"${s[1]}"``:null)
виразів

(останній рядок шаблонований, важко помістити в коментарі)
edc65

1

Пітон, 161 байт

import re,sys
s,p=sys.stdin
m=re.match('[^%s]*([%s])([^%s]*)([%s])[^%s]*$'%((p[0]+p[2],)*5),s)
if m:g=m.group
print'"null"'if not m or g(1)==g(3)else'"'+g(2)+'"'

Рішення здебільшого просто використовує регулярний вираз для вилучення рядка. З огляду на те, що літери можуть збігатися в будь-якому напрямку, початок і кінець збіганої частини дозволяє будь-яку літеру. Перевіряючи, що літери, які насправді відповідають різним, виключають одну і ту ж букву, яка відповідає двічі, а також дві букви у введенні однакові.

Це моя перша спроба використання Python для відповіді тут. Тому відгуки про можливі вдосконалення дуже вітаються. Особливо у мене є відчуття, що повинен бути спосіб скоротити стан у заяві про друк.



1

гольфлуа, 132 байти

L=I.r()I,J=I.r():m("(.) (.)")i=L:f(I)j=L:f(J)K,c=L:g(I,'')_,b=K:g(J,'')?i>j i,j=j,i$w((i==j|c+b!=2)&'"null"'|'"'..L:s(i+1,j-1)..'"')

Досить потворна відповідь. Біт введення трохи нерівний (і вимагає двох рядків, по-перше, з рядком і другий з символами зрізу). Пошук місцеположень прапорів прямолінійний, але занадто довгий, щоб конкурувати з іншими відповідями. Вихід досить простий. Еквівалентна програма Lua була б

Line1 = io.read()
Line2 = io.read()
I,J = Line2:match("(.) (.)")     -- boobs return the char flags
i = Line1:find(I)                -- find location of flags
j = Line1:find(J)
K,c = Line1:gsub(I,'')           -- replace flag w/ empty & store in K
_,b = K:gsub(J,'')               -- taking K ensures single flags fail
if i > j then i,j=j,i end        -- ensure we start low to high
if i==j or not (c+b == 2) then   -- if i & j are the same or not 2 counts, fail
   print('"null"')
else                             -- print the string otherwise
   print('"'..Line1:sub(i+1,j-1)..'"')
end

Чи є онлайн-компілятор, який я можу перевірити версію для гольфу?
Spikatrix

Я не вірю в Інтернет-версію, але вихідний код доступний . Це відображення Луї 1: 1 (а не тлумачення чи переклад на Lua), тому код Lua можна перевірити на ideone .
Кайл Канос

0

Перл, 65

#!perl -p0
$.*=s/\Q$1/
/g while s/ ?(.)\z//;/
(.*)
/;$_=$.-1?null:"\"$1\""

Для цього потрібно, щоб у другому рядку вводу не було символу нового рядка.


Хороша робота. Це, здається, не вистачає подвійних лапок.
Денніс

@Dennis, виправлено. Я неправильно зрозумів приклад.
нутки

1
У ньому все ще відсутні цитати до nullсправи.
Денніс
Використовуючи наш веб-сайт, ви визнаєте, що прочитали та зрозуміли наші Політику щодо файлів cookie та Політику конфіденційності.
Licensed under cc by-sa 3.0 with attribution required.