Revision 

This is an old revision of KeyPgSqr made by DoS386 on 2008-10-22 04:28:50.

SQR

Returns a square root of a number

Syntax:
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 domain error (-1.#IND).

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.

Examples:
'' 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