3 lines
128 B
Text
3 lines
128 B
Text
for i <- 1..100
|
|
r = foldl1( \a, b -> a xor b, [(a|i) | a <- 1..100] )
|
|
println( i + ' ' + (if r then 'open' else 'closed') )
|