สร้างทอร์นาโด

31

พายุทอร์นาโดมีหน้าตาแบบนี้

########
#######
 ######
  #####
   ####
   ###
    ##
     #

พายุทอร์นาโดนี้เริ่มต้นด้วยความกว้างnและในแต่ละบรรทัดถัดไปตัวละครจะถูกลบออกจากด้านซ้ายหรือด้านขวาขึ้นอยู่กับอินพุต

อินพุต

อินพุตจะเป็นรายการของค่าที่ไม่ซ้ำกันสองค่าใด ๆ (สตริงของอักขระที่ไม่ซ้ำสองตัวทำงานเช่นกัน) และจำนวนเต็มบวกที่เป็นตัวเลือกเพื่อระบุความกว้างเริ่มต้น หากไม่ได้เลือกจำนวนเต็มความกว้างเริ่มต้นคือ 1 มากกว่าความยาวของรายการ nขอให้เริ่มต้นความกว้าง

วิธีทำทอร์นาโด

ในตัวอย่างของฉันฉันเลือกรายการที่จะมี 1 s และ0s แม้ว่าคุณอาจเลือกค่าคงที่ที่แตกต่างกันสองค่าหรือสตริงของอักขระคงที่ที่แตกต่างกันสองตัว

แถวแรกจะประกอบด้วย nอักขระที่ไม่ใช่ช่องว่าง (คุณสามารถเลือกอักขระที่สอดคล้องกันได้ฉันเลือก#ตัวอย่าง)

จากนั้นสำหรับแต่ละหมายเลขในรายการถ้าเป็นหมายเลข 0ให้ลบอักขระด้านซ้ายและสร้างแถวใหม่ ถ้าเป็น1ให้ลบตัวอักษรที่ถูกต้องออกและสร้างแถวใหม่

ดังนั้นพายุทอร์นาโดข้างต้นคือผลลัพธ์สำหรับ 8, [1, 0, 0, 0, 1, 0, 0]ดังนั้นทอร์นาโดข้างต้นเป็นผลลัพธ์สำหรับ

เอาท์พุต

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

กรณีทดสอบ

testcases 1, 0เหล่านี้รวมถึงความกว้างและการใช้งานเริ่มต้นรายการ

5, [1,0,0,1]

#####
####
 ###
  ##
  #

10, [1,0,0,1,0,1,0,0,1]

##########
#########
 ########
  #######
  ######
   #####
   ####
    ###
     ##
     #

7, [1,1,1,1,1,1]

#######
######
#####
####
###
##
#

100,
 [1,0,0,0,0,1,0,0,0,1,1,0,1,0,0,1,0,0,1,0,0,1,1,0,1,1,1,1,0,1,0,1,1,0,0,1,0,1,1,0,0,1,1,1,0,0,1,1,1,1,1,0,0,0,1,1,0,1,0,0,1,1,1,1,1,1,1,1,1,1,0,1,1,0,0,0,0,1,0,0,0,0,1,1,1,1,0,1,0,1,0,0,1,1,0,0,0,0,1]

กรณีทดสอบที่ยาวนาน

กฎระเบียบ

  • ช่องโหว่มาตรฐานใช้
  • รหัสที่สั้นที่สุดเป็นไบต์ชนะ! รหัสกอล์ฟ
  • พื้นหลังไม่จำเป็นต้องเว้นวรรค (ฉันลืมระบุก่อนหน้านี้)
  • ภาษาของคุณจะต้องรองรับตัวเลข (ความกว้าง) ที่สามารถรองรับได้ แต่หากล่ามของคุณถูกเขียนใหม่ด้วยขนาดตัวเลขที่ใหญ่กว่าก็จะต้องทำงานในทางทฤษฎี

การดำเนินการอ้างอิง

code-golf  ascii-art 
— HyperNeutrino
แหล่งที่มา
3
ดูเหมือนว่าจากตัวอย่างของคุณที่เริ่มต้นด้วยจะเป็น 1 มากกว่าความยาวของรายการ เราสามารถมีตัวอย่างที่ไม่เป็นเช่นนั้น? ความกว้างเริ่มต้นอาจน้อยกว่าความยาวของรายการหรือไม่
— Charlie
@CarlosAlejo ไม่ ... ที่ไม่เหมาะสมแล้วเพราะคุณจะไม่มีองค์ประกอบเพียงพอที่จะเอาออกในตอนท้าย ...
— HyperNeutrino
4
แว่นตาที่ @HyperNeutrino เคยเห็นพายุทอร์นาโดครั้งแรกของเขา: i.imgur.com/TzMm94a.png
— Magic Octopus Urn
@MagicOctopusUrn ... lol
— HyperNeutrino

คำตอบ:

9

Python 2 , 66 59 ไบต์

-7 ไบต์ขอบคุณ Arnold Palmer 

x,z=input()
for i in range(x):print' '*sum(z[:i])+'#'*(x-i)

ลองออนไลน์!

0เพื่อลบจากด้านขวา1เพื่อลบจากด้านซ้าย

— คัน
แหล่งที่มา
1
ninja'd me: (((
— Koishore Roy
คนเดียวกันที่นี่: /
— อาร์โนลด์พาลเมอร์
บันทึก 7 ไบต์โดยแทนที่len(z)+1ด้วยxถ้า "จำนวนเต็มบวกตัวเลือก" หมายความว่าคุณไม่จำเป็นต้องใช้มัน การใช้ถ้อยคำของคำถามทำให้ดูเหมือนว่าเป็นสิ่งที่ได้รับอนุญาตเพราะมันบอกว่า "ถ้าไม่ได้ใช้จำนวนเต็มเสริม" กับ "ถ้าไม่ได้รับจำนวนเต็มที่เลือก"
— Arnold Palmer
6

เป็นกลุ่ม, 85 82 ไบต์

o"cp:s/#/ <C-v><CR>0"cy$<ESC>"ayy7hR$/<ESC>"bdd:s/[][, ]\+/<C-v><CR>@/g<CR>ggAa#<C-v><ESC><ESC>^D@"^"cy$:2,$:norm D@"

<ESC>เป็น 0x1b, <CR>คือ0x0D, <C-v>คือ 0x16 และ<ESC>OHเป็นลำดับหลายไบต์แทนปุ่มหน้าแรก

อินพุตใช้aเป็นค่า "ลบซ้าย" และbเป็นค่า "ลบสิทธิ์"

" @a will remove from the left; @b will remove from the right.
o"cp:s/#/ <C-v><CR>0"cy$<ESC>"ayy
7hR$/<ESC>"bdd

" split the input into digestible chunks
:s/[][, ]\+/<C-v><CR>@/g<CR>
gg

" Create the first line
Aa#<C-v><ESC><ESC>
^D
@"^"cy$

" Create tornado
:2,$:norm D@"

ไม่มีลิงก์ TIO โชคไม่ดี ฉันไม่สามารถทำให้มันทำงานภายใต้โวลต์ทดสอบได้โดยการคัดลอกโค้ดไปยัง tornado.vim (แทนที่<ESC>ฯลฯ ด้วยไบต์จริงของพวกเขา) และทำงานดังนี้:

$ echo '8, [b, a, a, a, b, a, a]' > a.txt
$ { cat tornado.vim; echo ':wq'; } | vim a.txt
$ cat a.txt

-3 ไบต์เนื่องจากข้อเสนอแนะของนีล

— รังสี
แหล่งที่มา
คุณไม่สามารถใช้^แทนได้␛OHหรือไม่?
— Neil
@Neil ^ไปที่อักขระที่ไม่ใช่ช่องว่างตัวแรก ␛OHไปที่ตัวอักษรตัวแรก
— Ray
1
อ่าขอโทษฉันหมายถึงฉัน0ไม่ได้ ...
— นีล
@ Neil ในกรณีนี้ใช่ฉันควรทำเช่นนั้น ขอบคุณ
— Ray
5

05AB1E , 11 9 ไบต์

-2 ไบต์ขอบคุณErik the Outgolfer

0×=²v¨yú=

ลบออกจากซ้าย: 1
ลบออกจากขวา:0

ลองออนไลน์!

0×        # Make a string of n 0s
  =       # Print without popping
   ²v     # For each character in input (call it y):
     ¨    #   Remove the last character of the current string
      yú  #   Pad with y spaces
        = #   Print without popping
— ไรลีย์
แหล่งที่มา
0×ηsηOมีศักยภาพมาก แต่ฉันไม่สามารถหาได้ต่ำกว่า 11 ไบต์
— Magic Octopus Urn
เก็บรุ่นหลังและแทนที่ðy×ìด้วยyúสำหรับ -2
— Erik the Outgolfer
4

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

.?
$`#$&$'¶
T`d`#`#.*
T`d` _

ลองออนไลน์! รับค่าสตริง 0 และ 1 เท่านั้นและคำนวณความกว้างตามสตริง คำอธิบาย: สเตจแรกใช้สตริงอินพุตและทำซ้ำหนึ่งครั้งสำหรับแต่ละจุดขอบเขตโดยแทรก a #ที่จุดนั้น ขั้นตอนที่สองจะเปลี่ยนตัวเลขทั้งหมดหลังจากนั้นเป็นs #เพิ่มเติม#สร้างสามเหลี่ยม จากนั้น stange ที่สามจะลบส่วนที่เหลือทั้งหมดและเปลี่ยนค่าศูนย์เป็นช่องว่างซึ่งส่งผลให้เกิด

— นีล
แหล่งที่มา
3

J, 32 ไบต์

' #'#~[:(],.1+i.@-@#)0,(+/\@:-.)

ungolfed

' #'#~ [: ( ] ,. 1+i.@-@# )  0 , (+/\ @: -.)

ลองออนไลน์!

— โยนาห์
แหล่งที่มา
19 ไบต์' #'#~0(,.#\.)@,+/\ซึ่งอินพุทกลับด้านจากตัวอย่างเนื่องจากความท้าทายช่วยให้คุณสามารถเลือกค่าที่แตกต่างกันสองค่า
— ไมล์
@miles ty สำหรับสิ่งนี้และความคิดเห็นอื่นของคุณ ขอบคุณพวกเขาจริงๆและโปรดให้พวกเขามา
— โยนาห์
3

R , 85 82 ไบต์

บันทึกได้ 3 ไบต์ด้วย Giuseppe

function(n,l)for(k in 1:n)cat(rep(" ",sum(c(0,l)[1:k])),rep("%",n-k+1),"
",sep="")

ลองออนไลน์!

คำอธิบาย:

function(n,l){
  for(k in 1:n){                      # Proceed line by line
    cat(                              # Concatenate...
        rep(" ",sum(c(0,l)[1:k])),    # ...required number of leading spaces,...
        rep("%",n-k+1),               # ...required number of tornado characters...
        "\n",                         # ...and a new line.
        sep=""                        # Join without spaces
        )
  }
}
— user2390246
แหล่งที่มา
ฉันรู้ว่าการสร้างเมทริกซ์ไม่ใช่ตัวเลือกที่ดีที่สุด!
— Giuseppe
1
82 ไบต์ - โกน{}และใช้บรรทัดใหม่ตามตัวอักษรแทน'\n'
— Giuseppe
3

Haskell, 50 ไบต์

h n=scanl(\s i->[(' ':),id]!!i$init s)$'#'<$[1..n]

ลองออนไลน์!

หากรายการอินพุตสามารถเป็นรายการชื่อฟังก์ชั่นเราสามารถบันทึกไบต์

Haskell, 49 ไบต์

f=id
g=(' ':)
h n=scanl(flip id.init)$'#'<$[1..n]

ตัวอย่างการใช้: h 5 [g,f,f,g].

ลองออนไลน์!

มันทำงานอย่างไร:

           '#'<$[1..n]   -- build the first line of the tornado, i.e. n times '#'
scanl(    )              -- repeatedly apply the given function to the starting
                         -- value and the next element of the input list and
                         -- return a list of the intermediate results
  \s i->                 -- the function takes a string s and a number i
            init s       -- and first drops the last element of s
      [    ]!!i          -- and then picks and apply a funtion from the list
        (' ':)           --  i = 0:  prepend a space
        id               --  i = 1:  do nothing
— Nimi
แหล่งที่มา
2

Python 2, 58 57 ไบต์

แก้ไข: บันทึกแล้ว 1 ไบต์ขอบคุณ xnor

l,a=input()
s="#"*l
for i in a+[0]:print s;s=" "*i+s[:-1]

ลองออนไลน์!

1 เพื่อลบจากด้านซ้าย 0 เพื่อลบจากด้านขวา

— CensoredUsername
แหล่งที่มา
1
ฉันคิดว่าคุณสามารถs=" "*i+s[:-1]สลับซ้ายและขวาได้
— xnor
2

R , 116 109 102 ไบต์

-5 ไบต์ขอบคุณ user2390246 (และอีก 2 ฉันบันทึกตัวเอง)

outgolfed โดยผู้ใช้ 2390246

function(n,l){k=cumsum
m=matrix(' ',n,n)
for(i in 1:n)m[k(c(1,!l))[i]:k(c(n,-l))[i],i]='#'
write(m,'',n,,'')}

ลองออนไลน์!

ส่งคืนฟังก์ชันที่ไม่ระบุชื่อที่ใช้nและเวกเตอร์ที่lมี0สำหรับการลบจากด้านซ้ายและ1สำหรับการลบออกจากด้านขวาและพิมพ์ผลลัพธ์ไปยังคอนโซลด้วยการจัดรูปแบบที่เหมาะสม

— จูเซปเป้
แหล่งที่มา
1
คุณสามารถบันทึกเล็กน้อยในการคำนวณจุดสิ้นสุดของบรรทัดเนื่องจากคุณรู้ว่าจำนวน#s จะเป็น n-i + 1: ลองออนไลน์! แม้ว่าจะมีวิธีการที่ดีกว่านี้เล็กน้อยถ้าคุณพิมพ์ทีละบรรทัดแทนที่จะสร้างเมทริกซ์: codegolf.stackexchange.com/a/133720/66252
— user2390246
@ user2390246 ดีมาก! ฉันจัดการเพื่อโกนคู่ของไบต์อีกเช่นกัน :)
— จูเซปเป้
2

Japt , 14 13 ไบต์

-1 ไบต์ขอบคุณ @ETH

å+ uP £X+QpV´

อินพุตคืออาร์เรย์จากนั้นขนาด ค่า Array เป็น""หรือ" "ซึ่งเป็นตัวแทนการนำออกจากด้านขวาหรือซ้ายตามลำดับ ใช้"แทน#และส่งกลับเป็นอาร์เรย์ของสตริง

ความคิดที่นี่คือการสร้างอาร์เรย์ของช่องว่างภายในด้านซ้ายครั้งแรกสำหรับแต่ละบรรทัดดังนั้นสตริงอินพุต จากนั้นแต่ละบรรทัดจะได้รับ"s เพิ่มโดยใช้ความจริงที่ว่าจำนวน"s ลดลง 1 ในแต่ละครั้ง

ลองออนไลน์!

สิ่งเหล่านี้ใช้-Rแฟล็กเพื่อจัดรูปแบบเอาต์พุตโดยการรวมกับบรรทัดใหม่

คำอธิบาย

å+ uP £X+QpYnV

โดยนัย: U= อาร์เรย์Vอินพุต = จำนวนอินพุต

å+ uP

ลดอาร์เรย์อินพุต ( å) พร้อมกับการต่อสตริง ( +) สิ่งนี้ส่งผลให้เกิดอาร์เรย์ของค่ากลางแต่ละค่าของการลดลง จากนั้น prepend ( u) สตริงว่าง ( P) ไปยังอาร์เรย์

£X+

แมป£แต่ละค่ากับตัวเอง ( X) ตัดแบ่งด้วย ...

QpV´

อักขระเครื่องหมายคำพูด ( Q) ซ้ำ ( p) V--( V´) ครั้ง สิ่งนี้จะลดลงVทุกครั้ง

— Justin Mariner
แหล่งที่มา
สิ่งที่ดี. ฉันคิดว่าคุณสามารถบันทึกไบต์ได้โดยเปลี่ยนYnVเป็นV´
— ETHproductions
@ETHproductions ยอดเยี่ยมขอบคุณ! ฉันลืมเกี่ยวกับการใช้++หรือ--ใน Japt
— Justin Mariner
2

ArnoldC , 3132 ไบต์

ArnoldC ไม่มีการต่อสายสตริงดังนั้นสิ่งนี้จึงสร้างพายุทอร์นาโดออกจาก8s และใช้1s เพื่อแบ่งพื้นที่ออก ArnoldC รองรับเฉพาะจำนวนเต็มสูงสุด 16 บิตดังนั้นจึงล้นด้วยอินพุตที่ยาวกว่า 7 หลัก (ดังนั้นมันจะสร้างพายุทอร์นาโดขนาดเล็ก)

1 เหลือหลักอื่น ๆ ที่ถูกต้อง (แม้ว่าฉันจะไม่แนะนำ 0เนื่องจากคุณไม่สามารถเริ่มต้นด้วยที่)

การป้อนข้อมูล: 1221122

เอาท์พุท:

88888888
18888888
18888881
18888811
11888811
11188811
11188111
11181111

รหัส Golfed:

IT'S SHOWTIME
HEY CHRISTMAS TREE d
YOU SET US UP 0
HEY CHRISTMAS TREE e
YOU SET US UP 0
HEY CHRISTMAS TREE m
YOU SET US UP 0
GET YOUR ASS TO MARS m
DO IT NOW
I WANT TO ASK YOU A BUNCH OF QUESTIONS AND I WANT TO HAVE THEM ANSWERED IMMEDIATELY
HEY CHRISTMAS TREE l
YOU SET US UP 0
GET YOUR ASS TO MARS l
DO IT NOW g m
DO IT NOW h l m
YOU HAVE BEEN TERMINATED
LISTEN TO ME VERY CAREFULLY g
I NEED YOUR CLOTHES YOUR BOOTS AND YOUR MOTORCYCLE m
GIVE THESE PEOPLE AIR
HEY CHRISTMAS TREE i
YOU SET US UP 2
HEY CHRISTMAS TREE n
YOU SET US UP m
STICK AROUND n
GET TO THE CHOPPER n
HERE IS MY INVITATION n
HE HAD TO SPLIT 10
ENOUGH TALK
BECAUSE I'M GOING TO SAY PLEASE n
GET TO THE CHOPPER i
HERE IS MY INVITATION i
GET UP 1
ENOUGH TALK
YOU HAVE NO RESPECT FOR LOGIC
CHILL
I'LL BE BACK i
HASTA LA VISTA, BABY
LISTEN TO ME VERY CAREFULLY h
I NEED YOUR CLOTHES YOUR BOOTS AND YOUR MOTORCYCLE l
I NEED YOUR CLOTHES YOUR BOOTS AND YOUR MOTORCYCLE m
GIVE THESE PEOPLE AIR
HEY CHRISTMAS TREE o
YOU SET US UP -2
GET TO THE CHOPPER o
HERE IS MY INVITATION o
GET UP l
ENOUGH TALK
HEY CHRISTMAS TREE k
YOU SET US UP 1
STICK AROUND o
GET TO THE CHOPPER k
HERE IS MY INVITATION k
YOU'RE FIRED 10
ENOUGH TALK
GET TO THE CHOPPER o
HERE IS MY INVITATION o
GET DOWN 1
ENOUGH TALK
CHILL
HEY CHRISTMAS TREE p
YOU SET US UP 0
HEY CHRISTMAS TREE f
YOU SET US UP 0
HEY CHRISTMAS TREE i
YOU SET US UP 0
HEY CHRISTMAS TREE q
YOU SET US UP l
HEY CHRISTMAS TREE d
YOU SET US UP 0
HEY CHRISTMAS TREE e
YOU SET US UP 1
HEY CHRISTMAS TREE a
YOU SET US UP 0
HEY CHRISTMAS TREE b
YOU SET US UP 0
HEY CHRISTMAS TREE c
YOU SET US UP l
STICK AROUND q
GET TO THE CHOPPER i
HERE IS MY INVITATION 0
ENOUGH TALK
GET TO THE CHOPPER a
HERE IS MY INVITATION d
ENOUGH TALK
GET TO THE CHOPPER b
HERE IS MY INVITATION e
ENOUGH TALK
GET TO THE CHOPPER c
HERE IS MY INVITATION l
ENOUGH TALK
STICK AROUND c
BECAUSE I'M GOING TO SAY PLEASE a
GET TO THE CHOPPER i
HERE IS MY INVITATION i
GET UP 1
YOU'RE FIRED 10
ENOUGH TALK
GET TO THE CHOPPER a
HERE IS MY INVITATION a
GET DOWN 1
ENOUGH TALK
BULLSHIT
GET TO THE CHOPPER f
HERE IS MY INVITATION b
LET OFF SOME STEAM BENNET c
ENOUGH TALK
BECAUSE I'M GOING TO SAY PLEASE f
GET TO THE CHOPPER i
HERE IS MY INVITATION i
GET UP 1
YOU'RE FIRED 10
ENOUGH TALK
BULLSHIT
GET TO THE CHOPPER i
HERE IS MY INVITATION i
GET UP 8
YOU'RE FIRED 10
ENOUGH TALK
YOU HAVE NO RESPECT FOR LOGIC
YOU HAVE NO RESPECT FOR LOGIC
GET TO THE CHOPPER c
HERE IS MY INVITATION c
GET DOWN 1
ENOUGH TALK
CHILL
GET TO THE CHOPPER i
HERE IS MY INVITATION i
HE HAD TO SPLIT 10
ENOUGH TALK
TALK TO THE HAND i
GET TO THE CHOPPER q
HERE IS MY INVITATION q
GET DOWN 1
ENOUGH TALK
GET TO THE CHOPPER p
HERE IS MY INVITATION m
HE HAD TO SPLIT k
I LET HIM GO 10
ENOUGH TALK
GET TO THE CHOPPER k
HERE IS MY INVITATION k
HE HAD TO SPLIT 10
ENOUGH TALK
GET TO THE CHOPPER f
HERE IS MY INVITATION p
YOU ARE NOT YOU YOU ARE ME 1
ENOUGH TALK
BECAUSE I'M GOING TO SAY PLEASE f
GET TO THE CHOPPER d
HERE IS MY INVITATION d
GET UP 1
ENOUGH TALK
BULLSHIT
GET TO THE CHOPPER e
HERE IS MY INVITATION e
GET UP 1
ENOUGH TALK
YOU HAVE NO RESPECT FOR LOGIC
CHILL
I'LL BE BACK i
HASTA LA VISTA, BABY

ลองออนไลน์!

รหัสที่ไม่ได้รับ (5178 ไบต์):

IT'S SHOWTIME
    HEY CHRISTMAS TREE left
        YOU SET US UP 0
    HEY CHRISTMAS TREE right
        YOU SET US UP 0
    HEY CHRISTMAS TREE input
        YOU SET US UP 0
        GET YOUR ASS TO MARS input
        DO IT NOW
        I WANT TO ASK YOU A BUNCH OF QUESTIONS AND I WANT TO HAVE THEM ANSWERED IMMEDIATELY
    HEY CHRISTMAS TREE width
    YOU SET US UP 0
    GET YOUR ASS TO MARS width
    DO IT NOW calcwidth input
    DO IT NOW buildline width input
YOU HAVE BEEN TERMINATED

LISTEN TO ME VERY CAREFULLY calcwidth
    I NEED YOUR CLOTHES YOUR BOOTS AND YOUR MOTORCYCLE input
    GIVE THESE PEOPLE AIR
    HEY CHRISTMAS TREE result
    YOU SET US UP 2
    HEY CHRISTMAS TREE calc
    YOU SET US UP input
    STICK AROUND calc
        GET TO THE CHOPPER calc
        HERE IS MY INVITATION calc
        HE HAD TO SPLIT 10
        ENOUGH TALK
        BECAUSE I'M GOING TO SAY PLEASE calc
            GET TO THE CHOPPER result
        HERE IS MY INVITATION result
        GET UP 1
        ENOUGH TALK
    YOU HAVE NO RESPECT FOR LOGIC
    CHILL
    I'LL BE BACK result
HASTA LA VISTA, BABY

LISTEN TO ME VERY CAREFULLY buildline
    I NEED YOUR CLOTHES YOUR BOOTS AND YOUR MOTORCYCLE width
    I NEED YOUR CLOTHES YOUR BOOTS AND YOUR MOTORCYCLE input
    GIVE THESE PEOPLE AIR

    HEY CHRISTMAS TREE ctr
        YOU SET US UP -2
        GET TO THE CHOPPER ctr
            HERE IS MY INVITATION ctr
            GET UP width
        ENOUGH TALK
    HEY CHRISTMAS TREE mask
        YOU SET US UP 1
        STICK AROUND ctr
            GET TO THE CHOPPER mask
                HERE IS MY INVITATION mask
                YOU'RE FIRED 10
            ENOUGH TALK
            GET TO THE CHOPPER ctr
                HERE IS MY INVITATION ctr
                GET DOWN 1
            ENOUGH TALK
        CHILL
    HEY CHRISTMAS TREE digit
        YOU SET US UP 0
    HEY CHRISTMAS TREE decider
        YOU SET US UP 0
    HEY CHRISTMAS TREE result
        YOU SET US UP 0
    HEY CHRISTMAS TREE lines
        YOU SET US UP width
    HEY CHRISTMAS TREE left
        YOU SET US UP 0
    HEY CHRISTMAS TREE right
        YOU SET US UP 1
    HEY CHRISTMAS TREE leftcounter
        YOU SET US UP 0
    HEY CHRISTMAS TREE rightcounter
        YOU SET US UP 0
    HEY CHRISTMAS TREE widthcounter
    YOU SET US UP width
    STICK AROUND lines
        GET TO THE CHOPPER result
            HERE IS MY INVITATION 0
        ENOUGH TALK
        GET TO THE CHOPPER leftcounter
            HERE IS MY INVITATION left
        ENOUGH TALK
        GET TO THE CHOPPER rightcounter
            HERE IS MY INVITATION right
        ENOUGH TALK
        GET TO THE CHOPPER widthcounter
            HERE IS MY INVITATION width
        ENOUGH TALK
        STICK AROUND widthcounter
            BECAUSE I'M GOING TO SAY PLEASE leftcounter
                GET TO THE CHOPPER result
                    HERE IS MY INVITATION result
                    GET UP 1
                    YOU'RE FIRED 10
                ENOUGH TALK
                GET TO THE CHOPPER leftcounter
                    HERE IS MY INVITATION leftcounter
                    GET DOWN 1
                ENOUGH TALK
            BULLSHIT
                GET TO THE CHOPPER decider
                    HERE IS MY INVITATION rightcounter
                    LET OFF SOME STEAM BENNET widthcounter
                ENOUGH TALK
                BECAUSE I'M GOING TO SAY PLEASE decider
                    GET TO THE CHOPPER result
                        HERE IS MY INVITATION result
                        GET UP 1
                        YOU'RE FIRED 10
                    ENOUGH TALK
                BULLSHIT
                    GET TO THE CHOPPER result
                        HERE IS MY INVITATION result
                        GET UP 8
                        YOU'RE FIRED 10
                    ENOUGH TALK
                YOU HAVE NO RESPECT FOR LOGIC
            YOU HAVE NO RESPECT FOR LOGIC

            GET TO THE CHOPPER widthcounter
                HERE IS MY INVITATION widthcounter
                GET DOWN 1
            ENOUGH TALK
        CHILL
        GET TO THE CHOPPER result
            HERE IS MY INVITATION result
            HE HAD TO SPLIT 10
        ENOUGH TALK
        TALK TO THE HAND result
        GET TO THE CHOPPER lines
            HERE IS MY INVITATION lines
            GET DOWN 1
        ENOUGH TALK
        GET TO THE CHOPPER digit
            HERE IS MY INVITATION input
            HE HAD TO SPLIT mask
            I LET HIM GO 10
        ENOUGH TALK
        GET TO THE CHOPPER mask
            HERE IS MY INVITATION mask
            HE HAD TO SPLIT 10
        ENOUGH TALK
        GET TO THE CHOPPER decider
            HERE IS MY INVITATION digit
            YOU ARE NOT YOU YOU ARE ME 1
        ENOUGH TALK
        BECAUSE I'M GOING TO SAY PLEASE decider
            GET TO THE CHOPPER left
                HERE IS MY INVITATION left
                GET UP 1
            ENOUGH TALK
        BULLSHIT
            GET TO THE CHOPPER right
                HERE IS MY INVITATION right
                GET UP 1
            ENOUGH TALK
        YOU HAVE NO RESPECT FOR LOGIC
    CHILL
    I'LL BE BACK result
HASTA LA VISTA, BABY
— TemporalWolf
แหล่งที่มา
น่าเสียดายที่ฉันไม่คิดว่าคำตอบนี้ถูกต้องเพราะมัน จำกัด การป้อนข้อมูลมากเกินไปและปรับเปลี่ยนผลลัพธ์ในแบบที่ไม่ได้รับอนุญาต (โดยใช้พื้นหลังที่ไม่ใช่ช่องว่าง) ขออภัย!
— HyperNeutrino
@HyperNeutrino ยุติธรรมพอนี่ดีเท่าที่คุณจะได้รับจาก ArnoldC
— TemporalWolf
นั่นเป็นโชคร้าย ขออภัยที่ต้องเสียเวลาและความพยายามของคุณ แต่ฉันเชื่อว่าคุณจะต้องลบสิ่งนี้เนื่องจากข้อกำหนดด้านความท้าทายไม่ถูกต้อง คุณสามารถถาม Meta ได้หากคุณเชื่อว่านี่เป็นตัวเลือกที่ผิดและชุมชนสามารถตัดสินใจได้ว่าจะทำอย่างไร ขอบคุณ :)
— HyperNeutrino
1
@HyperNeutrino ฉันไม่มั่นใจว่า ArnoldC จะไม่ถูกต้องโดยอัตโนมัติ: ใช้ได้กับทั้งช่วงของจำนวนเต็มที่ถูกต้องที่สนับสนุนโดย ArnoldC และไม่ใช่ "เหยียดหยาม" โดยใช้พื้นที่ขนาดเล็ก: ถ้าคุณเขียน 32 บิตสำหรับ ArnoldC คำตอบของฉัน จะทำงานโดยไม่มีการเปลี่ยนแปลงที่ความแม่นยำนั้น กฎไม่ได้ระบุข้อกำหนดสำหรับการขยายตัวของอักขระหรือความสูงขั้นต่ำของพายุทอร์นาโดซึ่งต้องทำให้สำเร็จ แต่ฉันจะเปิดคำถามเกี่ยวกับเมตาถ้าคุณต้องการ
— TemporalWolf
1
คุณถูก. ยุติธรรมเพียงพอ ฉันตัดสินผิด คำตอบที่ดี :)
— HyperNeutrino
1

