[lmikle]

Код:

type
  TRec = record
    Name : String;
    Value : Double;
  end;

const
  A : Array [1..2] Of TRec = ((Name: 'a'; Value: 0.1),
                              (Name: 'b'; Value: 0.2));