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.
|
- 5 REM Fibonacci numbers 4-13-2020 Ken
- 7 CALL SHELL("cls")
- 10 LET M = 5000
- 20 LET X = 1 : LET Y = 1
- 30 IF (X > M) GOTO 100
- 40 PRINT X
- 50 X = X + Y
- 60 IF (Y > M) GOTO 100
- 70 PRINT Y
- 80 Y = X + Y
- 90 GOTO 30
- 100 STOP
|
Ye Ol' π Shack