Upiec mi ciasto!

15

To jest ciasto:

_========_
|        |
+________+
|        |
+________+
|        |
+________+

Ma 8 szerokości, 3 wysokości i 1 głębokość.

Musisz napisać program, który robi ciasto z 3 wejść. Pierwsze wejście kontroluje, ile znaków podkreślenia znajduje się na środku, a =na górze. Oto pierwsze ciasto o szerokości 10 zamiast 8:

_==========_
|          |
+__________+
|          |
+__________+
|          |
+__________+

Drugie wejście kontroluje wysokość ciasta. Oto drugie ciasto o wysokości 4 zamiast 3:

_==========_
|          |
+__________+
|          |
+__________+
|          |
+__________+
|          |
+__________+

Zwróć uwagę na powtórzenie warstw.

Trzecie wejście kontroluje jego głębokość. Właśnie tyle | |s należy uwzględnić na górze. Oto trzecie ciasto o głębokości 2 zamiast 1:

_==========_
|          |
|          |
+__________+
|          |
+__________+
|          |
+__________+
|          |
+__________+

Możesz wydrukować końcowe białe znaki. Przypadki testowe:

Wejście: 3, 3,3

Wynik:

_===_
|   |
|   |
|   |
+___+
|   |
+___+
|   |
+___+

(Mam nadzieję, że nigdy nie dostanę tego ciasta)

Wejście: 3, 2,1

Wynik:

_===_
|   |
+___+
|   |
+___+

Wejście: 5, 5,5

Wynik:

_=====_
|     |
|     |
|     |
|     |
|     |
+_____+
|     |
+_____+
|     |
+_____+
|     |
+_____+
|     |
+_____+

źródło
Czy dane wejściowe zawsze będą dodatnimi liczbami całkowitymi?
Nick Clifford
@NickClifford tak.
Czy dozwolone są końcowe znaki nowej linii?
Kudłaty
3
Powiązane
dkudriavtsev
@Shaggy, zakładam, że tak, domyślnie tak jest na Meta.
programista

Odpowiedzi:

9

V , 25 , 20 bajtów

2é_Àé=ÙÒ|èÙÒ+È_ÀäkÀÄ

Wypróbuj online!

Hexdump:

00000000: 32e9 5fc0 e93d d9d2 7ce8 d9d2 2bc8 5fc0  2._..=..|...+._.
00000010: e46b c0c4                                .k..

Dzięki @ nmjmcman101 za zapisanie trzech bajtów i przypomnienie mi o starym operatorze, który zapisał kolejne dwa bajty.

Wyjaśnienie:

a, bi csą trzema argumentami.

2é_                   " Insert two '_' characters
   Àé=                " Insert 'a' '=' characters between them
      Ù               " Duplicate this line
       Ò|             " Replace this whole line with '|'s
         è            " *Hollow* this line (replace all the middle characters with spaces)
          Ù           " Duplicate this line
           Ò+         " Replace this whole line with '+'s
             È_       " *Hollow* this line again, but use '_' instead of spaces
               Àäk    " Make 'b' copies of this line and the line above it
                  ÀÄ  " Make 'c' copies of this line
James
źródło
Myślę, że można zastąpić Ò r|$.z Ò|èkilku bajtów. Wypróbuj online!
nmjcman101
@ nmjcman101 O rany, zupełnie zapomniałem, że ènawet istniał. Musiałem dręczyć mózg, żeby pamiętać, co on robi. Ale to naprawdę sprytne! W rzeczywistości, używając wariantu z dużymi literami, È<char>prawdopodobnie można zaoszczędzić trochę więcej bajtów w kilku innych miejscach. Dzięki za przypomnienie! :)
James
4

Węgiel drzewny , 34 26 bajtów

Nγ←×γ_↑+↑N_×γ=‖BOγF⁻N¹C⁰±²

Wypróbuj online! Link jest do pełnej wersji kodu. Pobiera parametry w szerokości, głębokości i wysokości zamówienia. Wyjaśnienie:

