Trigonometric functions: Difference between revisions

Content added Content deleted
(Added 11l)
(Replaced "radians" and "degrees" procs with "degTorRad" and "radToDeg" which are now provided by the module "math". Changed output formatting. Added output section.)
Line 2,364: Line 2,364:


=={{header|Nim}}==
=={{header|Nim}}==
<lang nim>import math
<lang nim>import math, strformat

proc radians(x): float = x * Pi / 180
proc degrees(x): float = x * 180 / Pi


let rad = Pi/4
let rad = Pi/4
let deg = 45.0
let deg = 45.0


echo "Sine: ", sin(rad), " ", sin(radians(deg))
echo &"Sine: {sin(rad):.10f} {sin(degToRad(deg)):13.10f}"
echo "Cosine : ", cos(rad), " ", cos(radians(deg))
echo &"Cosine : {cos(rad):.10f} {cos(degToRad(deg)):13.10f}"
echo "Tangent: ", tan(rad), " ", tan(radians(deg))
echo &"Tangent: {tan(rad):.10f} {tan(degToRad(deg)):13.10f}"
echo "Arcsine: ", arcsin(sin(rad)), " ", degrees(arcsin(sin(radians(deg))))
echo &"Arcsine: {arcsin(sin(rad)):.10f} {radToDeg(arcsin(sin(degToRad(deg)))):13.10f}"
echo "Arccocose: ", arccos(cos(rad)), " ", degrees(arccos(cos(radians(deg))))
echo &"Arccosine: {arccos(cos(rad)):.10f} {radToDeg(arccos(cos(degToRad(deg)))):13.10f}"
echo "Arctangent: ", arctan(tan(rad)), " ", degrees(arctan(tan(radians(deg))))</lang>
echo &"Arctangent: {arctan(tan(rad)):.10f} {radToDeg(arctan(tan(degToRad(deg)))):13.10f}"
</lang>

{{out}}
<pre>Sine: 0.7071067812 0.7071067812
Cosine : 0.7071067812 0.7071067812
Tangent: 1.0000000000 1.0000000000
Arcsine: 0.7853981634 45.0000000000
Arccosine: 0.7853981634 45.0000000000
Arctangent: 0.7853981634 45.0000000000</pre>


=={{header|OCaml}}==
=={{header|OCaml}}==