Описание типизированной  константы  с простым типом означает
        указание значения константы:

             const
               Maximum   : integer = 9999;
               Factor    : real = -0.1;
               Breakchar : char = #3;

             Как уже упоминалось ранее, значение типизированной константы
        можно задать с помощью адресного выражение-константы, то есть вы-
        ражения,  в котором используются адрес, смещение или сегмент гло-
        бальной переменной, типизированной константы, процедуры или функ-
        ции. Например:

             var
                Buffer: array[0..1023] of Byte;
             const
                BufferOfs: Word = Ofs(Buffer);
                BufferSeg: Word = Seg(Buffer);

             Поскольку типизированная константа  фактически  представляет
        собой переменную со значением константы,  она не является взаимо-
        заменяемой для обычных констант. Например, она не может использо-
        ваться в описании других констант или типов.

             const
               Min : integer = 0;
               Max : integer = 99;
             type
               Vector = array[Min..Max] of integer;

             Описание Vector является недопустимым,  поскольку Min и  Max
        являются типизированными константами.