Chr function

  DECLARATION:  Chr(x : Byte);

      PURPOSE:  Returns a character with a specified ordinal value.

         UNIT:  System

  RESULT TYPE:  Char

      REMARKS:  Where x is an integer-type expression; the result
                is the character with the ordinal (ASCII) value of x.

                NOTE:  Same result can be obtained by using the # operator.
                       ie. Chr(65), #65, and 'A' are all equivalent.

      EXAMPLE:  Var
                   Loop : Byte;

                Begin
                   Writeln('ASCII Values:');
                   For Loop := 33 to 125 Do
                      Writeln(Loop,' = ',Chr(Loop));
                End.