Click above to get retro games delivered to your door ever month!

 SQR                        Find Square of Number                     pp 141

 Syntax:  Sqr (NumVar) ;

 Type:    Integer or Real

 Form:    Function

 Purpose:  Returns the square of NumVar.

 Notes:    The returned type is the same is the argument type.


 ----------------------------------------------------------------------------


 Usage:
       VAR
          IntVar  : Integer        ;
          RealVar : Real           ;

       BEGIN
          IntVar  := Sqr (IntVar)  ;
          RealVar := Sqr (RealVar) ;
       END.