5 апреля - национальный день пиццы Deep 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 байт

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

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

Ｎθ

Введите размер пиццы.

←_←×_θ

Распечатать часть внешней основы коры.

↖θ↖²

Напечатайте внешнюю корку левой стороны.

Ｍ→/Ｐ×_⁺²×²θ

Распечатать часть верхней корки.

↘θ↘¹\

Распечатать внутреннюю корку левой стороны.

×_θ

Распечатать часть внутренней коры основания.

‖ＢＯθ

Подумайте, чтобы завершить пиццу.

Обратите внимание, что современные дополнения к Charcoal уменьшают размер до 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();

Основная идея заключается в том, что у меня есть функциональные маркеры для печати всего, а затем я просто использую это грубо. Цикл for предназначен для 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 байт

Это мой первый пост ascii-art !

Добавить 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 для хранения значения crust (которое может быть вычислено с помощью /\+(n*3+2 underscores)+/\, как упомянуто в вызове). После этого, с помощью forцикла и а Template Literal, создается середина пиццы (при этом каждый слой имеет iпробелы в начале и (n+1-i*2)+n+(n-1)пробелы между \ \и / /, где iпредставляет индекс forцикла). Наконец, создается самая нижняя часть пиццы ( (i whitespaces)+\+(n+2 underscores)+/). Все части соединяются вместе и выводятся (тэд).

Если по какой-то причине фрагмент не отображает искусство ASCII правильно, посмотрите здесь .

Поздравляем всех с Днем пиццы Deep Dish!

Пакетный, 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содержит внутреннюю часть; его _s заменяются пробелами в средних рядах. lпросто существует, чтобы избежать повторения.

V , 57 байтов

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

Попробуйте онлайн!

Так как (как обычно) это содержит много неприятных не-ASCII символов и непечатных символов, вот hexdump:

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
• добавлена ​​функция оболочки для соответствия и попробуйте онлайн

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]