vb点虐 余弦值求角度 vb编程求任意角三角函数

知道余弦值怎么求角度

问题一：已知余弦值求角度，不要计算机 假设余弦值是0.4，要求该角度是多少，如果没有计算器，也没有三角函数表，那么可以采用画图的方式，来估算该角度值，当然了，图画得越大，越精准，估算值就越接近实际的计算值，也就是越准确。

创新新互联，凭借十多年的网站建设、成都网站设计经验，本着真心·诚心服务的企业理念服务于成都中小企业设计网站有上千家案例。做网站建设，选创新互联。

至于怎么画图，可以在地上画，也可以在纸上画。根据实际情况来决定。在纸上一般可以用单位圆，再用量角器。然后量角器你可以把角的边延长后再修正，经过多次修正后，应该能提高精度。

实际上，如果有一部智能手机，就像你刚才用来提问的手机，就是按两个键而已，呵呵。到网上下一个可以求反三角函数的计算器，装到手机上，又快又准，不用是傻瓜，哈哈。

问题二：知道余弦的值怎么用计算器求度数 那种卡西欧的计算机 按一下shift再按sin或者cos就会出来一个sin-1( 然后输入数值求得度数

问题三：知道余弦值如何求角度？ 用arccos反余弦函数就可以求出来了。

问题四：知道正弦余弦值怎么求角度 sinx=a,cosx=b。根据a,b的值首先确定象限，然后x=arcsina根据条件确定是否π-。最后保持无数解的形式，+2kπ

vb根据坐标求角度

Option Explicit

Dim Xpos(2) As Single, Ypos(2) As Single

Dim n As Integer

Private Sub DrawTriangle() '画三角形

Form1.DrawWidth = 2

Line (Xpos(0), Ypos(0))-(Xpos(1), Ypos(1)), QBColor(12)

Line (Xpos(1), Ypos(1))-(Xpos(2), Ypos(2)), QBColor(12)

Line (Xpos(2), Ypos(2))-(Xpos(0), Ypos(0)), QBColor(12)

End Sub

Private Function TwoPointDist(X1 As Single, Y1 As Single, X2 As Single, Y2 As Single) As Double

TwoPointDist = Sqr((X2 - X1) ^ 2 + (Y2 - Y1) ^ 2)

End Function

Private Sub MySub()

Dim AB As Double, BC As Double, CA As Double

AB = TwoPointDist(Xpos(0), Ypos(0), Xpos(1), Ypos(1))

BC = TwoPointDist(Xpos(1), Ypos(1), Xpos(2), Ypos(2))

CA = TwoPointDist(Xpos(2), Ypos(2), Xpos(0), Ypos(0))

Dim TriB As Double '∠B

Dim CosB As Double, SinB As Double

CosB = (BC ^ 2 + AB ^ 2 - CA ^ 2) / (2 * BC * AB)

SinB = Sqr(1 - CosB ^ 2)

TriB = Atn(SinB / CosB) * (180 / 3.14159) '弧度转换为度数

Form1.CurrentX = 0

Form1.CurrentY = 0

Print " AB="  Format(AB, "0.0000")

Print " BC="  Format(BC, "0.0000")

Print " CA="  Format(CA, "0.0000")

Print " ∠B="  Format(TriB, "0.0000")  "°"

End Sub

Private Sub Command1_Click()

n = 0

Form1.Cls

End Sub

Private Sub Form_MouseDown(Button As Integer, Shift As Integer, X As Single, Y As Single)

If n = 3 Then Exit Sub

Xpos(n) = X

Ypos(n) = Y

Form1.CurrentX = X: Form1.CurrentY = Y

Print Chr(65 + n)  "("; Xpos(n)  ","  Ypos(n)  ")"

If n = 2 Then

DrawTriangle

MySub

End If

n = n + 1

End Sub

Private Sub Form_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single)

Label2 = "X="  Format(X, "0.0000")  "Y="  Format(Y, "0.0000")

End Sub

知道余弦值怎么求角度？

知道一个余弦值，这样求角度：

方法与步骤如下：

假设cosa=0.65，a=arccos0.65，a≈49.4584度

1、用科学计算器数字键输入0.65，如下图：

2、按科学计算器上红框这个键，如下图：

3、再按科学计算器上这个红框的键，如下图：

4、按下这个键，0到180度之间的角度就计算出来了，如下图：

扩展资料：

cosa=0.65，a=arccos0.65，a≈49.4584度

y=cosx叫余弦（余弦函数），三角函数的一种。在Rt△ABC（直角三角形）中，∠C=90°，∠A的余弦是它的邻边比三角形的斜边，即cosA=邻边/斜边。余弦函数：f(x)=cosx（x∈R）。

求0到180度之间的角的函数叫反余弦函数：y=arccosx（x∈[-1，+1]，y∈[0度，180度]）

在数学中，反三角函数（偶尔也称为弓形函数（arcus functions），反向函数（antitrigonometric functions）或环形函数（cyclometric functions））是三角函数的反函数（具有适当的限制域）。 具体来说，它们是正弦，余弦，正切，余切，正割和辅助函数的反函数，并且用于从任何一个角度的三角比获得一个角度。 反三角函数广泛应用于工程，导航，物理和几何。

反余弦函数（反三角函数之一）为余弦函数y=cosx（x∈[0,π]）的反函数，记作y=arccosx或cosy=x(x∈[-1,1]).。由原函数的图像和它的反函数的图像关于一三象限角平分线对称可知余弦函数的图像和反余弦函数的图像也关于一三象限角平分线对称。

参考资料来源：百度百科-余弦函数

参考资料来源：百度百科-反余弦函数