Trigonometric functions: Difference between revisions

Trigonometric functions (view source)

Revision as of 18:28, 25 April 2021

268 bytes added , 3 years ago

Replaced "radians" and "degrees" procs with "degTorRad" and "radToDeg" which are now provided by the module "math". Changed output formatting. Added output section.

Anonymous user

rosettacode>Lscrd

Revision as of 06:45, 6 April 2021 (view source) Alextretyak (talk \| contribs) (Added 11l) ← Older edit		Revision as of 18:28, 25 April 2021 (view source) rosettacode>Lscrd (Replaced "radians" and "degrees" procs with "degTorRad" and "radToDeg" which are now provided by the module "math". Changed output formatting. Added output section.) Newer edit →
Line 2,364: =={{header\|Nim}}== <lang nim>import math, strformat ~~proc radians(x): float = x * Pi / 180~~ ~~proc degrees(x): float = x * 180 / Pi~~ let rad = Pi/4 let deg = 45.0 echo &"Sine: ", {sin(rad)~~, " ",~~:.10f} {sin(~~radians~~degToRad(deg)):13.10f}" echo &"Cosine : ", {cos(rad)~~, " ",~~:.10f} {cos(~~radians~~degToRad(deg)):13.10f}" echo &"Tangent: ", {tan(rad)~~, " ",~~:.10f} {tan(~~radians~~degToRad(deg)):13.10f}" echo &"Arcsine: ", {arcsin(sin(rad)),:.10f} ~~" ", degrees~~{radToDeg(arcsin(sin(~~radians~~degToRad(deg)))):13.10f}" echo &"~~Arccocose~~Arccosine: ", {arccos(cos(rad)),:.10f} ~~" ", degrees~~{radToDeg(arccos(cos(~~radians~~degToRad(deg)))):13.10f}" echo &"Arctangent: ", {arctan(tan(rad)),:.10f} ~~" ", degrees~~{radToDeg(arctan(tan(~~radians~~degToRad(deg))))~~</lang>~~: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}}==