C, 68 63 ไบต์

s;f(w,i)int*i;{for(;w;s+=!*i++)printf("%*s%0*d\n",s,"",w--,0);}

สิ่งนี้ทำให้การใช้ข้อกำหนดคุณสมบัติความกว้างของฟิลด์แบบไดนามิกในprintf()สตริงรูปแบบ ฟังก์ชั่นนี้เรียกว่า:

#include <stdio.h>

s;f(w,i)int*i;{for(;w;s+=!*i++)printf("%*s%0*d\n",s,"",w--,0);}

int main() {
    f(8, (int[]){1, 0, 0, 0, 1, 0, 0});
}
— cmaster
แหล่งที่มา
บันทึก 5 ไบต์โดยการถอดint s=0;และวางก่อนs; เช่นนั้นf(w,i)
— MD XF
1

JavaScript (ES6), 64 ไบต์

ฟังก์ชันที่ไม่ระบุชื่อรับพารามิเตอร์ในรูปแบบ currying (a) (b) ในอาร์เรย์ b สตริงว่างหมายถึงการนำออกจากด้านขวาและช่องว่างแสดงถึงการลบออกจากด้านซ้าย

a=>b=>b.reduce((t,v)=>t+'\n'+(a.pop(),p+=v)+a,a=Array(a+1),p='')

