Trigonometric functions: Difference between revisions
Content added Content deleted
Alextretyak (talk | contribs) (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: |
echo &"Sine: {sin(rad):.10f} {sin(degToRad(deg)):13.10f}" |
||
echo "Cosine : |
echo &"Cosine : {cos(rad):.10f} {cos(degToRad(deg)):13.10f}" |
||
echo "Tangent: |
echo &"Tangent: {tan(rad):.10f} {tan(degToRad(deg)):13.10f}" |
||
echo "Arcsine: |
echo &"Arcsine: {arcsin(sin(rad)):.10f} {radToDeg(arcsin(sin(degToRad(deg)))):13.10f}" |
||
echo " |
echo &"Arccosine: {arccos(cos(rad)):.10f} {radToDeg(arccos(cos(degToRad(deg)))):13.10f}" |
||
echo "Arctangent: |
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}}== |