Loops/Do-while: Difference between revisions
Content deleted Content added
PascalABC.NET |
Add SmallBASIC |
||
Line 826:
30 PRINT X
40 IF X/6<>INT (X/6) THEN GOTO 20</syntaxhighlight>
==={{header|SmallBASIC}}===
<syntaxhighlight lang="qbasic">
repeat
v++
print v
until(v mod 6 == 0)
</syntaxhighlight>
==={{Header|Tiny BASIC}}===
|