Константы типа записей

Объявление константы типа записи содержит идентификатор и значение каждого поля записи.

Ограничения

Поля должны быть определены в том же порядке, в котором они были объявлены при определении типа записи.

• Если запись содержит поля файлового типа, то константы такого типа записи не могут быть объявлены.
• Если запись содержит вариант, то определены могут быть только поля указанного варианта.
• Если вариант содержит поле метки, то ее значение должно быть задано.

Пример

Type Point = Record
          X, Y : Real;
               End;
      Vector = Array [0..1] Of Point;
       Month = (Jan, Feb, Mar, Apr, May, Jun, Jul, Aug, Sep, Oct, Nov, Dec);
        Date = Record
             D : 1..31;
             M : Month;
             Y : 1900..1999;
               End;
  Const Origin : Point = (X : 0.0; Y : 0.0);
          Line : Vector = ((X : -3.1; Y : 1.5), (X : 5.8; Y : 3.0));
       SomeDay : Date = (D : 2; M : Dec; Y : 1960);