100 doors: Difference between revisions
Content added Content deleted
(Added Idris Solution) |
m (→{{header|Oforth}}: Word syntax update) |
||
| Line 5,340: | Line 5,340: | ||
=={{header|Oforth}}== |
=={{header|Oforth}}== |
||
<lang Oforth> |
<lang Oforth>: doors |
||
{ |
|||
| i j l | |
| i j l | |
||
ListBuffer initValue(100, false) ->l |
ListBuffer initValue(100, false) ->l |
||
100 loop: i [ |
100 loop: i [ |
||
i 100 i step: j [ l put(j, l at(j) not) ] |
i 100 i step: j [ l put(j, l at(j) not) ] |
||
] |
] |
||
l println |
l println ; |
||
</lang> |
|||
=={{header|ooRexx}}== |
=={{header|ooRexx}}== |
||