13 lines
225 B
Text
13 lines
225 B
Text
var doors = []
|
|
|
|
{ |pass|
|
|
{ |i|
|
|
if (pass `divides` i) {
|
|
doors[i] := false -> not!
|
|
}
|
|
} << 1..100
|
|
} << 1..100
|
|
|
|
{ |i|
|
|
say ("Door %3d is %s" % (i, doors[i] ? 'open' : 'closed'))
|
|
} << 1..100
|