Cos
Returns the cosine of an angle
result = Cos( angle )
angle
The argument number is measured in radians (not degrees).
The value returned by this function is undefined for values of angle with an absolute value of 2 ^ 63 or greater.
Output:
Syntax
Usage
result = Cos( angle )
Parameters
angle
the angle (in radians)
Return Value
Description
The argument number is measured in radians (not degrees).
The value returned by this function is undefined for values of angle with an absolute value of 2 ^ 63 or greater.
Example
Const PI As Double = 3.1415926535897932
Dim a As Double
Dim r As Double
Input "Please enter an angle in degrees: ", a
r = a * PI / 180 'Convert the degrees to Radians
Print ""
Print "The cosine of a" ; a; " degree angle is"; Cos ( r )
Sleep
Dim a As Double
Dim r As Double
Input "Please enter an angle in degrees: ", a
r = a * PI / 180 'Convert the degrees to Radians
Print ""
Print "The cosine of a" ; a; " degree angle is"; Cos ( r )
Sleep
Output:
Please enter an angle in degrees: 30 The cosine of a 30 degree angle Is 0.8660254037844387
Differences from QB
- None
See also