Trigonometric functions: Difference between revisions

m
m (Changed URL my current page to http://zabrodsky-rexx.byethost18.com/aat/)
Line 308:
{{trans|C}}
 
<lang arturorebol>pi: 4*[atan 1.0]
 
radians: pi/4
Line 314:
 
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 " " + [asin|sin radians])*180/pi]
 
print "arccosine"
print [acos| cos radians], +(acos " " + [acos|cos radians])*180/pi]
 
print "arctangent"
print [atan| tan radians], +(atan " " + [atan|tan radians])*180/pi]</lang>
</lang>
 
{{out}}
 
<pre>sine
0.7071067811865475 0.7071067811865475
cosine
0.7071067811865476 0.7071067811865476
tangent
0.9999999999999999 0.9999999999999999
arcsine
0.7853981633974482 44.99999999999999
arccosine
0.7853981633974483 45.0
arctangent
0.7853981633974483 45.0</pre>
1,532

edits