请问VB有反余弦函数么,急用呢 请问VB有反余弦函数么,急用呢 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 Private Function Arccos(x As Double) As Double Arccos = PI / 2 - Atn(x / Sqr(-x * x + 1))End Function Arccos(X) = Atn(-X / Sqr(-X * X + 1)) + 2 * Atn(1) 反余弦可以由反正切导出:Arccos(X) = Atn(-X / Sqr(-X * X + 1)) + 2 * Atn(1)。 下列是由固有数学函数派生的非固有数学函数:函数 派生的等效公式 Secant(正割) Sec(X) = 1 / Cos(X) Cosecant(余割) Cosec(X) = 1 / Sin(X) Cotangent(余切) Cotan(X) = 1 / Tan(X) Inverse Sine(反正弦) Arcsin(X) = Atn(X / Sqr(-X * X + 1)) Inverse Cosine(反余弦) Arccos(X) = Atn(-X / Sqr(-X * X + 1)) + 2 * Atn(1) Inverse Secant(反正割) Arcsec(X) = Atn(X / Sqr(X * X - 1)) + Sgn((X) -1) * (2 * Atn(1)) Inverse Cosecant(反余割) Arccosec(X) = Atn(X / Sqr(X * X - 1)) + (Sgn(X) - 1) * (2 * Atn(1)) Inverse Cotangent(反余切) Arccotan(X) = Atn(X) + 2 * Atn(1) Hyperbolic Sine(双曲正弦) HSin(X) = (Exp(X) - Exp(-X)) / 2 Hyperbolic Cosine(双曲余弦) HCos(X) = (Exp(X) + Exp(-X)) / 2 Hyperbolic Tangent(双曲正切) HTan(X) = (Exp(X) - Exp(-X)) / (Exp(X) + Exp(-X)) Hyperbolic Secant(双曲正割) HSec(X) = 2 / (Exp(X) + Exp(-X)) Hyperbolic Cosecant(双曲余割) HCosec(X) = 2 / (Exp(X) - Exp(-X)) Hyperbolic Cotangent(双曲余切) HCotan(X) = (Exp(X) + Exp(-X)) / (Exp(X) - Exp(-X)) Inverse Hyperbolic Sine(反双曲正弦) HArcsin(X) = Log(X + Sqr(X * X + 1)) Inverse Hyperbolic Cosine(反双曲余弦) HArccos(X) = Log(X + Sqr(X * X - 1)) Inverse Hyperbolic Tangent(反双曲正切) HArctan(X) = Log((1 + X) / (1 - X)) / 2 Inverse Hyperbolic Secant(反双曲正割) HArcsec(X) = Log((Sqr(-X * X + 1) + 1) / X) Inverse Hyperbolic Cosecant(反双曲余割) HArccosec(X) = Log((Sgn(X) * Sqr(X * X + 1) +1) / X) Inverse Hyperbolic Cotangent(反双曲余切) HArccotan(X) = Log((X + 1) / (X - 1)) / 2 以 N 为底的对数 LogN(X) = Log(X) / Log(N) 公式对么怎么我算出aqr里的值是负的,所以报错了呢 //公式对么//怎么我算出aqr里的值是负的,所以报错了呢你的输入对吗?如果是一个余弦值那么0<|X|<1 那么(-X * X + 1)怎么可能小于0呢? 专家能帮我改一下代码吗 窗体上画线 我循环套循环是不是每个循环下都加DoEvents才有作用? 为什么我在网上求职发现,要求会DELPHI 的单位比 会VB的要多得多多呢?不明白.. 用什么工具可以看到一个商业软件是用什么软件编译的 ADO\RDO区别是什么,有例子给我吗?怎么把RDO转成ADO? vb excel 使用大恒采集卡时单采和实时采集到的图象不一致,是什么原因? Access 中的VBA求助 使用DBGrid控件的问题 Excel里怎样对字符串进行操作? webbrowser 出现 access denied 错误
Arccos = PI / 2 - Atn(x / Sqr(-x * x + 1))
End Function
函数 派生的等效公式
Secant(正割) Sec(X) = 1 / Cos(X)
Cosecant(余割) Cosec(X) = 1 / Sin(X)
Cotangent(余切) Cotan(X) = 1 / Tan(X)
Inverse Sine(反正弦) Arcsin(X) = Atn(X / Sqr(-X * X + 1))
Inverse Cosine(反余弦) Arccos(X) = Atn(-X / Sqr(-X * X + 1)) + 2 * Atn(1)
Inverse Secant(反正割) Arcsec(X) = Atn(X / Sqr(X * X - 1)) + Sgn((X) -1) * (2 * Atn(1))
Inverse Cosecant(反余割) Arccosec(X) = Atn(X / Sqr(X * X - 1)) + (Sgn(X) - 1) * (2 * Atn(1))
Inverse Cotangent(反余切) Arccotan(X) = Atn(X) + 2 * Atn(1)
Hyperbolic Sine(双曲正弦) HSin(X) = (Exp(X) - Exp(-X)) / 2
Hyperbolic Cosine(双曲余弦) HCos(X) = (Exp(X) + Exp(-X)) / 2
Hyperbolic Tangent(双曲正切) HTan(X) = (Exp(X) - Exp(-X)) / (Exp(X) + Exp(-X))
Hyperbolic Secant(双曲正割) HSec(X) = 2 / (Exp(X) + Exp(-X))
Hyperbolic Cosecant(双曲余割) HCosec(X) = 2 / (Exp(X) - Exp(-X))
Hyperbolic Cotangent(双曲余切) HCotan(X) = (Exp(X) + Exp(-X)) / (Exp(X) - Exp(-X))
Inverse Hyperbolic Sine(反双曲正弦) HArcsin(X) = Log(X + Sqr(X * X + 1))
Inverse Hyperbolic Cosine(反双曲余弦) HArccos(X) = Log(X + Sqr(X * X - 1))
Inverse Hyperbolic Tangent(反双曲正切) HArctan(X) = Log((1 + X) / (1 - X)) / 2
Inverse Hyperbolic Secant(反双曲正割) HArcsec(X) = Log((Sqr(-X * X + 1) + 1) / X)
Inverse Hyperbolic Cosecant(反双曲余割) HArccosec(X) = Log((Sgn(X) * Sqr(X * X + 1) +1) / X)
Inverse Hyperbolic Cotangent(反双曲余切) HArccotan(X) = Log((X + 1) / (X - 1)) / 2
以 N 为底的对数 LogN(X) = Log(X) / Log(N)
怎么我算出aqr里的值是负的,所以报错了呢
//怎么我算出aqr里的值是负的,所以报错了呢你的输入对吗?如果是一个余弦值那么0<|X|<1 那么(-X * X + 1)怎么可能小于0呢?