Опишите комбинированный тип для записей, содержащих следующие данные учеников: фамилию, имя, год рождения, рост

Type dan = record
Surname: string[30];
Name: string[30];
Year: integer;
Growth: real;
Weight: real;