Cos Function

කෝණයක සයිනය ආපසු ලබා දෙයි. කෝණය රේඩියන් වලින් විශේෂණය කර ඇත. ප්‍රතිඵලය -1 සහ 1 අතර වේ.

Using the angle Alpha, the Cos-Function calculates the ratio of the length of the side that is adjacent to the angle, divided by the length of the hypotenuse in a right-angled triangle.

Cos(Alpha) = Adjacent/Hypotenuse

කාරක රීතිය:

Log (Number)

ආපසු ලබාදෙන අගය:

Double

පරාමිතීන්:

අංකය: ඔබට සයිනය ගණනය කිරීමට අවශ්‍ය කෝණය රේඩියන් වලින් අර්ථ දක්වන සංඛ්‍යාත්මක ප්‍රකාශනය.

අංශක රේඩියන වලට පරිවර්තනය කිරීමට අංශක Pi/180ගෙන් ගුණ කරන්න සහ රේඩියන අංශක වලට පරිවර්තනය කිරීමට රේඩියන 180/Piගෙන් ගුණ කරන්න.

අංශක=(රේඩියන*180)/Pi

රේඩියන=(අංශක*Pi)/180

Pi is here the fixed circle constant with the rounded value 3.14159...

Error codes:

5 Invalid procedure call

උදාහරණය:

' The following example allows for a right-angled triangle the input of

' secant and angle (in degrees) and calculates the length of the hypotenuse:

Sub ExampleCosinus

REM rounded Pi = 3.14159

Dim d1 As Double, dAngle As Double

    d1 = InputBox$ (""Enter the length of the adjacent side: ","Adjacent")

    dAngle = InputBox("Enter the angle Alpha (in degrees): ","Alpha")

    Print "The length of the hypothenuse is"; (d1 / cos (dAngle * Pi / 180))

End Sub