home *** CD-ROM | disk | FTP | other *** search
GW-BASIC | 1994-02-04 | 1.1 KB | 25 lines |
- 10 CLS:' EDITED BY ats 11.26.81 MATH.BAS -------------------
- 15 KEY OFF:WIDTH 80
- 17 DIM A$(30)
- 20 PRINT TAB(20)"MATHEMATICS CATAGORY PROGRAMS:"
- 30 PRINT
- 40 FOR I = 1 TO 27
- 50 READ A$(I)
- 55 NEXT I
- 57 FOR I=1 TO 13
- 60 IF I < 10 THEN B$=" " ELSE B$=" "
- 80 PRINT B$;I;". ";A$(I);TAB(38);I+13;". ";A$(I+13)
- 90 NEXT I
- 100 PRINT TAB(39) "27 . ";A$(27)
- 150 PRINT :PRINT
- 160 PRINT : INPUT " WHICH PROGRAM WOULD YOU LIKE TO USE ";A$
- 170 IF A$="27" THEN RUN "MENU"
- 180 IF VAL(A$) <1 OR VAL(A$) >26 THEN 160
- 185 CLS:PRINT
- 190 RUN "M"+A$
- 200 DATA "GREATEST COMMON DENOMINATOR","PRIME FACTORS","AREA OF POLYGON","VECTOR ANALYSIS","PARTS OF TRIANGLE"
- 210 DATA "VECTOR OPERATIONS","COORDINATE CONVERSION","COORDINATE PLOT","ANGLE CONVERSION","POLAR EQUATION PLOT"
- 220 DATA "FUNCTION PLOT","LINEAR INTERPOLATION","CURVILINEAR INTERPOLATION","SIMPSON'S RULE","GAUSSIAN QUADRATURE","TRAPEZOIDAL RULE","DERIVATIVE"
- 230 DATA "QUADRATIC FORMULA","REAL ROOTS:NEWTON","REAL ROOTS:HALF-INTERVAL SEARCH","TRIG POLYNOMIAL","SIMULTANEOUS EQUATIONS"
- 240 DATA "LINEAR PROGRAMMING","SIMPLE MATRIX OPERATIONS","MATRIX MULTIPLICATION","MATRIX INVERSION","RETURN TO MAIN MENU"
-