Nγ          Input the width.
←×γ_        Print a set of _s that go at the bottom of each layer.
↑+          Print one of the +s that go on the left.
↑N          Input the depth and print that many left |s.
_           Print the top left _.
×γ=         Print the =s along the top.
‖BOγ        Copy the left column to the right.
F           Repeat:
 ⁻ ¹         One time fewer than:
  N           Input of the height:
    C⁰±²        Copy the whole cake up 2 characters.
Neil
źródło
2

Mathematica, 167 bajtów

c=Column;r=Row;t=Table;f=Flatten;c[c/@{r/@f[{{{"_",r@t["=",#],"_"}},t[{"|",r@t[" ",#],"|"},#3-1]},1],c/@f[{t[{r@{"|",r@t[" ",#],"|"},r@{"+",r@t["_",#],"+"}},#2]},1]}]&
J42161217
źródło
2

PHP> = 7,1, 104 bajtów

for([,$w,$h,$t]=$argv;$i<2*$h+$t;)echo str_pad($e="_|+"[$b=$i++<$t?$i>1:1+$_++%2],$w+1,"= _"[$b])."$e
";

Wersja online

Jörg Hülsermann
źródło
1
Nie jest zły. Znaleziono 3 bajty:for([,$w,$h,$t]=$argv;$i<2*$h+$t;)echo str_pad($e="_|+"[$b=$i++<$t?$i>1:2-($i-$t&1)],$w+1,"= _"[$b])."$e\n";
Christoph
1
I kolejne 3 bajt: $b=$i++<$t?$i>1:1+$_++%2.
Christoph
@Christoph Fajny pomysł Dziękuję
Jörg Hülsermann
1

Japt , 51 47 bajtów

"_{ç'=}_"+WçA="
|{ç}|" +(B="
+{ç'_}+" +(´V çA+B

Wypróbuj online!

Dane wejściowe są pobierane w szerokości, wysokości i głębokości zamówienia.

Łukasz
źródło
1

Galaretka , 30 29 bajtów

-1 bajtowe przełączanie z dodatku na XOR w celu translacji między zewnętrznymi i wewnętrznymi kolumnami, umożliwiając wyszukiwanie 5 znaków zamiast posiadania dwóch _wpisów.

ṬṚ;⁹RḤṬḤ¤Wµ^9ẋ⁵;@;µZị“_+= |”Y

Pełny program biorąc trzy argumenty program depth, height, widthi drukowanie ciasto.

Wypróbuj online!

W jaki sposób?

ṬṚ;⁹RḤṬḤ¤Wµ^9ẋ⁵;@;µZị“_+= |”Y - Main link: depth, height (width is a program argument)
Ṭ                             - untruth   [0,0,0,...1] such that the length is the depth
 Ṛ                            - reverse   [1,0,0,...0]
        ¤                     - nilad followed by link(s) as a nilad:
   ⁹                          -   link's right argument, height
    R                         -   range   [1,2,3,...,height]
     Ḥ                        -   double  [2,4,6,...,2*height]
      Ṭ                       -   untruth [0,1,0,1,0,1,...,0,1] (length double height)
       Ḥ                      -   double  [0,2,0,2,0,2,...,0,2]
  ;                           - concatenate  [1,0,0,...,0,0,2,0,2,0,2,...,0,2]
                              -     ...this is the form of a column of cake!
         W                    - wrap in a list
          µ                   - monadic chain separation, call that c
           ^9                 - bitwise XOR c with 9 [8,9,9,...,9,9,11,9,11,9,11,...,9,11]
              ⁵               - program's 3rd argument, width
             ẋ                - repeat the augmented c width times
               ;@             - concatenate with a copy of c
                 ;            - concatenate a copy of c
                  µ           - monadic chain separation call that sideways cake
                   Z          - transpose the sideways cake to put it the right way up
                     “_+= |”  - literal ['_','+','=',' ','|'] (cake decoration)
                    ị         - index into (1 based and modular, so 8,9, and 11 are, mod 5,
                                            3, 4, and 1 yielding '=', ' ', and '_')
                            Y - join with new lines
                              - implicit print
Jonathan Allan
źródło
1

dc , 108 bajtów

?sdstsw95P61sc[lwsf[lcPlf1-dsf0<a]dsax]dsbx[_]p[[124P32sclbx[|]pld1-dsd0<j]dsjx43P95sclbx[+]plt1-dst0<h]dshx

Wypróbuj online!

R. Kap
źródło
1

Java 7 , 169 164 158 bajtów

String f(int...a){String s="_",t="|",u="+";for(;a[0]-->0;s+="=",t+=" ")u+="_";s=s+"_";t="\n"+t+"|";u=t+"\n"+u+"+";for(;a[2]-->1;)s+=t;for(;a[1]-->0;)s+=u;return s;}

Wypróbuj online!

Nie golfowany:

String f(int...a)                    // saves two bytes over int a, int b, int c
{
    String s="_", t="|", u="+";      // set up the start of each row

    for(; a[0]-->0; s+="=", t+=" ")  // Uses the goes-to operator to fill the row
        u+="_";                      

    s += "_\n";                      // adds the end of each row
    t += "|\n";              
    u = t + u + "+\n";               // and combining t into u

    for(; a[2]-->1; )                // add the top of the cake
        s += t;

    for(; a[1]-->0; )                // add the rest of the cake
        s += u;

    return s;
}
PunPun1000
źródło
Możesz zapisać 1 bajt, wpisując u=t+u+"+\n" inside the for-loop: (u = t + u + "+ \ n; a [2] -> 1;) s + = t;`. Ale ładna odpowiedź, +1 ode mnie.
Kevin Cruijssen
1

05AB1E , 33 31 bajtów

'_'=¹×«Ć,'|¹úRĆ³G=}²F='+'_¹×«Ć,

Wypróbuj online!

Wyjaśnienie

'_'=¹×«Ć,'|¹úRĆ³G=}²F='+'_¹×«Ć,   Main link. Args: w h d
'_                                Push literal '_'
  '=¹×                            Push '=' w times
      «Ć,                         Concat, enclose and print
         '|                       Push literal '|'
           ¹ú                     Pad with w spaces in front
             RĆ                   Reverse and ecnlose
               ³G }               d - 1 times do:
                 =                Print without consuming
                   ²F             h times do:
                     =            Print without consuming
                      '+          Push literal '+'
                        '_¹×      Push '_' w times
                            «Ć,   Concat, enclose and print
kalsowerus
źródło
1

Pakiet Windows, 211 180 163 bajtów

Grał w golfa w sumie 48 bajtów dzięki @Neil!

@for /l %%p in (1,1,%1)do @call set w= %%w%%
@echo _%w: ==%_
@for /l %%p in (2,1,%3)do @echo ^|%w%^|
@for /l %%p in (1,1,%2)do @echo ^|%w%^|&echo +%w: =_%+
@set w=
stevefestl
źródło
1
1. Używanie @na każdej linii i po dojest nieco krótsze niż @echo off. 2. @call set w=%%w%%_unika setlocal enabledelayedexpansion. 3. Użyj @for /l %%p in (2,1,%2). 4. IMHO należy dodać, @set w=aby kod działał więcej niż jeden raz.
Neil
Jestem zdezorientowany ostatnią częścią, jeśli nie dodam @set w=, czy kod nie będzie działał więcej niż raz?
stevefestl
1
1. Twój @for /l %%p in (1,1,%1)dozaginął. 2. Twoje ciasto wydaje się mieć niewłaściwą wysokość, a przynajmniej nie wydaje się pasować do testowego przypadku, gdy próbuję. 3. Jeśli uruchomisz skrypt dwa razy w tej samej sesji poleceń, ciasto po prostu się poszerzy.
Neil
@Neil Wszystko naprawione :)
stevefestl
1
Świetny! Kilka ostatnich rzeczy, które zauważyłem: 1. Nie potrzebujesz @po &. 2 Jeśli zmienisz drugą pętlę na (2,1,%3)i trzecią na (1,1,%2), myślę, że możesz usunąć echo +%w%+linię. 3. Jeśli poprawnie policzyłem, myślę, że powinieneś wypełnić wspacjami zamiast _s, ponieważ spowoduje to mniejszą liczbę podstawień. (Użyłbym, @call set w= %%w%%bo inaczej trudno byłoby dostrzec przestrzeń!)
Neil
1

Haskell , 87 bajtów

f w t d=["_=| +_\n"!!j|i<-0:([2..d]>>[2])++([1..t]>>[2,4]),j<-i:([1..w]>>[i+1])++[i,6]]
faubi
źródło
1
Dobra robota, pozostawiając większość języków innych niż golf. Deklaracja infix (w#t)d= ...zapisuje bajt.
Laikoni
1

SOGL V0.12 , 25 bajtów

e =*¼_Oe↕¼|.⌡Qe╔*¼+.H«{Q;

Wypróbuj tutaj!

Oczekuje danych wejściowych jako szerokość, głębokość, a następnie wysokość.

dzaima
źródło
Czy wolno zmieniać kolejność danych wejściowych? Wydają się być określone w ustalonej kolejności.
rekurencyjny
1
@recursive Zazwyczaj jest to dozwolone i nigdzie pytanie nie wymusza uporządkowania, a druga najczęściej głosowana odpowiedź zmienia kolejność danych wejściowych i prawdopodobnie została zauważona przez OP, więc zakładam, że jest w porządku.
dzaima
1

Python 2, 124 122 120 105 92 bajty

w,t,d=input()
a="\n|"+w*" "+"|"
print"_"+w*"="+"_"+(d-1)*a+t*(a+"\n+"+w*"_"+"+")

-15 bajtów przy użyciu STDIN zamiast argumentów programu

-13 bajtów przez przejście do Pythona 2 (do wprowadzania input()liczb całkowitych i printinstrukcji)

-12 bajtów od Caird Coinheringaahing

Wypróbuj online!

Python 3, 124 122 120 105 bajtów

w,t,d=[int(input())for n in(1,2,3)]
a="\n|"+w*" "+"|"
print("_"+w*"="+"_"+(d-1)*a+t*(a+"\n+"+w*"_"+"+"))

Wypróbuj online!

Jeśli pełny program nie jest wymagany:

Python 3, 87 84 bajtów

lambda w,t,d:"_"+w*"="+"_"+(d-1)*("\n|"+w*" "+"|")+t*("\n|"+w*" "+"|\n+"+w*"_"+"+")

Wypróbuj online!

pizzapanty184
źródło
80 bajtów
caird coinheringaahing 30.10.17
@cairdcoinheringaahing 78 bajtów .
Jonathan Frech
0

JavaScript (ES6), 161 157 bajtów

f=(w,h,d)=>{r=x=>x.repeat(w);_='_';m='+'+r(_)+'+';b='|'+r(' ')+'|';c=[_+r('=')+_];for(i=d-1;i--;)
c.push(b);for(i=h;i--;)
c.push(b+'\n'+m);return c.join`\n`}

console.log(f(8,3,1));

Axarydax
źródło
0

Perl 5 , 85 + 1 (-a) = 86 bajtów

say"_".'='x($w=$F[0])."_\n".($l='|'.$"x$w."|\n")x($F[2]-1).("$l+".'_'x$w."+\n")x$F[1]

Wypróbuj online!

Xcali
źródło
0

JavaScript / ES6, 90 bajtów

Właśnie napisałem szorstkie rozwiązanie i zdarzyło mi się pokonać istniejącą odpowiedź JS aż o 56 bajtów. Potem grałem w golfa 11 bajtów.

(w,h,d,g=a=>a+a[1][r='repeat'](w)+a[0]+`
`)=>g('_=')+(l=g('| '))[r](d-1)+(l+g('+_'))[r](h)

Oto demo.

var F = (w,h,d,f=a=>a+a[1][r='repeat'](w)+a[0]+`
`)=>f('_=')+(l=f('| '))[r](d-1)+(l+f('+_'))[r](h);

console.log(F(prompt('width') || 3, prompt('height') || 3, prompt('depth') || 3));
console.log(F.toString().length);

Nissa
źródło