ABS                        Return Absolute Value                     pp 139

 Syntax:  Abs (NumVar) ;

 Type:    Real, Integer

 Form:    Function

 Purpose: ABS returns the absolute value of NumVar, as the same type.
          The argument NumVar can be of type REAL or INTEGER.

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


 Usage:
       VAR
          NumVar := Abs (NumVar)            ;

       BEGIN
          WriteLn ('Value = ',Abs (NumVar)) ;
       END.