Add files via upload
This commit is contained in:
parent
64c6352265
commit
35131ba393
90 changed files with 1738 additions and 0 deletions
41
Examples/Maths/trig.bas
Normal file
41
Examples/Maths/trig.bas
Normal file
|
@ -0,0 +1,41 @@
|
|||
SUB MAIN
|
||||
PRINT "---- SINE, COSINE, TANGENTS (DEGREES) ----"
|
||||
|
||||
PRINT "COSD(45)=" + STR$(COSD(45))
|
||||
PRINT "SIND(45)=" + STR$(SIND(45))
|
||||
PRINT "TAND(45)=" + STR$(TAND(45))
|
||||
|
||||
PRINT "ACOSD(0.707)=" + STR$(ACOSD(0.707))
|
||||
PRINT "ASIND(0.707)=" + STR$(ASIND(0.707))
|
||||
PRINT "ATAND(1)=" + STR$(ATAND(1))
|
||||
|
||||
PRINT "\n---- SINE, COSINE, TANGENTS (RADIANS) ----"
|
||||
|
||||
PRINT "COS(0.785)=" + STR$(COS(0.785))
|
||||
PRINT "SIN(0.785)=" + STR$(SIN(0.785))
|
||||
PRINT "TAN(0.785)=" + STR$(TAN(0.785))
|
||||
|
||||
PRINT "ACOS(0.707)=" + STR$(ACOS(0.707))
|
||||
PRINT "ASIN(0.707)=" + STR$(ASIN(0.707))
|
||||
PRINT "ATAN(1)=" + STR$(ATAN(1))
|
||||
|
||||
PRINT "\n---- SECANT, COSECANT, COTANGENT (DEGREES) ----"
|
||||
|
||||
PRINT "SECD(45)=" + STR$(SECD(45))
|
||||
PRINT "CSCD(45)=" + STR$(CSCD(45))
|
||||
PRINT "COTD(45)=" + STR$(COTD(45))
|
||||
|
||||
PRINT "ASECD(1.414)=" + STR$(ASECD(1.414))
|
||||
PRINT "ACSCD(1.414)=" + STR$(ACSCD(1.414))
|
||||
PRINT "ACOTD(1)=" + STR$(ACOTD(1))
|
||||
|
||||
PRINT "\n---- SECANT, COSECANT, COTANGENT (RADIANS) ----"
|
||||
|
||||
PRINT "SEC(0.785)=" + STR$(SEC(0.785))
|
||||
PRINT "CSC(0.785)=" + STR$(CSC(0.785))
|
||||
PRINT "COT(0.785)=" + STR$(COT(0.785))
|
||||
|
||||
PRINT "ASEC(1.414)=" + STR$(ASEC(1.414))
|
||||
PRINT "ACSC(1.414)=" + STR$(ACSC(1.414))
|
||||
PRINT "ACOT(1)=" + STR$(ACOT(1))
|
||||
END SUB
|
Loading…
Add table
Add a link
Reference in a new issue