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.
 
 
 
 
 
 

12 lines
290 B

  1. 10 REM 'ON-ERROR-GOTO' TEST PROGRAM
  2. 20 ON ERROR GOTO 100
  3. 30 PRINT "ENTER A NUMBER AND IT'S INVERSE WILL BE COMPUTED";
  4. 40 INPUT N
  5. 45 IF N = -999 THEN 999
  6. 50 A=1/N
  7. 60 PRINT "THE INVERSE OF";N;"IS";A
  8. 70 GOTO 30
  9. 100 PRINT "THE INVERSE OF 0 CANNOT BE COMPUTED - TRY AGAIN"
  10. 110 RESUME 30
  11. 999 END