19 lines
408 B
Text
19 lines
408 B
Text
F gen(n)
|
||
V txt = [‘[’, ‘]’] * n
|
||
random:shuffle(&txt)
|
||
R txt.join(‘’)
|
||
|
||
F is_balanced(s)
|
||
V nesting_level = 0
|
||
L(c) s
|
||
S c
|
||
‘[’
|
||
nesting_level++
|
||
‘]’
|
||
I --nesting_level < 0
|
||
R 0B
|
||
R 1B
|
||
|
||
L(n) 0..9
|
||
V s = gen(n)
|
||
print(s‘’(‘ ’ * (20 - s.len))‘is ’(I is_balanced(s) {‘balanced’} E ‘not balanced’))
|