Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- str←⎕inp 'EOF'
- <select>
- <option value="volvo">Volvo</option>
- <option value="saab">Saab</option>
- <option value="mercedes">Mercedes</option>
- <option value="audi">Audi</option>
- </select>
- EOF
- str←∊str
- '<>'⍳str
- 3 1 3 3 3 3 3 3 2 3 3 1 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 2 3 3 3 3 3 1 3
- 3 3 3 3 3 3 2 3 3 1 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 2 3 3 3 3 1 3 3
- 3 3 3 3 3 2 3 3 1 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 2 3 3 3 3
- 3 3 3 3 1 3 3 3 3 3 3 3 2 3 3 1 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 3 2 3
- 3 3 3 1 3 3 3 3 3 3 3 2 1 3 3 3 3 3 3 3 2 3
- (1 ¯1 0)['<>'⍳str]
- 0 1 0 0 0 0 0 0 ¯1 0 0 1 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 ¯1 0 0 0 0 0 1
- 0 0 0 0 0 0 0 ¯1 0 0 1 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 ¯1 0 0 0 0 1
- 0 0 0 0 0 0 0 ¯1 0 0 1 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 ¯1 0
- 0 0 0 0 0 0 0 1 0 0 0 0 0 0 0 ¯1 0 0 1 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0
- 0 0 ¯1 0 0 0 0 1 0 0 0 0 0 0 0 ¯1 1 0 0 0 0 0 0 0 ¯1 0
- +\(1 ¯1 0)['<>'⍳str]
- 0 1 1 1 1 1 1 1 0 0 0 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 0 0 0 0 0 0 1 1
- 1 1 1 1 1 1 0 0 0 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 0 0 0 0 0 1 1 1
- 1 1 1 1 1 0 0 0 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 0 0 0 0 0
- 0 0 0 0 1 1 1 1 1 1 1 1 0 0 0 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 1 0 0
- 0 0 0 1 1 1 1 1 1 1 1 0 1 1 1 1 1 1 1 1 0 0
- ~+\(1 ¯1 0)['<>'⍳str]
- 1 0 0 0 0 0 0 0 1 1 1 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 1 1 1 1 1 1 0 0
- 0 0 0 0 0 0 1 1 1 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 1 1 1 1 1 0 0 0
- 0 0 0 0 0 1 1 1 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 1 1 1 1 1
- 1 1 1 1 0 0 0 0 0 0 0 0 1 1 1 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 0 1 1
- 1 1 1 0 0 0 0 0 0 0 0 1 0 0 0 0 0 0 0 0 1 1
- ((~+\(1 ¯1 0)['<>'⍳str])⊂str)
- ╔═════════════════════════════════════════════════════════════════════════╗
- ║┏→┓ ┏→━━┓ ┏→━━━━━┓ ┏→━━┓ ┏→━━━━┓ ┏→━━┓ ┏→━━━━━━━━┓ ┏→━━┓ ┏→━━━━┓ ┏→┓ ┏→━┓║
- ║┃ ┃ ┃> ┃ ┃>Volvo┃ ┃> ┃ ┃>Saab┃ ┃> ┃ ┃>Mercedes┃ ┃> ┃ ┃>Audi┃ ┃>┃ ┃> ┃║
- ║┗━┛ ┗━━━┛ ┗━━━━━━┛ ┗━━━┛ ┗━━━━━┛ ┗━━━┛ ┗━━━━━━━━━┛ ┗━━━┛ ┗━━━━━┛ ┗━┛ ┗━━┛║
- ╚═════════════════════════════════════════════════════════════════════════╝
- (((~+\(1 ¯1 0)['<>'⍳str])⊂str)~¨' ')
- ╔════════════════════════════════════════════════════════════════╗
- ║┏⊖┓ ┏→┓ ┏→━━━━━┓ ┏→┓ ┏→━━━━┓ ┏→┓ ┏→━━━━━━━━┓ ┏→┓ ┏→━━━━┓ ┏→┓ ┏→┓║
- ║┃ ┃ ┃>┃ ┃>Volvo┃ ┃>┃ ┃>Saab┃ ┃>┃ ┃>Mercedes┃ ┃>┃ ┃>Audi┃ ┃>┃ ┃>┃║
- ║┗━┛ ┗━┛ ┗━━━━━━┛ ┗━┛ ┗━━━━━┛ ┗━┛ ┗━━━━━━━━━┛ ┗━┛ ┗━━━━━┛ ┗━┛ ┗━┛║
- ╚════════════════════════════════════════════════════════════════╝
- (((~+\(1 ¯1 0)['<>'⍳str])⊂str)~¨' ')~⊂,'>'
- ╔════════════════════════════════════════╗
- ║┏⊖┓ ┏→━━━━━┓ ┏→━━━━┓ ┏→━━━━━━━━┓ ┏→━━━━┓║
- ║┃ ┃ ┃>Volvo┃ ┃>Saab┃ ┃>Mercedes┃ ┃>Audi┃║
- ║┗━┛ ┗━━━━━━┛ ┗━━━━━┛ ┗━━━━━━━━━┛ ┗━━━━━┛║
- ╚════════════════════════════════════════╝
- 1↓(((~+\(1 ¯1 0)['<>'⍳str])⊂str)~¨' ')~⊂,'>'
- ╔════════════════════════════════════╗
- ║┏→━━━━━┓ ┏→━━━━┓ ┏→━━━━━━━━┓ ┏→━━━━┓║
- ║┃>Volvo┃ ┃>Saab┃ ┃>Mercedes┃ ┃>Audi┃║
- ║┗━━━━━━┛ ┗━━━━━┛ ┗━━━━━━━━━┛ ┗━━━━━┛║
- ╚════════════════════════════════════╝
- 1↓¨1↓(((~+\(1 ¯1 0)['<>'⍳str])⊂str)~¨' ')~⊂,'>'
- ╔════════════════════════════════╗
- ║┏→━━━━┓ ┏→━━━┓ ┏→━━━━━━━┓ ┏→━━━┓║
- ║┃Volvo┃ ┃Saab┃ ┃Mercedes┃ ┃Audi┃║
- ║┗━━━━━┛ ┗━━━━┛ ┗━━━━━━━━┛ ┗━━━━┛║
- ╚════════════════════════════════╝
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement