Це торт:

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

Це 8 широких, 3 заввишки та 1 глибоких.

Ви повинні написати програму, яка робить торт з 3-х входів. Перший вхід визначає кількість підкреслень у середині та =s у верхній частині. Ось перший торт шириною 10 замість 8:

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

Другий вхід регулює висоту торта. Ось другий пиріг висотою 4 замість 3:

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

Зверніть увагу на повторення шарів.

Третій вхід регулює, наскільки він глибокий. Ось тільки скільки | |с включити на вершину. Ось третій пиріг глибиною 2 замість 1:

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

Ви можете роздрукувати пробіли пробілу. Тестові приклади:

Вхід: 3, 3,3

Вихід:

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

(Я сподіваюся, що я ніколи не отримаю цей торт)

Вхід: 3, 2,1

Вихід:

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

Вхід: 5, 5,5

Вихід:

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

V , 25 , 20 байт

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

Спробуйте в Інтернеті!

Hexdump:

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

Дякуємо @ nmjmcman101 за збереження трьох байтів і нагадував мені старого оператора, який врятував ще два байти.

Пояснення:

a,, bі cє трьома аргументами.

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

Вугілля деревне , 34 26 байт

Ｎγ←×γ_↑+↑Ｎ_×γ=‖ＢＯγＦ⁻Ｎ¹Ｃ⁰±²

Спробуйте в Інтернеті! Посилання на багатослівну версію коду. Приймає параметри в ширину порядку, глибину, висоту. Пояснення:

Ｎγ          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.
↑Ｎ          Input the depth and print that many left |s.
_           Print the top left _.
×γ=         Print the =s along the top.
‖ＢＯγ        Copy the left column to the right.
Ｆ           Repeat:
 ⁻ ¹         One time fewer than:
  Ｎ           Input of the height:
    Ｃ⁰±²        Copy the whole cake up 2 characters.

Математика, 167 байт

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]}]&

PHP> = 7,1, 104 байт

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

Інтернет-версія

Рубін , 62 байти

->w,h,d{l="|#{' '*w}|
";"_#{?=*w}_
"+l*~-d+(l+"+#{?_*w}+
")*h}

Спробуйте в Інтернеті!

Japt , 51 47 байт

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

Спробуйте в Інтернеті!

Введення приймається в порядку ширини, висоти, глибини.

Желе , 30 29 байт

-1 байт перехід від додатку до XOR для перекладу між зовнішнім і внутрішнім стовпцями, що дозволяє шукати 5 символів, а не мати два _записи.

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

Повна програма приймає три аргументи програми з depth, height,width і друку торта.

Спробуйте в Інтернеті!

Як?

ṬṚ;⁹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

постійного струму , 108 байт

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

Спробуйте в Інтернеті!

Рода , 65 байт

a,b,c{d=" "*a;[`_${"="*a}_
`,`|$d|
`*(c-1),`|$d|
+${"_"*a}+
`*b]}

Спробуйте в Інтернеті!

Java 7 , 169 164 158 байт

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

Спробуйте в Інтернеті!

Безголівки:

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

05AB1E , 33 31 байт

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

Спробуйте в Інтернеті!

Пояснення

'_'=¹×«Ć,'|¹ú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

Windows Batch, 211 180 163 байт

Усього в 48 байтах, завдяки @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=

Haskell , 87 байт

f w t d=["_=| +_\n"!!j|i<-0:([2..d]>>[2])++([1..t]>>[2,4]),j<-i:([1..w]>>[i+1])++[i,6]]

SOGL V0.12 , 25 байт

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

Спробуйте тут!

Очікує введення як ширина, глибина, то висота.

Пітон 2, 124 122 120 105 92 байт

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

-15 байт, використовуючи STDIN замість програмних аргументів

-13 байт шляхом переходу на Python 2 (для input() ing цілих чисел таprint оператора)

-12 байт від Caird Coinheringaahing

Спробуйте в Інтернеті!

Python 3, 124 122 120 105 байт

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

Спробуйте в Інтернеті!

Якщо повна програма не потрібна:

Python 3, 87 84 байт

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

Спробуйте в Інтернеті!

Javascript (ES6), 161 157 байт

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

Python 2 , 93 байти

i,j,k=input()
l=["|"+" "*i+"|"]
for x in["_"+"="*i+"_"]+l*(k-1)+(l+["+"+"_"*i+"+"])*j:print x

Спробуйте в Інтернеті!

Perl 5 , 85 + 1 (-a) = 86 байт

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

Спробуйте в Інтернеті!

JavaScript / ES6, 90 байт

Я просто написав грубе рішення, і трапилось обіграти існуючу відповідь JS колосальними 56 байтами. Тоді я відіграв 11 байт.

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

Ось демонстрація.

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

Полотно , 23 байти

|＊_⁷⇵×+×∔║│Ｐ
=×_ｅＰ⁸╷｛１⁸

Спробуйте тут!