c语言中的反余弦和反正弦函数,VB中的反正弦函数与反余弦函数

VB中好像没有反正弦函数与反余弦函数，需要自己动手编写，可以通过VB自带的反正切函数Atn(x)来编写VB的反正弦函数ArcSin(x)与反余弦函数ArcCos(x)。

VB自带的反正切函数：

Atn(x) 函数

功能：返回一个 Double，指定一个数的反正切值。

语法：Atn(number)。

说明：其中，number 参数是一个必要的 Double或任何有效的数值表达式。

程序代码：略(VB内带)。

VB中的反正弦函数与反余弦函数：

ArcSin(x) 函数

功能：返回一个指定数的反正弦值，以弧度表示，返回类型为Double。

语法：ArcSin(x)。

说明：其中，x的取值范围为[-1，1]，x的数据类型为Double。

程序代码：

Function ArcSin(x As Double) As Double

If x >= -1 And x < -0.5 Then ArcSin = -Atn(Sqr(1 - x * x) / x) - 2 * Atn(1)

If x >= -0.5 And x <= 0.5 Then ArcSin = Atn(x / Sqr(1 - x * x))

If x > 0.5 And x <= 1 Then ArcSin = -Atn(Sqr(1 - x * x) / x) + 2 * Atn(1)

End Function

ArcCos(x) 函数

功能：返回一个指定数的反余弦值，以弧度表示，返回类型为Double。

语法：ArcCos(x)。

说明：其中，x的取值范围为[-1，1]，x的数据类型为Double。

程序代码：

Function ArcCos(x As Double) As Double

If x >= -1 And x < -0.5 Then ArcCos = Atn(Sqr(1 - x * x) / x) + 4 * Atn(1)

If x >= -0.5 And x <= 0.5 Then ArcCos = -Atn(x / Sqr(1 - x * x)) + 2 * Atn(1)

If x > 0.5 And x <= 1 Then ArcCos = Atn(Sqr(1 - x * x) / x)

End Function