Построй мне несколько струнных лестниц


24

Струнная лестница

Отказ от ответственности: это первая проблема, которую я предлагаю. Любые отзывы приветствуются. Если это дубликат, укажите это.

Вот ссылка на пост песочницы.

Цель

Цель этой задачи состоит в том, чтобы при наличии строки и целого числа вывести строку в блоки с целым размером. Если в слове больше символов, чем размер блока, выведите его в нисходящий «лестничный» шаблон.

правила

  • Упомянутый выше «шаблон ступеней» означает, что для каждого блока одного и того же слова этот блок должен начинаться именно там, где заканчивается блок над ним. Проверьте контрольные примеры (или спросите), если у вас есть какие-либо вопросы.
  • Если слово разбито на несколько блоков, следующее слово должно быть напечатано с достаточным количеством пробелов, то есть оно должно быть отделено от самого нижнего блока предыдущего слова ровно одним пробелом. Проверьте контрольные примеры (или спросите) для уточнения.
  • Вы можете предположить, что входная строка будет состоять только из печатных символов ASCII. Кроме того, он не будет иметь несколько пробелов подряд.
  • Вы также можете предположить, что целое число всегда будет в диапазоне [1, + ∞).
  • Конечный пробел или переводы строки разрешены.
  • Вы можете использовать любой разумный метод для ввода / вывода.
  • Стандартные лазейки применяются.
  • Это , поэтому выигрывает самый короткий код (в байтах на язык). Через неделю (или около того) я приму кратчайший общий ответ.

Тестовые случаи

(String, Integer) => (Output)

"This is a large string", 3 => Thi is a lar  str
                                 s        ge   ing

"This is an even larger string!", 2 => Th  is an ev  la   st
                                        is        en  rg   ri
                                                       er   ng
                                                             !
"Ooooh dear, what a big string you have!", 3 
=> Ooo  dea  wha a big str   you hav
     oh   r,   t         ing       e!

"Staphylococcus saprophyticus", 4 => Stap        sapr
                                        hylo        ophy
                                           cocc        ticu
                                              us          s

"I hope you find this challenge interesting", 2
=> I ho  yo fi  th  ch    in
      pe  u  nd  is  al    te
                      le    re
                       ng    st
                        e     in
                               g

"Well, this test case looks kinda pointless now doesn't it?", 15
=> Well, this test case looks kinda pointless now doesn't it?

"This one looks a lot more interesting!", 1 => T o l a l m i
                                               h n o   o o n
                                               i e o   t r t
                                               s   k     e e
                                                   s       r
                                                           e
                                                           s
                                                           t
                                                           i
                                                           n
                                                           g
                                                           !
"Keep in mind, people: 'Punctuation! Does! Matter!'", 2
=> Ke  in mi  pe   'P      Do  Ma
    ep     nd  op   un      es  tt
            ,   le   ct      !   er
                 :    ua          !'
                       ti
                        on
                         !

может ли быть одинаковое количество начальных пробелов в каждой строке?
Дзайма

Бонус: используйте Zalgo для блока размером 1 день
Луис Мендо,

@dzaima Я не уверен, что ты имеешь в виду, но не понимаю, почему нет. Хотите привести пример?
Ж. Салле

@ J.Salle это
dzaima

@dzaima, да, конечно, нет проблем.
Ж. Салле

Ответы:


7

Древесный уголь , 22 байта

F⪪θ «↑⸿⸿FLι«M¬﹪κIη↙§ικ

Попробуйте онлайн! Ссылка на подробную версию кода. Объяснение:

  θ                      First input
 ⪪                      Split on spaces
F   «                   Loop over each word
     ↑⸿⸿                Move the cursor to the top row and two columns right*
          ι             Current word
         L              Length
        F  «            Loop over implicit range
               κ        Current index
                 η      Second input
                I       Cast to integer
              ﹪         Modulo
             ¬          Logical not
            M     ↙     Move that many characters down and left
                    ι   Current word
                     κ  Current index
                   §    Index into word and implicitly print

