5 квітня - це Національний день глибокої піци DIsh - тема цього виклику. Враховуючи додатне ціле число n( nбільше 0), створіть піцу з глибокими стравами ASCII. Показана фактична піца з глибоким блюдом:

Як бачимо, на дні і навколишньої частини піци є шар кори.

Як зробити піцу

Кора виготовлена ​​з двох шарів. Перший шар буде nвисоким і n*3довгим. Довжина - кількість символів (включаючи пробіли) у найвищому рядку. Отже, дано n1, перший шар виглядатиме так:

\_/  1 character tall
 3 characters long

Якщо nдва:

\    /   2 characters tall
 \__/
  6 characters long

Тепер про другий шар кори. Він буде виходити за межі першої, внутрішньої кори, тож він буде n+2символів високим та (n*3)+6)символами довгим. Дано nодне:

\       /  3 characters tall
 \     /
  \___/
   9 characters long (3 underscores, 3 slashes on either side)

Якщо nдва:

\          / 4 characters high
 \        /
  \      /
   \____/
    12 characters long

Потім ви зіставите дві найвищі пари \/один з одним за внутрішню і зовнішню кірку. В nє 1:

\ \   / /
 \ \_/ /
  \___/

Якщо зробити все правильно, це виглядатиме як V без вершини з різницею символів між кожним шаром. Якщо говорити про верхівки, то кора буде з'єднана парою /\, розділеною лінією підкреслень, (n*3)+2довгою для завершення кори та піци.

Приклади

Якщо n1:

/\_____/\
\ \   / /
 \ \_/ /
  \___/

n є 2:

/\________/\
\ \      / /
 \ \    / /
  \ \__/ /
   \____/ 

n становить 3:

/\___________/\
\ \         / /
 \ \       / /
  \ \     / /
   \ \___/ /
    \_____/

Критерій виграшу

Це код-гольф , тому найкоротший код у байтах виграє!

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

Ｎθ←_←×_θ↖θ↖²Ｍ→/Ｐ×_⁺²×²θ↘θ↘¹\×_θ‖ＢＯθ

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

Ｎθ

Введіть розмір піци.

←_←×_θ

Роздрукуйте частину зовнішньої основи кори.

↖θ↖²

Надрукуйте ліву сторону зовнішньої кори.

Ｍ→/Ｐ×_⁺²×²θ

Роздрукуйте частину верхньої кори.

↘θ↘¹\

Надрукуйте ліву сторону внутрішньої кори.

×_θ

Роздрукуйте частину внутрішньої основи кори.

‖ＢＯθ

Поміркуйте, щоб завершити піцу.

Зауважте, що сучасні доповнення до деревного вугілля зменшують розмір до 31 байта:

Ｎθ←×_⊕θ↖θ↖²Ｍ→/Ｐ×_⊗⊕θ↘⊕θ\×_θ‖ＢＯθ

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

JavaScript (ES6), 136 байт

f=
n=>"/\\"+(r=s=>s[0][0].repeat(n-1)+s)`_`+r`_`+r`___/\\
`+r` `.replace(/ /g,"$`\\ \\$`   $'$'$'/ /\n")+r` \\ \\`+r`_/ /
`+r`  \\`+r`___/`

<input type=number min=1 oninput=o.textContent=f(this.value)><pre id=o>

