program Project1;

{$APPTYPE CONSOLE}
{$R *.res}

uses
  System.SysUtils;

TYPE
  Trec = record
    Member1, Member2: Integer;
  end;

CONST
  IntRec: Trec = (Member1: 55; Member2: 2);

begin
  Writeln(IntRec.Member1);
  Writeln(IntRec.Member2);
  Readln;
end.