Массивы записей. Паскаль

[MMARKIN]

Составьте программу, которая описывает массив записей жильцов дома, отображая в нем следующую информацию о каждом: номер квартиры, фамилия, имя, возраст, для
лиц старше 18 лет в зависимости от рода занятий (учеба, работа, пенсия) – запись
места учебы, места работы и трудового стаже, для пенсионеров – год выхода на
пенсию. Программа должна обеспечивать ввод данных, поиск самого юного и самого
пожилого жильца, поиск студентов, пенсионеров.

From Stilet: Нормательно назвать тему не судьба?

[Stilet]

Ну дык запись так делай:

TYPE Trec=RECORD
 Nomer,F,I,O:STRING;
 Vozrast:BYTE;
 RodZan:STRING;
....
 ну и так далее поля
END;

Потом массив:

var mass:array[1..10] of TRec;

Вводи:

FOR i:=1 TO 10 DO BEGIN
 WITH mass DO BEGIN
   WRITE('Номер');READLN(mass[i].Nomer);
....
 И так все поля
 END:
END;

Ну и поиск скажем поиск самого юного:

VAR Min,k:BYTE;
FOR i:=1 TO 10 DO 
 WITH mass DO
   IF Min>mass[i].возраст THEN BEGIN
     min:=mass[i].возраст;k:=i;
   END:
{Тут выводи все поля, под номером минимального возраста}
   WRITE('Номер');READLN(mass[k].Nomer);
..........................

Ферштеен?

[MMARKIN]

не получается с прогой, помогите пожалуйста