Trigonometric functions: Difference between revisions
Content added Content deleted
(→{{header|J}}: Changed inverse functions to match clarified requirements.) |
(→{{header|BASIC}}: Forgot to give ATN an argument and changed for new requirements.) |
||
Line 73:
PRINT TAN(radians) + " " + TAN (degrees) 'tangent
'arcsin
arcsin = 2 * ATN(SIN(radians)) * radians / (1 + SQR(1 - radians ^ 2))
PRINT arcsin + " " + arcsin * 180 / pi
'arccos
arccos = 2 * ATN(COS(radians)) * SQR(1 - radians ^ 2) / (1 + radians)
PRINT arccos + " " + arccos * 180 / pi
PRINT ATN(TAN(radians)) + " " + ATN
=={{header|Forth}}==
| |||