Loops/While: Difference between revisions
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.
Childishbeat (talk | contribs) m (→{{header|Family BASIC}}: A Family BASIC example for Loops/While has been added.) |
Childishbeat (talk | contribs) 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.) |
||
Line 835:
<lang false>1024[$0>][$."
"2/]#%</lang>
=={{header|Family BASIC}}==▼
<lang Family BASIC>10 I=1024▼
20 IF I=0 THEN END▼
30 PRINT I▼
40 I=I/2▼
50 GOTO 20</lang>▼
=={{header|Fantom}}==
Line 1,698 ⟶ 1,691:
echo(n)
n = n div 2</lang>
▲20 IF I=0 THEN END
▲30 PRINT I
▲40 I=I/2
▲50 GOTO 20</lang>
=={{header|Oberon-2}}==
| |||