Sin Function

αžαŸ’αžšαž‘αž”αŸ‹β€‹αžŸαŸŠαžΈαž“αž»αžŸβ€‹αž“αŸƒβ€‹αž˜αž»αŸ†αž˜αž½αž™β€‹Β αŸ” αž˜αž»αŸ†β€‹αžαŸ’αžšαžΌαžœβ€‹αž”αžΆαž“β€‹αž”αž‰αŸ’αž‡αžΆαž€αŸ‹β€‹β€‹β€‹αž‡αžΆβ€‹αžšαŸ‰αžΆαžŠαŸ’αž™αž„αŸ‹Β αŸ” αž›αž‘αŸ’αž’αž•αž›β€‹αžŸαŸ’αžαž·αžβ€‹αž“αŸ…β€‹αž…αž“αŸ’αž›αŸ„αŸ‡ -1 αž“αž·αž„ 1Β αŸ”

αžŠαŸ„αž™β€‹αž”αŸ’αžšαžΎβ€‹αž˜αž»αŸ† Alpha αž’αž“αž»αž‚αž˜αž“αŸ Sin αžαŸ’αžšαž‘αž”αŸ‹β€‹αžŸαž˜αžΆαž˜αžΆαžαŸ’αžšβ€‹αž“αŸƒβ€‹αž”αŸ’αžšαžœαŸ‚αž„β€‹αž‡αŸ’αžšαž»αž„β€‹αžˆαž˜β€‹αž“αŸƒβ€‹αž˜αž»αŸ† αž‘αŸ…β€‹αž“αžΉαž„β€‹αž”αŸ’αžšαžœαŸ‚αž„β€‹αž’αŸŠαžΈαž”αŸ‰αžΌαž‘αžΈαž“αž»αžŸβ€‹αž€αŸ’αž“αž»αž„β€‹αžαŸ’αžšαžΈαž€αŸ„αžŽβ€‹αž€αŸ‚αž„Β αŸ”

Sin(Alpha) = αž‡αŸ’αžšαž»αž„β€‹αžˆαž˜/αž’αŸŠαžΈαž”αŸ‰αžΌαž‘αžΈαž“αž»αžŸ

αžœαžΆαž€αŸ’αž™β€‹αžŸαž˜αŸ’αž–αž“αŸ’αž’ αŸ–

Sin (Number)

αžαž˜αŸ’αž›αŸƒβ€‹αžαŸ’αžšαž‘αž”αŸ‹ αŸ–

αž‘αŸ’αžœαŸ

αž”αŸ‰αžΆαžšαŸ‰αžΆαž˜αŸ‰αŸ‚αžαŸ’αžš αŸ–

αž…αŸ†αž“αž½αž“β€‹ αŸ– αž€αž“αŸ’αžŸαŸ„αž˜β€‹αž›αŸαžβ€‹αžŠαŸ‚αž›β€‹αž€αŸ†αžŽαžαŸ‹β€‹αž˜αž»αŸ†β€‹β€‹αž‡αžΆβ€‹αžšαŸ‰αžΆαžŠαŸ’αž™αž„αŸ‹ αžŠαŸ‚αž›β€‹αž’αŸ’αž“αž€β€‹αž…αž„αŸ‹β€‹αž‚αžŽαž“αžΆβ€‹αžŸαŸŠαžΈαž“αž»αžŸΒ αŸ”

αžŠαžΎαž˜αŸ’αž”αžΈβ€‹αž”αž˜αŸ’αž›αŸ‚αž„β€‹αžŠαžΊαž€αŸ’αžšαŸβ€‹αž‡αžΆβ€‹αžšαŸ‰αžΆαžŠαŸ’αž™αž„αŸ‹ αž‚αž»αžŽβ€‹αžŠαžΊαž€αŸ’αžšαŸβ€‹αž‡αžΆαž˜αž½αž™β€‹αž“αžΉαž„ pi/180Β αŸ” αžŠαžΎαž˜αŸ’αž”αžΈβ€‹αž”αž˜αŸ’αž›αŸ‚αž„β€‹αžšαŸ‰αžΆαžŠαŸ’αž™αž„αŸ‹β€‹αž‡αžΆβ€‹αžŠαžΊαž€αŸ’αžšαŸ αž‚αž»αžŽβ€‹αžšαŸ‰αžΆαžŠαŸ’αž™αž„αŸ‹β€‹αž‡αžΆαž˜αž½αž™β€‹αž“αžΉαž„ 180/piΒ αŸ”

grad=(radiant*180)/pi

radiant=(grad*pi)/180

Pi αž‚αžΊβ€‹αž”αŸ’αžšαž αŸ‚αž› 3.141593Β αŸ”

Error codes:

5 αž€αžΆαžšβ€‹αž αŸ…β€‹αž”αŸ‚αž”αž”αž‘β€‹αž˜αž·αž“β€‹αžαŸ’αžšαžΉαž˜αžαŸ’αžšαžΌαžœ

αž§αž‘αžΆαž αžšαžŽαŸ αŸ–

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("Enter the angle Alpha (in degrees): ","Alpha")

    Print "The length of the hypotenuse is"; (d1 / sin (dAlpha * Pi / 180))

End Sub