Loops/While: Difference between revisions

Content added Content deleted
m (=={{header|NS-HUBASIC}}== Family BASIC has been renamed to NS-HUBASIC, as that's the actual name of the programming language, with Family BASIC being the name of the BASIC interpreter.)
(Add LIL)
Line 1,351: Line 1,351:
wend
wend
end</lang>
end</lang>

=={{header|LIL}}==
<lang tcl>set num 1024; while {$num > 0} {print $num; set num [expr $num \ 2]}</lang>

Backslash is integer division, otherwise LIL would allow the division to go floating point.


=={{header|Lingo}}==
=={{header|Lingo}}==