ใช้ 1 และ 0 เช่นในตัวอย่างคะแนนคือ 70

a=>b=>b.reduce((t,v)=>t+'\n'+(a.pop(),v?p:p+=' ')+a,a=Array(a+1),p='')

ทดสอบ

F=
a=>b=>b.reduce((t,v)=>t+'\n'+(a.pop(),p+=v)+a,a=Array(a+1),p='')

function update() {
  var b=B.value.match(/\d/g)
  
  if (b) {
    b=b.map(v=>+v?'':' ')
    O.textContent = F(b.length+1)(b)
  }
  else
    O.textContent = 'invalid input'
}

update()
  
Input B (0 and 1) <input id=B value='1001' oninput='update()'>
<pre id=O></pre>
ขยายตัวอย่างข้อมูล

— edc65
แหล่งที่มา
0

PowerShell , 53 ไบต์

param($a,$b)"#"*$a;0..$a|%{" "*($i+=$b[$_])+"#"*--$a}

ลองออนไลน์!

รับอินพุต$aเป็นจำนวนเต็มเผื่อเลือกและ$bเป็นอาร์เรย์ของ1และ0s (โปรดสังเกตว่าอาเรย์ของฉัน1และ0ถูกพลิกจากความท้าทาย) สร้างบรรทัดเริ่มต้น#และทิ้งสิ่งนั้นไว้บนไปป์ไลน์ แล้วลูปจากไป0 $aแต่ละซ้ำเราส่งออกเป็นจำนวนมากอาจ-เพิ่มขึ้นของการเว้นวรรคตามด้วยหมายเลขก่อน decremented #ของ ใช่นี่จะพ่นบรรทัดว่างท้ายขึ้นบรรทัดใหม่ในตอนท้ายเนื่องจากเราวนซ้ำไปเรื่อย ๆ$aมากกว่าจำนวนรายการในรายการ

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

