ฉันมีช็อคโกแลตบาร์และฉันต้องการความช่วยเหลือในการกินดังนั้นคุณจะสามารถเขียนโปรแกรมเพื่อทำสิ่งนั้นได้

คำอธิบาย

บรรทัดแรกคืออินพุต ตัวอย่างถูกคั่นด้วยบรรทัดว่าง

7
   ____
 __|__|
|__|__|
|__|__|
|__|__|

6
_______
|__|__|
|__|__|
|__|__|

5
   ____
 __|__|
|__|__|
|__|__|

0


1
   ____
   |__|

สเป็ค

หวังว่าตัวอย่างจะระบุความท้าทายนี้อย่างชัดเจน แต่เพื่อหลีกเลี่ยงความสับสนที่อาจเกิดขึ้นต่อไปนี้เป็นข้อมูลจำเพาะ:

คุณสามารถมีช่องว่างต่อท้าย / นำหน้าตัวเลือกเดียว

อินพุตของ0เป็นเอาต์พุตว่าง

หากอินพุตเป็นเลขคู่แถวบนสุดจะมีลักษณะดังนี้:

_______
|__|__|

ถ้ามันแปลกแถวบนสุดคือ:

   ____
   |__|

ถ้ามันแปลกและมากกว่า 1 แถวบนสุดคือ:

  ____
__|__|

แถวต่อไปนี้คือ:

|__|__|

จนกว่าจำนวนอินสแตนซ์ของ|__|จะเหมือนกันกับอินพุต

Pyth, 55 ไบต์

K"|__|"IQ>7<*3%Q2r"3 7_"9?tQjb+XW%Q2J+KtKZd*/tQ2]J+*3dK

ลองออนไลน์ ชุดทดสอบ

นี่มันเร็วและสกปรกจริงๆเขียนบนโทรศัพท์ของฉัน จะได้รับการเล่นกอล์ฟมากขึ้นในภายหลัง

Haskell, 101 ไบต์

Haskell ไม่เคยยอดเยี่ยมสำหรับการเล่นกอล์ฟรหัส ...

b="\n|__|__|"
h="   ____\n "
f 1=h++"  |__|"
f 2="_______"++b
f 3=h++"__|__|"++b
f n=f(n-2)++b
f _=""

JavaScript ES6, 80 ไบต์

x=>(x%2?`   ____
 ${x<2?"  ":"__"}|__|`:x?"_______":"")+`
|__|__|`.repeat(x/2)

ใช้เทคนิคเดียวกับคำตอบ Japt ของฉันและไม่แปลกใจอีกต่อไป ...

C, 104 102 ไบต์

f(x){x?x%2?printf("   ____\n%3s|__|\n",x<2?"":"__"):puts("_______"):0;for(x/=2;x>0;x--)puts("|__|__|");}

บางทีฉันอาจใช้เล่ห์เหลี่ยม printf เพื่อปรับปรุงสิ่งนี้ ...
เห็นได้ชัดว่าฉันทำได้

𝔼𝕊𝕄𝕚𝕟, 53 ตัวอักษร / 67 ไบต์

ï%2?`   ⟮__⟯Ⅰ
 ⦃ï<2?⍞  :⍞Ⅰ⦄|Ⅰ|`:ï?⍘_ď7:⬯⦄
|Ⅰ|Ⅰ|`ď ï/2

Try it here (Firefox only).

นี่ค่อนข้างคล้ายกับคำตอบ Javascript ES6 แม้ว่าฉันจะพบว่ามันเป็นอิสระ คำอธิบายมาถึงเมื่อฉันเล่นกอล์ฟจนจบ

PHP, 134 ตัวอักษร

<?$i=$argv[1];if($i>0){echo($i%2===0?"_______\n|__":"   ____\n".($i>1?"___":"   "))."|__|\n";echo str_repeat("|__|__|\n",($i-1)/2);}?>

หมายเหตุ:

• PHP ไม่ได้ถูกสร้างขึ้นสำหรับการเล่นกอล์ฟรหัส
• ฉันแน่ใจว่ามีความสนุกในการสร้างตัวอย่างนี้
• มันจะโยนข้อผิดพลาดถ้า argv ไม่ได้กำหนด
• ความช่วยเหลือใด ๆ ที่จะย่อมันชื่นชม

เรติน่า 69 ไบต์

r`(1?)1
$1__|__|¶
^__(?=\D{5}$)

^.
$0____¶ $0
^\D

^1
___
 ?1
|

ใช้อินพุตเป็น unary

ลองออนไลน์ได้ที่นี่

Japt, 60 57 ไบต์

U%2?[S³'_²²RSU¥1?S²:'_²"|__|"]¬:U?'_p7 :P +"
|__|__|"pU/2

เป็นเพียงคำตอบพื้นฐาน สามารถปรับปรุงได้ ทดสอบออนไลน์!