mirror of
https://github.com/hsoft/collapseos.git
synced 2024-12-26 18:38:05 +11:00
6 lines
69 B
QBasic
6 lines
69 B
QBasic
10 print "Count to 10"
|
|
20 a=0
|
|
30 a=a+1
|
|
40 print a
|
|
50 if a<10 goto 30
|