— AdmBorkBork
แหล่งที่มา
0

C #, 181 ไบต์

n=>a=>{var r=new string[n];r[0]=new string('#',n);for(int i=1,p;i<n;++i){r[i]=r[i-1];p=a[i-1]?r[i].LastIndexOf('#'):r[i].IndexOf('#');r[i]=r[i].Remove(p,1).Insert(p," ");}return r;}

ลองออนไลน์!

เวอร์ชั่นเต็ม / ฟอร์แมต:

class P
{
    static void Main()
    {
        System.Func<int, System.Func<bool[], string[]>> f = n => a =>
        {
            var r=new string[n];
            r[0]=new string('#',n);

            for (int i = 1, p; i < n; ++i)
            {
                r[i] = r[i - 1];
                p = a[i - 1] ? r[i].LastIndexOf('#') : r[i].IndexOf('#');
                r[i] = r[i].Remove(p, 1).Insert(p, " ");
            }

            return r;
        };

        System.Console.WriteLine(string.Join("\n", f(5)(new[] { true, false, false, true })));

        System.Console.ReadLine();
    }
}
— TheLethalCoder
แหล่งที่มา
0

ถ่าน 17 ไบต์

ＦＮ«Ｐ×#⁺¹ι¿Ｉ§⮌ηι↑↖

