ChipMaster's bwBASIC
This also includes history going back to v2.10. *WARN* some binary files might have been corrupted by CRLF.
You can not select more than 25 topics
Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
|
- 10 REM compute the sum of integers from 1 to 10 with GOTO loop
- 20 CALL SHELL("cls")
- 30 LET N=1
- 40 LET S = S + N
- 50 PRINT N,S
- 60 LET N = N + 1
- 70 IF N <= 10 GOTO 40
- 80 PRINT
- : REM print empty line
- 90 PRINT "Final sum:";S
- 95 PRINT
- 100 END
|
Ye Ol' π Shack