Lec 19
Visual Basic 2015 Lección 19: Funciones trigonométricas
19.1 La función Sin
Sin la función devuelve el valor del seno de un ángulo. Necesitamos convertir el ángulo de radianes como Visual Basic 2015 no puede ocuparse de ángulo en grados. La conversión se basa en la siguiente ecuación:
π radianes = 180º
por lo 1º = π / 180 radianes
La cuestión es cómo conseguir que el valor exacto de π? Podemos utilizar π = 3.14159 pero no va a ser exacta. Para obtener el valor exacto de π, utilizamos la función arco seno, es decir, es Asin.
Usando el pecado ecuación (π / 2) = 1, por lo Asin (1) = π / 2, por lo tanto, π = 2Asin (1)
La sintaxis de la función seno en Visual Basic 2015 es
Math.sin (ángulo en radianes)
ejemplo 19.1
Private Sub Button1_Click (remitente como objeto, e como EventArgs) Maneja Button1.Click
pi Dim As Single
pi = 2 * Math.asin (1)
MsgBox ( "El pecado es 90" y Math.Round (Math.sin (pi / 2), 4))
End Sub
La salida
19.1 vb2015_fig19.1Figure
19.2 La función de Cos
En Visual Basic 2015, la función Cos devuelve el valor del coseno de un ángulo. La sintaxis es la siguiente
Math.cos (ángulo en radianes)
ejemplo 19.2
Private Sub Button1_Click (remitente como objeto, e como EventArgs) Maneja Button1.Click
pi Dim As Single
pi = 2 * Math.asin (1)
MsgBox ( "Cos 180 es" & Math.Round (Math.cos (pi), 4))
End Sub
La salida
vb2015_fig19.2
Figura 19.2
La función 19.3 Tan
En Visual Basic 2015, la función devuelve el valor de Tan tangente de un ángulo. La sintaxis es la siguiente
Math.tan (ángulo en radianes)
ejemplo 19.3
Private Sub Button1_Click (remitente como objeto, e como EventArgs) Maneja Button1.Click
pi Dim As Single
pi = 2 * Math.asin (1)
MsgBox ( "Tan es 45" y Math.Round (Math.tan (pi / 4)), 4)
End Sub
La salida
vb2015_fig19.3
Figura 19.3
Función 19.4 El Asin
La función Asin devuelve el valor de arco seno (seno inverso) y representa el ángulo que se corresponde con el valor de seno. Por ejemplo, sin90º = 1, por lo asin (1) = 90º
En Visual Basic 2015, el valor de arco seno se expresa en términos de radián. Para convertir el valor en grados, utilizamos la fórmula 1 radián = 180º / π, donde π = 2Asin (1).
ejemplo 19.4
Private Sub Button1_Click (remitente como objeto, e como EventArgs) Maneja Button7.Click
pi Dim As Single
pi = 2 * Math.asin (1)
MsgBox ( "Asin (1) es" & Math.Round (Math.asin (1) * 180 / pi), 4)
End Sub
La salida
vb2015_fig19.4
Figura 19.4
19.5 La función Acos
En Visual Basic 2015, la función Acos devuelve el valor de arco coseno (coseno inversa) y representa el ángulo que corresponde al valor cos. Por ejemplo, cos90º = 0, por lo acos (0) = 90º
ejemplo 19.5
Private Sub Button1_Click (remitente como objeto, e como EventArgs) Maneja Button7.Click
pi Dim As Single
pi = 2 * Math.asin (1)
MsgBox ( "Asin (1) es" & Math.Round (Math.acos (1) * 180 / pi), 4)
End Sub
vb2015_fig19.5
Figura 19.5
Función El 19,6 Atan
En Visual Basic 2015, la función Atan devuelve el valor del arco tangente (tangente inversa) y representa el ángulo que corresponde al valor de color canela. Por ejemplo, tan45º = 1, por lo que atan (1) = 45º
ejemplo 19.6
Private Sub Button1_Click (remitente como objeto, e como EventArgs) Maneja Button7.Click
pi Dim As Single
pi = 2 * Math.asin (1)
MsgBox ( "Asin (1) es" & Math.Round (Math.atan (1) * 180 / pi), 4)
End Sub
La salida
vb2015_fig19.6
Figura 19.6
19.7 Aplicaciones
Ejemplo 19.7 El teorema del seno
Por ejemplo, en un triángulo ABC, dar ángulo A = 60 y el ángulo B = 30, respectivamente, la longitud BC denotado por a = 4 se puede calcular la longitud de AC (indicada por b).
La fórmula es
a / b = senA / senB, por lo que b = asinB / senA
Private Sub Button8_Click (remitente como objeto, e como EventArgs) Maneja Button8.Click
pi Dim As Single
Dim a As Single, B Como simple, X As Single
pi = 2 * Math.asin (1)
A = 60 * pi / 180
B = 40 * pi / 180
x = 4
MsgBox ( "AC =" & Math.Round ((x * Math.sin (A) / Math.sin (B)), 4))
End Sub
La salida
19.7 vb2015_fig19.7Figure
Traductor de Google para empresas:Google Translator ToolkitTraductor de sitios webGlobal Market Finder
En la lección anterior, tenemos que aprender a escribir código usando diversas funciones matemáticas en Visual Basic 2015. En esta lección, vamos a proceder a aprender a trabajar con un grupo de funciones matemáticas que se ocupan de ángulos y longitudes de un triángulo, que son las funciones trigonométricas. Las tres funciones trigonométricas básicas son seno, coseno y Tan que significan seno, coseno y tangente. También nos ocupamos de las funciones trigonométricas inversas Asin, Acos y Atan respectivamente.
19.1 La función Sin
Sin la función devuelve el valor del seno de un ángulo. Necesitamos convertir el ángulo de radianes como Visual Basic 2015 no puede ocuparse de ángulo en grados. La conversión se basa en la siguiente ecuación:
π radianes = 180º
por lo 1º = π / 180 radianes
La cuestión es cómo conseguir que el valor exacto de π? Podemos utilizar π = 3.14159 pero no va a ser exacta. Para obtener el valor exacto de π, utilizamos la función arco seno, es decir, es Asin.
Usando el pecado ecuación (π / 2) = 1, por lo Asin (1) = π / 2, por lo tanto, π = 2Asin (1)
La sintaxis de la función seno en Visual Basic 2015 es
Math.sin (ángulo en radianes)
ejemplo 19.1
En este ejemplo, se utiliza para representar pi π y asignar el valor de π usando la fórmula pi = 2 * Math.asin (1). Utilizamos la función redonda para redondear el valor del seno con cuatro decimales.
Private Sub Button1_Click (remitente como objeto, e como EventArgs) Maneja Button1.Click
pi Dim As Single
pi = 2 * Math.asin (1)
MsgBox ( "El pecado es 90" y Math.Round (Math.sin (pi / 2), 4))
End Sub
La salida
19.1 vb2015_fig19.1Figure
19.2 La función de Cos
En Visual Basic 2015, la función Cos devuelve el valor del coseno de un ángulo. La sintaxis es la siguiente
Math.cos (ángulo en radianes)
ejemplo 19.2
Private Sub Button1_Click (remitente como objeto, e como EventArgs) Maneja Button1.Click
pi Dim As Single
pi = 2 * Math.asin (1)
MsgBox ( "Cos 180 es" & Math.Round (Math.cos (pi), 4))
End Sub
La salida
vb2015_fig19.2
Figura 19.2
La función 19.3 Tan
En Visual Basic 2015, la función devuelve el valor de Tan tangente de un ángulo. La sintaxis es la siguiente
Math.tan (ángulo en radianes)
ejemplo 19.3
Private Sub Button1_Click (remitente como objeto, e como EventArgs) Maneja Button1.Click
pi Dim As Single
pi = 2 * Math.asin (1)
MsgBox ( "Tan es 45" y Math.Round (Math.tan (pi / 4)), 4)
End Sub
La salida
vb2015_fig19.3
Figura 19.3
Función 19.4 El Asin
La función Asin devuelve el valor de arco seno (seno inverso) y representa el ángulo que se corresponde con el valor de seno. Por ejemplo, sin90º = 1, por lo asin (1) = 90º
En Visual Basic 2015, el valor de arco seno se expresa en términos de radián. Para convertir el valor en grados, utilizamos la fórmula 1 radián = 180º / π, donde π = 2Asin (1).
ejemplo 19.4
Private Sub Button1_Click (remitente como objeto, e como EventArgs) Maneja Button7.Click
pi Dim As Single
pi = 2 * Math.asin (1)
MsgBox ( "Asin (1) es" & Math.Round (Math.asin (1) * 180 / pi), 4)
End Sub
La salida
vb2015_fig19.4
Figura 19.4
19.5 La función Acos
En Visual Basic 2015, la función Acos devuelve el valor de arco coseno (coseno inversa) y representa el ángulo que corresponde al valor cos. Por ejemplo, cos90º = 0, por lo acos (0) = 90º
ejemplo 19.5
Private Sub Button1_Click (remitente como objeto, e como EventArgs) Maneja Button7.Click
pi Dim As Single
pi = 2 * Math.asin (1)
MsgBox ( "Asin (1) es" & Math.Round (Math.acos (1) * 180 / pi), 4)
End Sub
vb2015_fig19.5
Figura 19.5
Función El 19,6 Atan
En Visual Basic 2015, la función Atan devuelve el valor del arco tangente (tangente inversa) y representa el ángulo que corresponde al valor de color canela. Por ejemplo, tan45º = 1, por lo que atan (1) = 45º
ejemplo 19.6
Private Sub Button1_Click (remitente como objeto, e como EventArgs) Maneja Button7.Click
pi Dim As Single
pi = 2 * Math.asin (1)
MsgBox ( "Asin (1) es" & Math.Round (Math.atan (1) * 180 / pi), 4)
End Sub
La salida
vb2015_fig19.6
Figura 19.6
19.7 Aplicaciones
Las funciones trigonométricas se pueden utilizar para resolver diversos problemas matemáticos. Los ejemplos más comunes son los problemas que implican el teorema del seno, la regla del coseno, identidades trigonométricas, ecuaciones trigonométricas, la ecuación de proyectil y más.
Ejemplo 19.7 El teorema del seno
Por ejemplo, en un triángulo ABC, dar ángulo A = 60 y el ángulo B = 30, respectivamente, la longitud BC denotado por a = 4 se puede calcular la longitud de AC (indicada por b).
La fórmula es
a / b = senA / senB, por lo que b = asinB / senA
Private Sub Button8_Click (remitente como objeto, e como EventArgs) Maneja Button8.Click
pi Dim As Single
Dim a As Single, B Como simple, X As Single
pi = 2 * Math.asin (1)
A = 60 * pi / 180
B = 40 * pi / 180
x = 4
MsgBox ( "AC =" & Math.Round ((x * Math.sin (A) / Math.sin (B)), 4))
End Sub
La salida
19.7 vb2015_fig19.7Figure
Traductor de Google para empresas:Google Translator ToolkitTraductor de sitios webGlobal Market Finder
Comentarios
Publicar un comentario