DarkCat09/mobilebasic
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity

Add files via upload

Browse source
This commit is contained in:
Андрей 2021-03-29 20:43:07 +04:00 • committed by GitHub
parent 64c6352265
commit 35131ba393
No known key found for this signature in database
GPG key ID: 4AEE18F83AFDEB23
90 changed files with 1738 additions and 0 deletions
Download patch file Download diff file Expand all files Collapse all files

23
Examples/Maths/atan2.bas Normal file
View file

@ -0,0 +1,23 @@
SUB MAIN
PRINT "---- ATAN2D (Degrees) ----"
PRINT "ATAN2D(0.0, 0.0)=" + STR$(ATAN2D(0.0, 0.0))
PRINT "ATAN2D(10.0, 10.0)=" + STR$(ATAN2D(10.0, 10.0))
PRINT "ATAN2D(10.0, 0.0)=" + STR$(ATAN2D(10.0, 0.0))
PRINT "ATAN2D(10.0, -10.0)=" + STR$(ATAN2D(10.0, -10.0))
PRINT "ATAN2D(0.0, -10.0)=" + STR$(ATAN2D(0.0, -10.0))
PRINT "ATAN2D(-10.0, -10.0)=" + STR$(ATAN2D(-10.0, -10.0))
PRINT "ATAN2D(-10.0, 0.0)=" + STR$(ATAN2D(-10.0, 0.0))
PRINT "ATAN2D(-10.0, 10.0)=" + STR$(ATAN2D(-10.0, 10.0))
PRINT "\n---- ATAN2 (Radians) ----"
PRINT "ATAN2(0.0, 0.0)=" + STR$(ATAN2(0.0, 0.0))
PRINT "ATAN2(10.0, 10.0)=" + STR$(ATAN2(10.0, 10.0))
PRINT "ATAN2(10.0, 0.0)=" + STR$(ATAN2(10.0, 0.0))
PRINT "ATAN2(10.0, -10.0)=" + STR$(ATAN2(10.0, -10.0))
PRINT "ATAN2(0.0, -10.0)=" + STR$(ATAN2(0.0, -10.0))
PRINT "ATAN2(-10.0, -10.0)=" + STR$(ATAN2(-10.0, -10.0))
PRINT "ATAN2(-10.0, 0.0)=" + STR$(ATAN2(-10.0, 0.0))
PRINT "ATAN2(-10.0, 10.0)=" + STR$(ATAN2(-10.0, 10.0))
END SUB