Ord.PAS

Language:
Русский
English

  {Ord.PAS}
  ▀▀▀▀▀▀▀▀▀▀▀
 {Sample code for the Ord function.}

  uses WinCrt;

  type
    Colors = (RED,BLUE,GREEN);
  begin
    Writeln('BLUE has an ordinal value of ',
            Ord(BLUE));
    Writeln('The ASCII code for "c" is ',
            Ord('c'), ' decimal');
  end.

Тэги:
| G+
Код для вставки: :: :: :: ::
Поделиться: // //