Вся піца дуже повторювана, тому rфункція (розроблена як букварний шаблон з тегом) повторює перший символ часу введення n. Це обробляє верхній і нижній два рядки піци. Середина повторюється заміною рядка заготовок; то $`і $'subsitutions автоматично відповідають збільшення і зменшення числа заготовок , таким чином , позиціонування \ \і / /належним чином .

Python 2, 153 151 байт

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

n=input()
a=' '*n
b='_'*n
print'/\\__'+b*3+'/\\'
i=0
exec"print' '*i+'\ \\\\'+' '*(3*n-2*i)+'/ /';i+=1;"*n
print a+'\ \\'+b+'/ /'
print a+' \\_'+b+'_/'

-2 байти шляхом заміни повторних значень змінними завдяки @KoishoreRoy

MATLAB, 333 байти

(Лінива спроба)

function t(n);p=@(q)fprintf(q);s=@(x)p(' ');r=@()p('/ /');l=@()p('\\ \\');f=@()p('/');b=@()p('\\');u=@(x)p('_');h=@()p('/\\');e=@()p('\n');h();arrayfun(u,1:3*n+2);h();e();for i=1:n;arrayfun(s,1:i-1);l();arrayfun(s,1:3*n-2*(i-1));r();e();end;arrayfun(s,1:n);l();arrayfun(u,1:n);r();e();arrayfun(s,1:n+1);b();arrayfun(u,1:n+2);f();e();

Відформатовано:

function d(n)
p=@(q)fprintf(q);
s=@(x)p(' ');
r=@()p('/ /');
l=@()p('\\ \\');
f=@()p('/');
b=@()p('\\');
u=@(x)p('_');
h=@()p('/\\');
e=@()p('\n');
h();arrayfun(u,1:3*n+2);h();e();
for i=1:n
arrayfun(s,1:i-1); l(); arrayfun(s,1:3*n-2*(i-1)); r();e();
end
arrayfun(s,1:n); l(); arrayfun(u,1:n); r();e();
arrayfun(s,1:n+1); b(); arrayfun(u,1:n+2); f();e();

Основна ідея полягає в тому, що у мене є функціональні ручки, щоб надрукувати все, і тоді я досить сильно змушую це. Цикл для циклу - це nшари між самим верхнім і нижнім внутрішнім шаром. Повторення (пробілів) і _робиться за arrayfunдопомогою входів масиву. Спробую придумати більш цікаві способи зробити це, якщо я отримаю більше часу пізніше.

Вугілля деревне , 54 52 байти

Ａ⁺Ｎ²β↖Ｍ↓↙¹Ｍ→↘βＭ↑×_β↗βＭ←↖¹Ｍ↓↙βＭ↑←×_⁺β±²↖βＭ↘Ｍ→×_⁺×β³±⁴

Пояснення:

Ａ⁺Ｎ²β       Assign input + 2 to the variable β
↖             Move up and left one, printing a \
Ｍ↓           Move pointer down one
↙¹            Move down and left one, printing a /
Ｍ→           Move pointer right one
↘β            Move down and right β times
Ｍ↑           Move pointer up
×_β           Write underscores β times
↗β            Move up and right β times
Ｍ←           Move pointer right one
↖¹           Move up and left one
Ｍ↓           Move pointer down one
↙β           Move down and right β times
Ｍ↑           Move up one
←             Set direction to left
×_⁺β±²        Write underscores β - 2 times
↖β            Move up and left β times
Ｍ↘           Move down and right one
Ｍ→           Move right one
×_⁺×β³±⁴      Write underscores (β * 3) - 4 times

Моя попередня відповідь була в Retina, мовою, на яку я раніше не публікував відповіді. Тепер у вас є відповідь у вугіллі, на яку я раніше не публікував відповіді.

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

PHP, 209 200 137 135 байт

нарешті побив JS :)

echo($f=str_pad)("/\\",1+3*$x=$n=1+$argn,_),"/\\
";for(;$n;)echo$f("\\ \\",2*$n+$x," _"[!--$n]),"/ /
",$p.=" ";echo$f("\\",2+$x,_),"/";

Приймає дані від STDIN; побігайте з -nRабо замовляйте сімейну піцу .

зламатися

// print top
echo($f=str_pad)("/\\",1+3*$x=$n=1+$argn,_),"/\\\n";
// loop N+1 times
for(;$n;)
    // print current line and left padding for next line
    echo$f("\\ \\",2*$n+$x," _"[!--$n]),"/ /\n",$p.=" ";
// print bottom
echo$f("\\",2+$x,_),"/";

JavaScript (ES6), 205 байт

Це моя перша асьція-арт- посада!

Додайте f=на початку та посилайтесь на зразок f(arg).

n=>{a=[];w=" ";u="_";t=`/\\${u.repeat(n*3+2)}/\\
`;for(i=0;i<n+1;i++){c=i==n?u:w;a.push(`${w.repeat(i)}\\ \\${c.repeat((n+1-i*2)+n+(n-1))}/ /
`)};return [t,...a,`${w.repeat(i)}\\${u.repeat(n+2)}/`].join``}

Примітка: Усі розриви рядків необхідні!

f=n=>{a=[];w=" ";u="_";t=`/\\${u.repeat(n*3+2)}/\\
`;for(i=0;i<n+1;i++){c=i==n?u:w;a.push(`${w.repeat(i)}\\ \\${c.repeat((n+1-i*2)+n+(n-1))}/ /
`)};return [t,...a,`${w.repeat(i)}\\${u.repeat(n+2)}/`].join``}

document.querySelector("#elem").innerHTML = f(+prompt("Enter a Number"));

<pre id="elem">

Пояснення

Код спочатку оголошує масив a. Потім він оголошує wі uмає значення пробілу та підкреслення відповідно. Потім він оголошує змінну String, щоб утримувати значення кори (яке можна обчислити /\+(n*3+2 underscores)+/\, як зазначено в Challenge). Після цього за допомогою forпетлі та а створюється Template Literalсередина піци (кожен шар має iпробіли на старті та (n+1-i*2)+n+(n-1)пробіли між ними \ \та / /де, iпозначає індекс forциклу). На останньому, нижня частина піци створена ( (i whitespaces)+\+(n+2 underscores)+/). Всі деталі з'єднуються між собою і виводяться (тед).

Якщо з якоїсь причини фрагмент не відображає зображення ASCII правильно, перегляньте тут .

З Днем піци з глибокої страви усім!

Пакет, 200 байт

@set l=@for /l %%i in (1,1,%1)do @call 
@set t=
@set s=
%l%set s=___%%s%%
@echo /\_%s%_/\
%l%echo %%t%%\ \%%s:_= %%/ /&call set t= %%t%%&call set s=%%s:~2%%
@echo %t%\ \%s%/ /
@echo %t% \_%s%_/

tмістить лівий відступ, тоді як sмістить внутрішню; На її _середніх рядах розміщені пробіли. lпросто існує, щоб уникнути деякого повторення.

V , 57 байт

i\ \´ / /ÙãxX2r_>>Ù>>lxxE2r_À­ñHãyêP>GÄXã2é ñHÄÒ_R/\$h.

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

Оскільки, як завжди, це містить безліч неприємних символів, що не належать до ASCII, та недрукованих друкованих файлів, ось шестинадцять:

00000000: 695c 205c b420 2f20 2f1b d9e3 7858 3272  i\ \. / /...xX2r
00000010: 5f3e 3ed9 3e3e 6c78 7845 3272 5fc0 adf1  _>>.>>lxxE2r_...
00000020: 48e3 79ea 503e 47c4 58e3 32e9 20f1 48c4  H.y.P>G.X.2. .H.
00000030: d25f 522f 5c1b 2468 2e                   ._R/\.$h.

Я опублікую більш детальне пояснення незабаром, але ось огляд високого рівня:

i\ \´ / /ÙãxX2r_>>Ù>>lxxE2r_
"Create 
"\ \    / /
" \ \__/ /
"  \____/
"This can probably be compressed a lot more

À­ñHãyêP>GÄXã2é ñ
"*arg1 times*, expand the pizza slice

HÄÒ_R/\$h.
"Add the crust

C (стук) , 211 215 байт

i,l;f(n){l=n*3+6;char u[l];for(i=0;i<l;)u[i++]='_';u[l-1]=i=0;printf("/\\%.*s/\\\n",l-4,u);for(;i<n;i++)printf("%*s\\ \\%*.s/ /\n",i,"",n*3-(2*i),"");printf("%*.s\\ \\%.*s/ /\n%*.s\\%.*s/\n",i,"",n,u,i+1,"",n+2,u);}

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

Гарний код:

i,l;
f(n) {
    l = n*3+6;
    char u[l];

    // Initialize u[] with a full line of underscores,
    for (i=0;i<l;)
        u[i++] = '_';

    // Make sure the string ends in a valid way
    u[l] = i = 0;

    /* Print the crust 'top'
     * l-4 dashes are needed because '/\/\'
     * %.*s notation to pad (l-4) bytes of the underscore string
     */
    printf("/\\%.*s/\\\n", l-4,u);

    /* Print n rows of just 'walls' \ \  / /
     * each row has i=0++ leading spaces,
     * and each row has n*3-(2i) center spaces
     */
    for(; i<n; i++)
        printf("%*s\\ \\%*.s/ /\n", i,"", n*3-(2*i), "");

    /* Print i spaces, '\ \', n underlines, '/ /'
     * then i+1 spaces, '\', n+2 underlines, and '/'
     */
    printf("%*.s\\ \\%.*s/ /\n%*.s\\%.*s/\n",i,"",n,u,i+1,"",n+2,u);
}

Зміни:

• видалено s [l] і пов'язано перемиканням з%. s позначення% .s
• додано функціональну обгортку для відповідності та спробуйте її в Інтернеті

CJam, 74 байт

Шлях занадто довгий. Я спробую інший підхід.

"/\\"ri:M3*:A2+'_*1$NL{"\ \\"AS*"/ /"3$S+A((:A;N\}M*4$A'_*4$N4$S'\A2+'_*'/

Побудовує рядок рядок за рядком. Нічого занадто божевільного.

CJam, 89 байт

Ну, це насправді довше, ніж моє інше рішення на даний момент, але я вважаю, що це більш гольф:

ri{:T)_S*a*ee_{~'\t}%TS*aTU+*'_f+@{~'/t}%W%++z}:K~2S*f{\+}T1:U+K..e>"/\\"'_T3*(*1$++a\+N*

Слід стека:

"2" ; r
2 ; i
2 {:T)_S*a*ee_{~'\t}%TS*aTU+*'_f+@{~'/t}%W%++z} ; {}
2 {:T)_S*a*ee_{~'\t}%TS*aTU+*'_f+@{~'/t}%W%++z} ; :K
2 ; ~
2 ; :T
3 ; )
3 3 ; _
3 3 " " ; S
3 "   " ; *
3 ["   "] ; a
["   " "   " "   "] *
[[0 "   "] [1 "   "] [2 "   "]] ; ee
[[0 "   "] [1 "   "] [2 "   "]] [[0 "   "] [1 "   "] [2 "   "]] ; _
[[0 "   "] [1 "   "] [2 "   "]] ["\  " " \ " "  \\"] ; {~'\t}%
[[0 "   "] [1 "   "] [2 "   "]] ["\  " " \ " "  \\"] 2 ; T
[[0 "   "] [1 "   "] [2 "   "]] ["\  " " \ " "  \\"] 2 " " ; S
[[0 "   "] [1 "   "] [2 "   "]] ["\  " " \ " "  \\"] "  " ; *
[[0 "   "] [1 "   "] [2 "   "]] ["\  " " \ " "  \\"] ["  "] ; a
[[0 "   "] [1 "   "] [2 "   "]] ["\  " " \ " "  \\"] ["  "] 2 ; T
[[0 "   "] [1 "   "] [2 "   "]] ["\  " " \ " "  \\"] ["  "] 2 0 ; U
[[0 "   "] [1 "   "] [2 "   "]] ["\  " " \ " "  \\"] ["  "] 2 ; +
[[0 "   "] [1 "   "] [2 "   "]] ["\  " " \ " "  \\"] ["  " "  "] ; *
[[0 "   "] [1 "   "] [2 "   "]] ["\  " " \ " "  \\"] ["  " "  "] '_ ; '_
[[0 "   "] [1 "   "] [2 "   "]] ["\  " " \ " "  \\"] ["  _" "  _"] ; f+
["\  " " \ " "  \\"] ["  _" "  _"] [[0 "   "] [1 "   "] [2 "   "]] ; @
["\  " " \ " "  \\"] ["  _" "  _"] ["/  " " / " "  /"] ; {~'/t}%
["\  " " \ " "  \\"] ["  _" "  _"] ["  /" " / " "/  "] ; W%
["\  " " \ " "  \\" "  _" "  _" "  /" " / " "/  "] ; ++
["\      /" " \    / " "  \__/  "] ; z
["\      /" " \    / " "  \__/  "] "  " ; 2S*
["  \      /" "   \    / " "    \__/  "] ; f{\+}
["  \      /" "   \    / " "    \__/  "] 2 ; T
["  \      /" "   \    / " "    \__/  "] 2 1 ; 1
["  \      /" "   \    / " "    \__/  "] 2 1 ; :U
["  \      /" "   \    / " "    \__/  "] 3 ; +
["  \      /" "   \    / " "    \__/  "] ["\          /" " \        / " "  \      /  " "   \____/   "] ; K
["\ \      / /" " \ \    / / " "  \ \__/ /  " "   \____/   "] ; ..e>
["\ \      / /" " \ \    / / " "  \ \__/ /  " "   \____/   "] "/\\" ; "/\\"
["\ \      / /" " \ \    / / " "  \ \__/ /  " "   \____/   "] "/\\" '_ ; '_
["\ \      / /" " \ \    / / " "  \ \__/ /  " "   \____/   "] "/\\" '_ 3 ; T
["\ \      / /" " \ \    / / " "  \ \__/ /  " "   \____/   "] "/\\" '_ 9 ; 3*
["\ \      / /" " \ \    / / " "  \ \__/ /  " "   \____/   "] "/\\" '_ 8 ; (
["\ \      / /" " \ \    / / " "  \ \__/ /  " "   \____/   "] "/\\" "________" ; *
["\ \      / /" " \ \    / / " "  \ \__/ /  " "   \____/   "] "/\\" "________" "/\\" ; 1$
["\ \      / /" " \ \    / / " "  \ \__/ /  " "   \____/   "] "/\________/\\" ; ++
["\ \      / /" " \ \    / / " "  \ \__/ /  " "   \____/   "] ["/\________/\\"] ; a
["/\________/\\" "\ \      / /" " \ \    / / " "  \ \__/ /  " "   \____/   "] ; \+
"/\________/\
\ \      / /
 \ \    / / 
  \ \__/ /  
   \____/   " ; N*
; [implicit output]