Массив структур

[AllenWallker]

1)Создать массив структур для описания людей с полями:фамилия,возраст,цвет волос,адрес проживания.Вывести на экран и в отдельный файл все данные про людей с введенным с клавиатуры цветом волос и младше заданного возраста.Прочитать данные с файла.Программу оформить в виде процедур.
2) Список студенческой группы записан на диске как текстовый файл.Каждая строка списка содержит фамилию студента и три экзаменационные оценки,при чем список никак не упорядочен.Составить программу,которая корректирует список и сортирует его либо по среднему баллу, либо по алфавиту, либо по оценкам по заданному предмету.
Список записывается в файл либо под старым, либо под новым именем.

Помогите! Очень прошу! Завтра семестр закрывать(((

[type_Oleg]

Структуры struct - это в Си. А в Паскале используют термин " запись " record.
Что же надо ?

[AllenWallker]

record нужно

[type_Oleg]

type tHomoSapiens=packed record
 fam:string[20];
 age:byte;
 hcolor:string[10];
 adr:string[30];
end;
var People:array of tHomoSapiens;
   f:file of tHomoSapiens;

И т.д.