описать следующую структуру
Сотр.
ФИО
Дата поступления
с вариантной частью записи
Студент - Средний балл
Сотррудник - личный номер
другое - комментарии
очень жду помощи...

Type?
WorkType = (wtStudent, wtWorker);
Work = Record
FIO: String[50]; { ФИО }
StartDate: String[20]; { Дата поступления }
Comments: String; { другое - комментарии }
{ с вариантной частью записи }
Case Style: WorkType Of
wtStudent: (Average: Integer); { Студент - Средний балл }
wtWorker: (ID: Longint); { Сотрудник - личный номер }
End;