Loops/While: Difference between revisions
Added Agena
(Added FreeBASIC) |
(Added Agena) |
||
Line 109:
end loop;
end;</lang>
=={{header|Agena}}==
Tested with Agena 2.9.5 Win32
<lang agena>scope
local i := 1024;
while i > 0 do
print( i );
i := i \ 2
od
epocs</lang>
=={{header|Aime}}==
| |||