Trigonometric functions: Difference between revisions
Content added Content deleted
(Add Seed7 example) |
(adding sas) |
||
Line 1,719: | Line 1,719: | ||
acos(-sqrt(2) / 2) = 135.0 |
acos(-sqrt(2) / 2) = 135.0 |
||
atan(sqrt(3)) = 60.0</pre> |
atan(sqrt(3)) = 60.0</pre> |
||
=={{header|SAS}}== |
|||
<lang sas>data _null_; |
|||
pi = 4*atan(1); |
|||
deg = 30; |
|||
rad = pi/6; |
|||
k = pi/180; |
|||
x = 0.2; |
|||
a = sin(rad); |
|||
b = sin(deg*k); |
|||
put a b; |
|||
a = cos(rad); |
|||
b = cos(deg*k); |
|||
put a b; |
|||
a = tan(rad); |
|||
b = tan(deg*k); |
|||
put a b; |
|||
a=arsin(x); |
|||
b=arsin(x)/k; |
|||
put a b; |
|||
a=arcos(x); |
|||
b=arcos(x)/k; |
|||
put a b; |
|||
a=atan(x); |
|||
b=atan(x)/k; |
|||
put a b; |
|||
run;</lang> |
|||
=={{header|Scheme}}== |
=={{header|Scheme}}== |