Trigonometric functions: Difference between revisions

Content added Content deleted
Line 1,904: Line 1,904:


=={{header|Run BASIC}}==
=={{header|Run BASIC}}==
<lang Runbasic>
<lang runbasic>deg = 45.0
deg = 45.0
' Run BASIC works in radians. Convert deg and rad as shown.
' Run BASIC works in radians. Convert deg and rad as shown.
pi = acs(-1)
pi = acs(-1)
Line 1,918: Line 1,917:
print "Arcsine: ";ASN(SIN(rad));" radians, (or ";ASN(SIN(deg*d2r))*r2d;" degrees)"
print "Arcsine: ";ASN(SIN(rad));" radians, (or ";ASN(SIN(deg*d2r))*r2d;" degrees)"
print "Arccosine: ";ACS(COS(rad));" radians, (or ";ACS(COS(deg*d2r))*r2d;" degrees)"
print "Arccosine: ";ACS(COS(rad));" radians, (or ";ACS(COS(deg*d2r))*r2d;" degrees)"
print "Arctangent: ";ATN(TAN(rad));" radians, (or ";ATN(TAN(deg*d2r))*r2d;" degrees)"
print "Arctangent: ";ATN(TAN(rad));" radians, (or ";ATN(TAN(deg*d2r))*r2d;" degrees)"</lang>Output:
<pre>Sine: 0.707106781 0.707106781
</lang>
<lang Runbasic>
------------------------- Output ------------------------
Sine: 0.707106781 0.707106781
Cosine: 0.707106781 0.707106781
Cosine: 0.707106781 0.707106781
Tangent: 1.0 1.0
Tangent: 1.0 1.0
Line 1,929: Line 1,924:
Arcsine: 0.785398163 radians, (or 45.0 degrees)
Arcsine: 0.785398163 radians, (or 45.0 degrees)
Arccosine: 0.785398163 radians, (or 45.0 degrees)
Arccosine: 0.785398163 radians, (or 45.0 degrees)
Arctangent: 0.785398163 radians, (or 45.0 degrees)
Arctangent: 0.785398163 radians, (or 45.0 degrees)</pre>
</lang>


=={{header|SAS}}==
=={{header|SAS}}==