100 doors: Difference between revisions
Content added Content deleted
(REBOL solution) |
|||
Line 1,383: | Line 1,383: | ||
<lang r>## optimized version... we only have to to up to the square root of 100 |
<lang r>## optimized version... we only have to to up to the square root of 100 |
||
seq(1,sqrt(100))**2</lang> |
seq(1,sqrt(100))**2</lang> |
||
=={{header|REBOL}}== |
|||
<lang rebol>doors: array/initial 100 'open |
|||
forskip doors 2 [ change next doors 'closed ] |
|||
doors: skip doors 2 |
|||
forskip doors 3 [ state: first doors poke doors 1 either state = 'open [ 'closed ] [ 'open ] ] |
|||
doors: head doors</lang> |
|||
=={{header|Ruby}}== |
=={{header|Ruby}}== |