Anonymous user
Loops/While: Difference between revisions
→{{header|Nascom BASIC}}
Puppydrum64 (talk | contribs) m (typo fix) |
|||
Line 737:
70 GOTO 40
80 END
</lang>
==={{header|Nascom BASIC}}===
See [[#Minimal BASIC|Minimal BASIC]].
If the repeated sequence is short then the loop can be written in one line.
{{works with|Nascom ROM BASIC|4.7}}
<lang basic>
10 REM Loops/While
20 LET I=1024
30 IF I>0 THEN PRINT I:I=INT(I/2):GOTO 30
40 END
</lang>
| |||