9 lines
127 B
QBasic
9 lines
127 B
QBasic
|
10 REM WHILE/WEND test
|
||
|
|
20 X = 1
|
||
|
|
30 WHILE X <= 10
|
||
|
|
40 IF X MOD 2 = 0 THEN PRINT X;
|
||
|
|
50 X = X + 1
|
||
|
|
60 WEND
|
||
|
|
70 PRINT
|
||
|
|
80 PRINT "Done"
|