ลองออนไลน์! ลิงก์คือโค้ดที่ละเอียดที่สุด คำอธิบาย:

ＦＮ«

อินพุตแรกให้จำนวนการวนซ้ำวนซ้ำ

Ｐ×#⁺¹ι

ตั้งแต่เริ่มต้นห่วงดัชนีให้เป็นศูนย์การจัดทำดัชนีเราเพิ่มอีกหนึ่งที่นี่เพื่อรับหมายเลขที่ถูกต้องของ#s

¿Ｉ§⮌ηι

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

↑

หากตัวเลขปัจจุบันคือ a 1ให้เลื่อนขึ้น สิ่งนี้ทำให้แถวก่อนหน้ามีค่าพิเศษ#ในตอนท้าย

↖

หากตัวเลขปัจจุบันคือ a 0ให้เลื่อนขึ้นและไปทางซ้าย สิ่งนี้ทำให้แถวก่อนหน้ามีส่วนเกิน#เมื่อเริ่มต้น

— นีล
แหล่งที่มา
0

C # , 159 ไบต์

using System.Linq;n=>a=>new[]{new string('#',n)}.Concat(a.Select((_,i)=>{var s=a.Take(i+1).Count(j=>j==0);var h=n-i-1;return new string('#',h).PadLeft(s+h);}))

