Loops/While: Difference between revisions
Content added Content deleted
(+factor) |
|||
| Line 63: | Line 63: | ||
repeat drop ; |
repeat drop ; |
||
1024 halving |
1024 halving |
||
=={{header|Factor}}== |
|||
1024 [ dup 0 > ] [ dup . 2 /i ] [ drop ] while |
|||
=={{header|Fortran}}== |
=={{header|Fortran}}== |
||