* Точнее, «перейти к началу следующей строки дважды, но так, как если бы холст был повернут». Редактировать: В промежутке между поставленной задачей и принятием этого ответа, уголь фактически приобрел средство разделения строки на пары символов, сократив код до 16 байт:
F⪪θ «↑⸿⸿F⪪ιIη«κ↙ попробуйте онлайн! Ссылка на подробную версию кода. Объяснение:

  θ                 First input
 ⪪                  Split on spaces
F   «               Loop over each word
     ↑⸿⸿            Move the cursor to the top row and two columns right
          ι         Current wordIη
            η       Second input
           I        Cast to integer
         ⪪          Split into substrings of that length
        F    «      Loop over each substring
              κ     Print the substring
               ↙    Move the cursor down and left

Следуя правилам конкурса, я принял это как самый короткий ответ (по состоянию на 6 октября 2017 года).
Ж. Салле

3

SOGL V0.12 , 28 27 26 байтов

ā,θ{0Eā;{ēb÷eb‰⁴bH*+I;Iž}┼

Попробуй здесь!

Я реализовал , делая это, но документация для этого существовала прежде.

Объяснение:

ā                            push an empty array - the main canvas
 ,                           push the first input
  θ{                         for each word (pushing the word each time)
    0E                         set the variable E to 0
      ā;                       below the current word place an empty array - current word canvas
        {               }      for each character of the word
         ēb÷                     push (E++ // B) - note that E is incremented after being used
            eb‰                  push E positive modulo B - like regular modulo but in the 0 output case it gives B
               ⁴                 duplicate the item below ToS
                bH               push B-1
                  *              multiply [(E++ // B) and B-1]
                   +             add [that multiplication to E‰B] - current letters X position
                    I            increase the X position to have one leading space row
                     ;           swap top 2 items - current X position and (E++ // B)
                      I          increase to create current letters Y position
                       ž         in those positions insert the current letter in the current words canvas
                         ┼     append to main canvas current word canvas horizontally

3

Javascript ES6, 187 183 174 166 163 148 145 143 141 140 138 байт

  • для удобства чтения добавлено несколько байтов в коде и удалено их в счетчике байтов
  • вместо s = "", j = 0 я сделал j = s = ""
  • вместо for (i in s) - обычный цикл - убрал 1 байт
  • использование уже сгенерированных значений в индексаторах массивов - удалено 8 байт
  • использование уже со значением i = s.length (из первого цикла) в eval - вместо реальной длины массива - приводит к завершению пробела, которые разрешены
  • использование карты S вместо Eval - уменьшает на 3 байта
  • используя вместо этого заполнение при инициализации пустого массива - так что нет необходимости в цикле в результате отображения
  • может заменить || с | - уменьшено на 2 байта
  • спасибо @Justin Mariner - замените вхождения == "" на <"!" уменьшает 2 байта
  • переместил условия из a [I] в другой оператор, чтобы уменьшить на один "u <"! "" - уменьшить на 2 байта
  • вместо (I + = 2, j = 0) - j =! (I + = 2) - уменьшается на 1 байт
  • «для» вместо для
    F=(s,n)=>{R=[I=j=i=0]
    for(u of s)
    a=R[z=u<"!"?j=!(I+=2):(j%n&&I++,j++/n|0)]=R[z]||[...s].fill` `,a[I]=u
    return R.map(x=>x.join``).join`
    `}
    console.log(F("This is a large string", 3));
    console.log(F("This is an even larger string!", 2));
    console.log(F("Ooooh dear, what a big string you have!", 3));
    console.log(F("Staphylococcus saprophyticus", 4));
    console.log(F("I hope you find this challenge interesting", 2));
    console.log(F("Well, this test case looks kinda pointless now doesn't it?", 15));
    console.log(F("This one looks a lot more interesting!", 1))
    console.log(F("Keep in mind, people: 'Punctuation! Does! Matter!'", 2));

1
Вы должны быть в состоянии сохранить пару байтов, используя <"!"вместо ==" ".
Джастин Маринер

2

C #, 200 байт

int x=-2,y=0;Regex.Split(i,@"\s+").ToList().ForEach(w =>{y=0;Regex.Matches(w,".{0,"+s+"}").Cast<Match>().ToList().ForEach(c=>{x+=(y==0?2:s-1);Console.SetCursorPosition(x,y);Console.Write(c);y++;});});

Где строка указана как i, а размер указан как s .

Например

string i = "Staphylococcus saprophyticus";
int s = 2;    
int x=-2,y=0;Regex.Split(i,@"\s+").ToList().ForEach(w =>{y=0;Regex.Matches(w,".{0,"+s+"}").Cast<Match>().ToList().ForEach(c=>{x+=(y==0?2:s-1);Console.SetCursorPosition(x,y);Console.Write(c);y++;});});

В основном, первая часть Regex.Split использует пробелы для разбиения предложения на слова, а Regex.Matches разбивает каждое слово на куски, указанные в s . Блок записывается в позицию курсора (x, y), где Y устанавливается в 0 для каждого нового слова, а значение x увеличивается на 2 для первого фрагмента слова и впоследствии (s-1) для каждого фрагмента.

x начинает свою жизнь с -2, чтобы убедиться, что его первое использование установлено на 0.

Я не достаточно разбираюсь в мелочах C #, чтобы иметь возможность сделать его меньше, но подозреваю, что это возможно.


2
Любая конкретная причина, почему вы используете s для int, а i для строки, а не наоборот?
Таг

Ха ха! Без понятия - просто быстрая трата времени на мой обеденный перерыв. Я для ввода и s для размера, возможно?
супермеркат


1

Perl 5, 59 байт

55 байт код + 4 для -ai.

$-=s/.{$^I}\K(?=.)/\x1b[1B\x1b[1D/g,print$_,"\x1b[1A"x$-,$"for@F

Примечание: \x1bs являются буквальными ESCсимволами, но здесь их можно использовать для простого копирования и вставки.

Этот скрипт использует escape-последовательности ANSI и требует ввода через -iнестандартный флаг. Если что-то из этого не подходит, пожалуйста, дайте мне знать, и я обновлюсь.

Пример работает

perl -ai3 string-stairs.pl <<< 'This is a large string' 2>/dev/null
Thi is a lar  str   
  s        ge   ing

perl -ai2 string-stairs.pl <<< 'This is an even larger string!' 2>/dev/null
Th  is an ev  la   st   
 is        en  rg   ri
                er   ng
                      !

perl -ai3 string-stairs.pl <<< 'Ooooh dear, what a big string you have!' 2>/dev/null
Ooo  dea  wha a big str   you hav  
  oh   r,   t         ing       e!

perl -ai4 string-stairs.pl <<< 'Staphylococcus saprophyticus' 2>/dev/null
Stap        sapr       
   hylo        ophy
      cocc        ticu
         us          s

perl -ai2 string-stairs.pl <<< 'I hope you find this challenge interesting' 2>/dev/null
I ho  yo fi  th  ch    in     
   pe  u  nd  is  al    te
                   le    re
                    ng    st
                     e     in
                            g

perl -ai15 string-stairs.pl <<< "Well, this test case looks kinda pointless now doesn't it?" 2>/dev/null
Well, this test case looks kinda pointless now doesn't it? 

perl -ai1 string-stairs.pl <<< 'This one looks a lot more interesting!' 2>/dev/null
T o l a l m i 
h n o   o o n
i e o   t r t
s   k     e e
    s       r
            e
            s
            t
            i
            n
            g
            !

perl -ai2 string-stairs.pl <<< "Keep in mind, people: 'Punctuation! Does! Matter!'" 2>/dev/null
Ke  in mi  pe   'P       Do   Ma    
 ep     nd  op   un       es   tt
         ,   le   ct       !    er
              :    ua            !'
                    ti
                     on
                      !
Используя наш сайт, вы подтверждаете, что прочитали и поняли нашу Политику в отношении файлов cookie и Политику конфиденциальности.
Licensed under cc by-sa 3.0 with attribution required.