คำอธิบาย

 new[] { new string('#', n) }                //start with n number of hashes
                .Concat(                     //append...
                    a.Select((_, i) =>       //    map each element of array
                    {
                        var s = a.Take(i + 1).Count(j => j == 0);  // count the number of 0's up to, and including, this point
                        var h = n - i - 1;                         // number of hashes for this step
                        return new string('#', h).PadLeft(s + h);  // number of hashes padded left with number of 0s
                    }));

ลองออนไลน์!

0

PHP, 136 ไบต์

$b=explode(',',end($argv));$a=$argc==3?$argv[1]:count($b)+1;$c=0;for(;$a;--$a){printf("% {$c}s%'#{$a}s\n",'','');$c+=!array_shift($b);}

บันทึกในไฟล์ PHP php file.php 8 '1,0,0,0,1,0,0'และการทดสอบด้วย เอาท์พุท:

########
#######
 ######
  #####
   ####
   ###
    ##
     #

อนิจจาการเตรียมอินพุตให้พร้อมครึ่งหนึ่งของงาน

รุ่นอื่น (158 ไบต์) ใช้str_repeatแทนprintfและ ... gotoจากทุกสิ่ง:

$b=explode(',',end($argv));$a=$argc==3?$argv[1]:count($b)+1;$c=0;z:
echo str_repeat(' ',$c).str_repeat('#',$a)."\n";while(--$a){$c+=!array_shift($b);goto z;}
— สะพานเหนือ
แหล่งที่มา
โดยการใช้ไซต์ของเรา หมายความว่าคุณได้อ่านและทำความเข้าใจนโยบายคุกกี้และนโยบายความเป็นส่วนตัวของเราแล้ว
Licensed under cc by-sa 3.0 with attribution required.