Добрый день!
Мне необходим массив записей, при этом он должен быть константой, но у меня возникают некоторые трудности в его объявлении. Помогите пожалуйста.
type
trecord = record
x: integer;
s: string;
end;
tRecarray = array [1..2] of trecord;
const
my_rec: tRecarray = ((x:3; s:'text1'), (x:5; s:'text2'));
constТак?
my_rec:
array [1..2] of record
x: integer;
s: string
end = (
(x:3; s:'text1'),
(x:5; s:'text2')
) ;
begin
writeln(my_rec[2].x);
end.