Sin Function
κ°λμ μ¬μΈμ ꡬν©λλ€. κ°λλ λΌλμμΌλ‘ μ§μ λ©λλ€. κ²°κ³Όλ -1μμ 1 μ¬μ΄μ λλ€.
Sin ν¨μλ μ§κ° μΌκ°νμμ λΉλ³μ κΈΈμ΄μ λν΄ κ°λ Alphaμ λ§μ£Όλ³΄λ λ³μ κΈΈμ΄ λΉμ¨μ ꡬν©λλ€.
Sin(Alpha) = side opposite the angle/hypotenuse
ꡬ문:
Sin (Number)
λ°ν κ°:
Double
λ§€κ° λ³μ:
Number: μ¬μΈμ κ³μ°ν κ°λλ₯Ό λΌλμμΌλ‘ μ§μ νλ μ«μ μμ λλ€.
λλ₯Ό λΌλμμΌλ‘ λ³ννλ €λ©΄ λμ Pi/180μ κ³±ν©λλ€. λΌλμμ λλ‘ λ³ννλ €λ©΄ λΌλμμ 180/Piλ₯Ό κ³±ν©λλ€.
grad=(radiant*180)/pi
radiant=(grad*pi)/180
Piλ μ½ 3.141593μ λλ€.
μ:
REM In this example, the following entry is possible for a right-angled triangle:
REM The side opposite the angle and the angle (in degrees) to calculate the length of the hypotenuse:
Sub ExampleSine
REM Pi = 3.1415926 is a predefined variable
Dim d1 As Double
Dim dAlpha As Double
d1 = InputBox("Enter the length of the opposite side: ","Opposite Side")
dAlpha = InputBox$("μν κ°λ(λ λ¨μ) μ
λ ₯: ","Alpha")
Print "The length of the hypotenuse is"; (d1 / sin (dAlpha * Pi / 180))
End Sub