4 lines
102 B
APL
4 lines
102 B
APL
⎕IO←0
|
||
p←{2⊥⍵∊'BR'}¨⊃⎕NGET'input'1
|
||
⌈/p ⍝ Part 1
|
||
⊢/(⍳⌈/p)~p ⍝ Part 2
|