01 семестр / К экзамену-зачёту / Все задачи с экзамена в формате PAS / MOD / D

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.