Помогите создать программу на паскаль:
Разработать
программу в соответствии со своим вариантом: создать структуру типа «запись», выполнить
обработку данных.
14. Дан массив записей,
содержащий  сведения о лекциях:


-         предмет;


-         фамилию
и преподавателя;


-         шифр
группы;


-         номер аудитории;


-         день
недели;


-         номер
пары.

Правильно, так ему и надо, с конструктором)))

type  teach   = record    firstName, lastName: string;  end;  lecture = record    teacher: teach;    subject: string;    shifr, auditoria, day, para: integer;    constructor create(teachFirstName, teachLastName, subject_: string; shifr_, auditoria_, day_, para_: integer);    begin      teacher.firstName := teachFirstName;      teacher.lastName := teachLastName;      subject := subject_;      shifr := shifr_; auditoria := auditoria_; day := day_; para := para_;    end;  end;var  a: array [1..2] of lecture;begin  for i: byte := 1 to 2 do  begin    a[i] := new lecture('Ололош' , 'Джигурдович', 'Джигурдоведение', 2, 5, 6, 7);  end;end.