Cos
Returns the cosine of an angle
Syntax
`
Declare Function Cos ( ByVal angle As Double ) As Double
`
Usage
`
result = Cos( angle )
`
Parameters
`angle`
the angle (in radians)
Return Value
Returns the cosine of the argument `angle` as a `Double` within the range of `-1.0` to `1.0`.
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.
`Cos` can be overloaded as operator to accept user-defined types.
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
`
Output:

    Please enter an angle in degrees: 30
    The cosine of a 30 degree angle Is 0.8660254037844387

Differences from QB

- None

See also

- `Acos`
- `Sin`
- `Tan`
- A Brief Introduction To Trigonometry