[dr. F.I.N.]

Код:

type
  MyValueType=record
     x,y: integer;
  end;

  MyType=record
    C: Integer;
    Values: array of MyValueType;
  end;

const
  a: array [0..1] of MyValueType = ((x: 2; y: 3), (x: 4; y: 5));
  R: MyType = (C: 2; Values: @a);