Anonymous user
Trigonometric functions: Difference between revisions
→{{header|Perl 6}}
m (moved Trigonometric Functions to Trigonometric functions) |
|||
Line 764:
say acos(1/sqrt 2), ' ', acos 1/sqrt(2), 'd';
say atan(1/sqrt 3), ' ', atan 1/sqrt(3), 'd';</lang>
=={{header|PL/I}}==
<lang PL/I>
x = 0.5; xd = 45;
/* angle in radians: */
v = sin(x); y = asin(v); put skip list (y);
v = cos(x); y = acos(v); put skip list (y);
v = tan(x); y = atan(v); put skip list (y);
v = cotan(x); put skip list (v);
/* angle in degrees: */
v = sind(xd); y = asind(v); put skip list (y);
v = cosd(xd); y = acosd(v); put skip list (y);
v = tand(xd); y = atand(v); put skip list (y);
v = cotand(x); put skip list (v);
/* hyperbolic functions: */
v = sinh(x); put skip list (v);
v = cosh(x); put skip list (v);
v = tanh(x); y = atanh(v); put skip list (y);
</lang>
=={{header|Pop11}}==
| |||