Sqr
Returns a square root of a number
Syntax
`
Declare Function Sqr ( ByVal number As Double ) As Double
`
Usage
`
result = Sqr( number )
`
Parameters
`number`
the number (greater than or equal to zero)
Return Value
Returns the square root of the argument `number`.
If `number` equals zero, Sqr returns zero.
If `number` is less than zero, Sqr returns a special value representing "not defined", printing like "NaN" or "IND", exact text is platform dependent.
Description
This is the same as raising the argument number to the one-half power: y = x ^ (1/2) . The required `number` argument can be any valid numeric expression greater than or equal zero.
Example
`
'' Example of sqr function: Pythagorean theorem
Dim As Single a , b
Print "Pythagorean theorem , right triangle"
Print
Input "Please enter one leg side length: ", a
Input "Please enter the other leg side length: ", b
Print
Print "The hypotenuse has a length of: " ; Sqr ( a * a + b * b )
Sleep
`
The output would look like:

    Pythagorean theorem , right triangle

    Please enter one leg side length: 3
    Please enter the other leg side length: 4

    The hypotenuse has a length of: 5

Differences from QB

- None

See also

- Arithmetic Operators