Trigonometric functions: Difference between revisions

m
No edit summary
Line 308:
{{trans|C}}
 
<lang arturo>pi : 4*$([atan 1).0]
 
radians: pi/4
degrees: 45.0
 
print "sine"
print $([sin radians)] + " " + $([sin degrees*pi/180)]
 
print "cosine"
print $([cos radians)] + " " + $([cos degrees*pi/180)]
 
print "tangent"
print $([tan radians)] + " " + $([tan degrees*pi/180)]
 
print "arcsine"
print $([asin $(|sin radians))] + " " +$( [asin $(|sin radians))]*180/pi
 
print "arccosine"
print $([acos $(|cos radians))] + " " +$( [acos $(|cos radians))]*180/pi
 
print "arctangent"
print $([atan $(|tan radians))] + " " +$( [atan $(|tan radians))]*180/pi</lang>
</lang>
 
{{out}}
 
<pre>sine
0.7071067811865475 0.7071067811865475
0.707107 0.707107
cosine
0.7071067811865476 0.7071067811865476
0.707107 0.707107
tangent
0.9999999999999999 0.9999999999999999
1 1
arcsine
0.7853981633974482 44.99999999999999
0.785398 45
arccosine
0.7853987853981633974483 45.0
arctangent
0.7853987853981633974483 45.0</pre>
 
=={{header|AutoHotkey}}==
1,532

edits