RosettaCodeData/Task/100-doors/Relation/100-doors.relation
2023-07-01 13:44:08 -04:00

14 lines
260 B
Text

relation door, state
set i = 1
while i <= 100
insert i, 1
set i = i+1
end while
set i = 2
while i <= 100
update state = 1-state where not (door mod i)
set i = i+1
end while
update state = "open" where state
update state = "closed" where state !== "open"
print