Double
'反余切
ArcCot
=
Atn(X)
+
2
*
Atn(1)
End
Function
Function
HSin(X)
As
Double
'双曲正弦
HSin
=
(Exp(X)
-
Exp(-X))
/
2
End
Function
Function
HCos(X)
As
Double
'双曲余弦
HCos
=
(Exp(X)
+
Exp(-X))
/
2
End
Function
Function
HTan(X)
As
Double
'双曲正切
HTan
=
(Exp(X)
-
Exp(-X))
/
(Exp(X)
+
Exp(-X))
End
Function
Function
HSec(X)
As
Double
'双曲正割
HSec
=
2
/
(Exp(X)
+
Exp(-X))
End
Function
Function
HCsc(X)
As
Double
'双曲余割
HCsc
=
2
/
(Exp(X)
-
Exp(-X))
End
Function
Function
HCot(X)
As
Double
'双曲余切
HCot
=
(Exp(X)
+
Exp(-X))
/
(Exp(X)
-
Exp(-X))
End
Function
Function
HArcsin(X)
As
Double
'反双曲正弦
HArcsin
=
Log(X
+
Sqr(X
*
X
+
1))
End
Function
Function
HArccos(X)
As
Double
'反双曲余弦
HArccos
=
Log(X
+
Sqr(X
*
X
-
1))
End
Function
Function
HArctan(X)
As
Double
'反双曲正切
HArctan
=
Log((1
+
X)
/
(1
-
X))
/
2
End
Function
Function
HArcsec(X)
As
Double
'反双曲正割
HArcsec
=
Log((Sqr(-X
*
X
+
1)
+
1)
/
X)
End
Function
Function
HArccsc(X)
As
Double
'反双曲余割
HArccsc
=
Log((Sgn(X)
*
Sqr(X
*
X
+
1)
+
1)
/
X)
End
Function
Function
HArccot(X)
As
Double
'反双曲余切
HArccot
=
Log((X
+
1)
/
(X
-
1))
/
2
End
Function
VB怎么写反正弦和反余弦函数?没有直接的函数可以求出反正弦和反余弦,可以用牛顿迭代法求出,原理很简单
Secant(正割)
Sec(X)= 1/Cos(X)
Cosecant(余割)
Cosec(X)= 1/Sin(X)
Cotangent(余切)
Cotan(X)= 1/Tan(X)
InverseSine(反正弦)
Arcsin(X)= Atn(X / Sqr(-X * X + 1))
InverseCosine(反余弦)
Arccos(X) =Atn(-X /Sqr(-X * X + 1))+ 2 * Atn(1)
InverseSecant(反正割)
Arcsec(X) = Atn(X / Sqr(X * X - 1))+ Sgn((X) - 1) * (2 * Atn(1))
InverseCosecant(反余割)
Arccosec(X) = Atn(X / Sqr(X * X - 1)) + (Sgn(X) - 1) * (2 * Atn(1))
InverseCotangent(反余切)
Arccotan(X) = Atn(X) + 2 * Atn(1)
HyperbolicSine(双曲正弦)
HSin(X) = (Exp(X) - Exp(-X)) / 2
HyperbolicCosine(双曲余弦)
HCos(X) = (Exp(X) + Exp(-X)) / 2
HyperbolicTangent(双曲正切)
HTan(X) = (Exp(X) - Exp(-X)) /(Exp(X)+Exp(-X))
HyperbolicSecant(双曲正割)
HSec(X) = 2 / (Exp(X) + Exp(-X))
HyperbolicCosecant(双曲余割)
HCosec(X)=2/(Exp(X)-Exp(-X))
HyperbolicCotangent(双曲余切)
HCotan(X)=(Exp(X)+Exp(-X))/(Exp(X)-Exp(-X))
InverseHyperbolicSine(反双曲正弦)
HArcsin(X)=Log(X+Sqr(X*X+1))
InverseHyperbolicCosine(反双曲余弦)
HArccos(X)=Log(X+Sqr(X*X-1))
InverseHyperbolicTangent(反双曲正切)
推荐阅读
- 经济学人网站制作,免费下载经济学人网站
- 斗鱼196为什么不直播了,斗鱼PDD为什么不直播了
- ios锁屏在哪里调,ios锁屏设置在哪里
- 如何修复扫描的pdf文件,扫描的pdf文件已损坏怎么办
- mysql字段编码怎么查 mysql 字段子查询
- 统信操作系统上安装oracle,统信操作系统怎么安装
- 关于html5不支持xlsx流下载的信息
- 强行cpu渲染什么意思,强制进行cpu渲染省电
- php数据库冲突 php与数据库交互的登录界面