รับอินพุตnพิมพ์เค้กnเลเยอร์ASCII สูงมองจากด้านข้างโดยมีเทียนสองอันอยู่ด้านบน ดูตัวอย่างด้านล่างสำหรับรายละเอียด
>> cake(1)
_|_|_
| |
+-----+
>> cake(3)
_|_|_
| |
+---------+
| |
+-------------+
| |
+-------------+
... และต่อไป
คำตอบ:
i=input()
m=["+"+"-"*(i*4+1)+"+","|"+" "*(i*4+1)+"|"]
for v in range(i,1,-1):
m+=[" "*(i-v)*2+"+"+"-"*(v*4+1)+"+"," "*(i-v+1)*2+"|"+" "*((v-1)*4+1)+"|"]
m.pop()
m+=[" "*(i-1)*2+"|"+" "*5+"|"," "*(i-1)*2+" _|_|_"]
print'\n'.join(m[::-1])
ตัวอย่างที่ขาดหายไปของ Cake 2:
_|_|_
| |
+---------+
| |
+---------+
int(input())เป็นinput()และprintคำสั่งรวมทั้งคุณสามารถเปลี่ยนสี่ช่องว่างเป็นหนึ่ง (ถ้าเป็นแท็บเปลี่ยนเป็นช่องว่างเพื่อให้เห็นได้ชัดเจนว่าเป็นอักขระหนึ่งตัว) . บวก bytecount ของคุณคือ 4 สูงเกินไปด้วยเหตุผลบางอย่าง
->n{p=->t{puts t.center 3+4*n}
p['_|_|_']
(1..n).map{|i|p[?|+' '*(1+4*i)+?|]
p[?++?-*((i<n ?5:1)+4*i)+?+]}}
@echo off
set i=
for /l %%j in (2,1,%1)do call set i= %%i%%
echo %i% _^|_^|_
set s=-----
for /l %%j in (2,1,%1)do call:l
echo ^|%s:-= %^|
echo +%s%+
exit/b
:l
echo %i%^|%s:-= %^|
set i=%i:~2%
set s=----%s%
echo %i%+%s%+
สั้นกว่า Python หรือไม่? มีบางอย่างผิดปกติ ...
เค้กแบบเรียกซ้ำ
f=(n,i=--n,r=(n,c)=>'- '[+!c].repeat(n),p=r((i-n)*2),j=n*4+5,x=p+`+${r(j,1)}+
`)=>(n?f(n-1,i)+x:p+` _|_|_
`)+p+`|${r(j)}|
`+(n-i?'':x)
let f=(n,i=--n,r=(n,c)=>'- '[+!c].repeat(n),p=r((i-n)*2),j=n*4+5,x=p+`+${r(j,1)}+
`)=>(n?f(n-1,i)+x:p+` _|_|_
`)+p+`|${r(j)}|
`+(n-i?'':x)
console.log(f(4))f(a:b)n=a:([0..4*n]>>b)++[a]
x!n=x:[f"| "n,f"+-"n]
g 1=" _|_|_"!1
g n=map(" "++)(init.g$n-1)++f"+-"n!nกำหนดฟังก์ชั่นgซึ่งจะส่งกลับรายการของสตริงที่มีบรรทัดของเอาต์พุต
>UXð×?" _|_|_",Xð×?"| |",X<U0<VXGNVXY-ð×?'+?8Y·+G'-?}'+,XY-ð×?'|?7Y·+ð×?'|,}XY-ð×?'+?8Y·+G'-?}'+,
บันทึก 14 ตัวอักษรขอบคุณ Adnan!
มีห้องสำหรับเล่นกอล์ฟที่นี่อย่างแน่นอน
โปรดทราบว่านี่จะพิมพ์ทุกอย่างตรงข้ามด้วยที่ว่างเดียว
a=' '*input()
b='+-+'
c=d=' '
while a:b='+----'+b[1:];c=d*4+c;a=a[2:];print a+[' _|_|_',b][c>d*5]+'\n%s|%%s|'%a%c
print b
p=print
t=int(input())
d=4*'-'
s=' '
a='+\n'
r=(t-1)*s
p(r+' _|_|_\n'+r+'| |')
for i in range(2,t+1):b=(t-i)*s;p(b+'+-'+i*d+a+b+'| '+i*2*s+'|')
p('+-'+t*d+a)
มันไม่ฉลาดมาก แต่ฉันไม่เคยทำแบบนี้มาก่อน (แก้ไข: ลบวงเล็บที่ไม่จำเป็นออกโดยลดอีกหนึ่งอักขระ)
+K*dtyQ"_|_|_"+tK"| |"jP.iJms[*\ yt-Qd\+*+5*4d\-\+)+StQtQmXd"+-""| "J
โปรแกรมที่รับอินพุตของจำนวนเต็มบน STDIN และพิมพ์ผลลัพธ์
อาจยังมีบางกอล์ฟที่ต้องทำที่นี่
คำอธิบายมาในภายหลัง
n=>[(s=" "[R='repeat'](n-1))+" _|_|_",s+"| |",...Array(n-1),`+${"-"[R](n*4+1)}+`].map((_,i)=>_||(s=" "[R](n-i))+`+${"-"[R](i=i*4+1)}+`+`
${s}|${" "[R](i)}|`).join`
`
รอบแรกอาจไม่ดีที่สุด ...
วิธีการใหม่:
echo$p=str_pad("",-2+2*$n=$argv[1])," _|_|_";for($x=" ",$b=$y="----";$n--;){$a.=$x;if($n)$b.=$y;echo"
$p| $a|
",$p=substr($p,2),"+-$b+";}
รุ่นเก่าสำหรับการอ้างอิง:
$p=str_pad;for($o=["_|_|_"];$i++<$n=$argv[1];$o[]="+".$p("",($i<$n)*4+$e,"-")."+")$o[]="|".$p("",$e=$i*4+1)."|";foreach($o as$s)echo$p($s,$n*4+3," ",2),"
";
$argvนี้ไบต์สำหรับค่าใช้จ่าย : - /
สวยยุ่ง แต่ใช้งานได้!
fu A(n)
let @z="Vkyjply4lpjy4hp"
exe "norm 2i+\e5i-\eo||\e5i \e".a:n."@zddl4xggd$i_|_|_"
exe "%ce ".(a:n*4+3)
endfu
วิธีโทร: call A(3)ในที่ว่างบัฟเฟอร์ในการโหลดฟังก์ชันsource cake.vim
2i+<Esc>5i-<Esc> เขียนบรรทัดแรก +-----+o||<Esc>5i<Space><Esc>เพิ่ม| |ในบรรทัดที่สองVkyjply4lpjy4hpจะถูกบันทึกไว้ในมาโคร@zโดยจะเลือกทั้งสองเส้นดึงข้อมูลวางลงใต้ภาพและเพิ่มขีดคั่นและช่องว่าง 4 รายการ#@zทำซ้ำ#ครั้งนี้ddl4x ลบบรรทัดสุดท้ายและลบเครื่องหมายขีดคั่นที่ด้านล่างของเค้กเพื่อให้เท่ากับด้านบนของเลเยอร์ด้านล่างggd$i_|_|_ แทนที่บรรทัดแรกด้วยด้านบนของเค้ก %ceจากนั้นจัดวางเค้กทั้งหมดให้อยู่ที่ความกว้างของชั้นล่าง! !∫4*I:┌*╗1Ο;@*┐1Ο}⁴¹k┐╔2ΟΚ╚
คำอธิบาย:
∫ } for each in 1..input inclusive, pushing counter
4* multiply by 4
I increase by 1
: duplicate; this will be used later
┌* repeat a dash pop times
╗1Ο encase them in plusses
; get the duplicate on the stacks top
@* repeat a space pop times
┐1Ο encase in vertical bars
⁴ duplicate the item below ToS - the last line
¹ wrap the stack in an array
k remove the arrays first item
┐ push "_"
╔ push "|"
2Ο encase 2 copies of the vertical bar in underscores
Κ and prepend that to the array
╚ center the array horizontally
หน้าต่าง VBE แบบไม่ระบุชื่อทันทีที่รับอินพุตจากเซลล์A1และส่งเค้กไปที่หน้าต่าง VBE ทันที
For i=1To[A1]:s=Space(2*([A1]-i)):x=String(1+4*i,45):?s &IIf(i=1," _|_|_","+" &x &"+"):?s"|"Replace(x,"-"," ")"|":Next:?s"+"x"+l~4*):Z5:X{D'+'-C}:A{D'|SC}:B{X*1$N}:C];{SZX-Y/*}:D~" _|_|_"NB{XZ<}{X4+:X;AB}wA
INPUT n
?SPC(n*2-1)"_|_|_
FOR i=1TO n
s=n*2-i*2
?SPC(s)"|"SPC(i*4+1)"|
?SPC(s-2)"+"STRING$(i*4+(i=n)*4+5,45)"+
NEXT
พิมพ์บรรทัดบนสุดด้วยเทียน; จากนั้นพิมพ์เค้กที่เหลือสองบรรทัดต่อครั้ง
INPUT n
PRINT SPC(n * 2 - 1); "_|_|_"
FOR i = 1 TO n
indent = n * 2 - i * 2
PRINT SPC(indent); "|"; SPC(i * 4 + 1); "|"
PRINT SPC(indent - 2); "+"; STRING$(i * 4 + (i = n) * 4 + 5, 45); "+"
NEXT
SPCเมื่อใช้ในPRINTคำสั่งปล่อยจำนวนช่องว่างที่กำหนด สะดวกสบายเมื่อได้รับข้อโต้แย้งเชิงลบมันจะถือว่าเป็น 0 ดังนั้นความจริงที่indent - 2อยู่-2ในการทำซ้ำครั้งสุดท้ายไม่ได้เป็นปัญหา STRING$ใช้เวลาในการนับและรหัสตัวอักษร (ที่นี่ 45 สำหรับ-) และทำซ้ำตัวละครที่จำนวนครั้ง ที่นี่เราจะต้องเป็นกรณีพิเศษบรรทัดสุดท้าย (เมื่อi=n) เพื่อให้เป็น 4 ยัติภังค์ที่สั้นกว่ามันจะเป็นอย่างอื่น
-5 ไบต์ขอบคุณไปที่แมวป่า
i,l,s;p(c,s){printf("%*c%*.*s%c\n",i-~i,c,l,l,s,c);}f(n){s=memset(malloc(5*n),45,5*n);l=1;for(i=n;i--;p('|',""))l+=4,n+~i?p(43,s):p(32,"_|_|_");p(43,s);}
i=int(input())