锐客网

  1. 首页 > 睿知 > it技术 > >

vb.net中正弦30度 vb角度( 二 )

IT技术Rootkits


'反正割
ArcSec
=
Atn(X
/
Sqr(X
*
X
-
1))
+
Sgn((X)
-
1)
*
(2
*
Atn(1))
End
Function
Function
ArcCsc(X)
As
Double
'反余割
ArcCsc
=
Atn(X
/
Sqr(X
*
X
-
1))
+
(Sgn(X)
-
1)
*
(2
*
Atn(1))
End
Function
Function
ArcCot(X)
As
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
sin30度用vbvb使用弧度来表示角度vb.net中正弦30度：在计算中必须转换vb.net中正弦30度：
private
sub
command1_click()
const
pi
=
3.141592654
dim
jd
as
single
dim
srjd
as
single
srjd
=
30
jd
=
30
/
180
*
pi
print
format(sin(jd),
"#.0000")
end
sub
正弦值30度是多少？30度、45度、60度的正弦、余弦、正切值是：
正弦值：30度是二分之一；45度是二分之根号二 ；60度是二分之根号三。
余弦值：30度是二分之根号三 ；45度是二分之根号二 ；60度是二分之一。
正切值：30度是三分之根号三 ；45度是一 ；60度是根号三。
正弦值等于它的余角的余弦值，任意锐角的余弦值等于它的余角的正弦值 。

推荐阅读


上一篇：css3位置改变，css调整定位的上下位置

下一篇：3060显卡滤镜怎么开，3060显卡教程