Loops/While: Difference between revisions

move and update factor example
(→‎{{header|R}}: Added REBOL example.)
(move and update factor example)
Line 153:
i //= 2
}</lang>
 
=={{header|Factor}}==
<lang factor>1024 [ dup 0 > ] [ dup . 2 /i ] [while drop ] while</lang>
 
=={{header|FALSE}}==
Line 164 ⟶ 167:
repeat drop ;
1024 halving</lang>
 
=={{header|Factor}}==
<lang factor>1024 [ dup 0 > ] [ dup . 2 /i ] [ drop ] while</lang>
 
=={{header|Fortran}}==
Anonymous user