Anonymous user
Loops/While: Difference between revisions
no edit summary
m (added ;Related tasks: section header.) |
No edit summary |
||
Line 722:
STOP
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}}==
| |||