Loops/While: Difference between revisions
Content added Content deleted
m (added ;Related tasks: section header.) |
No edit summary |
||
| Line 722: | Line 722: | ||
STOP |
STOP |
||
END</lang> |
END</lang> |
||
=={{header|Fortress}}== |
|||
<lang fortress> |
|||
component loops_while |
|||
export Executable |
|||
var i:ZZ32 = 1024 |
|||
run() = while i > 0 do |
|||
println(i) |
|||
i := i DIV 2 |
|||
end |
|||
end |
|||
</lang> |
|||
{{out}} |
|||
<pre> |
|||
1024 |
|||
512 |
|||
256 |
|||
128 |
|||
64 |
|||
32 |
|||
16 |
|||
8 |
|||
4 |
|||
2 |
|||
1 |
|||
</pre> |
|||
=={{header|FreeBASIC}}== |
=={{header|FreeBASIC}}== |
||