Zbuduj mi schody


24

Schody Sznurkowe

Oświadczenie: To pierwsze wyzwanie, które proponuję. Wszelkie opinie są mile widziane. Jeśli jest to duplikat, proszę to zaznaczyć.

Oto link do postu w piaskownicy.

Cel

Celem tego wyzwania jest, biorąc pod uwagę ciąg i liczbę całkowitą, wydrukować ciąg w bloki wielkości tej liczby całkowitej. Jeśli słowo ma więcej znaków niż rozmiar bloku, wydrukuj je według malejącego wzoru „schodów”.

Zasady

  • Wspomniany powyżej „wzór schodów” oznacza, że ​​dla każdego bloku tego samego słowa blok ten musi rozpoczynać się dokładnie tam, gdzie kończy się blok nad nim. Sprawdź przypadki testowe (lub zapytaj), jeśli masz jakieś pytania.
  • Jeśli słowo jest podzielone na wiele bloków, następne słowo musi zostać wydrukowane z odpowiednią liczbą spacji, to znaczy musi być oddzielone od najniższego bloku poprzedniego słowa dokładnie jednym białym znakiem. Sprawdź przypadki testowe (lub poproś) o wyjaśnienie.
  • Możesz założyć, że ciąg wejściowy będzie się składał tylko z drukowalnych znaków ASCII. Nie będzie też zawierał wielu białych znaków z rzędu.
  • Możesz również założyć, że liczba całkowita zawsze będzie w zakresie [1, + ∞).
  • Dozwolone są końcowe białe znaki lub znaki nowej linii.
  • Możesz użyć dowolnej rozsądnej metody we / wy.
  • Obowiązują standardowe luki .
  • To jest , więc wygrywa najkrótszy kod (w bajtach, na język). Po tygodniu (lub mniej więcej) zaakceptuję najkrótszą odpowiedź.

Przypadki testowe

(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
                         !

czy w każdej linii może znajdować się taka sama liczba wiodących pól?
dzaima

Premia: użyj Zalgo dla bloku rozmiar-1 t̳͔̲̻̫̪ḛ͕̦̙͔̩͎͉̝̞ͅx̳͖̬̥̱͓̭̙̤͇̘̲ț͎̣̫̪̩̟̯͈͙͈̗̳͕̹̙̣ͅ
Luis Mendo

@dzaima Nie jestem pewien, co masz na myśli, ale nie rozumiem, dlaczego nie. Chcesz podać przykład?
J. Sallé,

@ J.Salle this
dzaima

@dzaima tak, na pewno nie ma problemu.
J. Sallé,

Odpowiedzi:


7

Węgiel drzewny , 22 bajty

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

Wypróbuj online! Link jest do pełnej wersji kodu. Wyjaśnienie:

  θ                      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

* Dokładniej: „dwukrotnie przejdź do początku następnego wiersza, ale tak, jakby płótno zostało obrócone”. Edycja: Pomiędzy ustaleniem tego wyzwania i zaakceptowaniem tej odpowiedzi, Węgiel rzeczywiście uzyskał sposób podziału łańcucha na pary znaków, zmniejszając kod 16 bajtów:
F⪪θ «↑⸿⸿F⪪ιIη«κ↙ Wypróbuj online! Link jest do pełnej wersji kodu. Wyjaśnienie:

  θ                 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

Postępując zgodnie z zasadami wyzwania, zaakceptowałem to jako najkrótszą odpowiedź (od 6 października 2017 r.).
J. Sallé,

3

SOGL V0.12 , 28 27 26 bajtów

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

Wypróbuj tutaj!

Wdrożyłem to podczas tworzenia, ale dokumentacja na ten temat istniała wcześniej.

Wyjaśnienie:

ā                            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 140 138 bajtów

  • dla czytelności dodałem niektóre bajty w kodzie i usunąłem je w liczbie bajtów
  • zamiast s = "", j = 0 zrobiłem j = s = ""
  • zamiast for (i in) - regular for for - usunięto 1 bajt
  • wykorzystanie już wygenerowanych wartości w indeksatorach tablic - usunięto 8 bajtów
  • użycie już z wartością i = s.length (z pierwszej pętli) w eval - zamiast rzeczywistej długości tablicy - powoduje końcowe dozwolone miejsce
  • użycie mapy S zamiast eval - zmniejsza o 3 bajty
  • zamiast tego użyj wypełnienia podczas inicjowania pustej tablicy, więc pętla w wyniku mapy nie jest potrzebna
  • może zastąpić || z | - zmniejszona o 2 bajty
  • dzięki @Justin Mariner - zamień wystąpienia == "" na <"!" zmniejsza 2 bajty
  • przeniósł warunki z a [I] na drugą instrukcję, aby zmniejszyć jeden „u <”! ”” - zmniejsza 2 bajty
  • zamiast (I + = 2, j = 0) - j =! (I + = 2) - zmniejszono 1 bajt
  • „for of” zamiast for
    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
Powinieneś być w stanie zapisać kilka bajtów, używając <"!"zamiast ==" ".
Justin Mariner

2

C #, 200 bajtów

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++;});});

Gdzie ciąg jest określony przez i, a rozmiar jest określony przez s .

Na przykład

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++;});});

Zasadniczo pierwsza część Regex.Split używa białych spacji do podziału zdania na słowa, a Regex.Matches dzieli każde słowo na części określone przez s . Fragment jest zapisywany w pozycji kursora (x, y), gdzie Y jest ustawiane na 0 dla każdego nowego słowa, a x jest zwiększane o 2 dla pierwszego fragmentu słowa, a następnie (s-1) dla każdego fragmentu.

x rozpoczyna swoją żywotność od -2, aby upewnić się, że jego pierwsze użycie jest ustawione na 0.

Nie mam wystarczającej wiedzy na temat ciekawostek w języku C #, aby móc ją zmniejszyć, ale podejrzewam, że tak może być.


2
Czy jest jakiś konkretny powód, dla którego używasz s dla int, a ja dla łańcucha zamiast na odwrót?
Tahg

Ha ha! Nie mam pojęcia - po prostu marnuję czas na lunch. Być może dla danych wejściowych i dla rozmiaru?
supermeerkat 30.09.17


1

Perl 5, 59 bajtów

Kod 55 bajtów + 4 dla -ai.

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

Uwaga: \x1blitery s są dosłowneESC znaki, ale uciekły tutaj, aby łatwo je skopiować i wkleić.

Ten skrypt wykorzystuje sekwencje specjalne ANSI i wymaga danych wejściowych za pośrednictwem -i flagi, która jest niestandardowa. Jeśli którekolwiek z nich są nie do przyjęcia, daj mi znać, a ja zaktualizuję.

Przykład działa

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
                      !
Korzystając z naszej strony potwierdzasz, że przeczytałeś(-aś) i rozumiesz nasze zasady używania plików cookie i zasady ochrony prywatności.
Licensed under cc by-sa 3.0 with attribution required.