ТИПИЗИРОВАННЫЕ ФАЙЛЫ - нужна помощь..., ТИПИЗИРОВАННЫЕ ФАЙЛЫ - нужна помощь... Опции

[LLIRIKS]

Если кому несложно - помогите...
а вот и сама задача:

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

1. Фамилия, имя, отчество.
   
   
   
   
2. Год рождения.
   
   
   
   
3. Год окончания школы.
   
   
   
   
4. Оценки в аттестате.
   
   
   
   
5. Признак - нуждается ли в общежитии.
   
   
   
   
6. Оценки вступительных экзаменов.
   
   
   

Разработать программу записи подготовленных данных во внешний файл и программу обработки созданного внешнего файла.

1. Удалить из внешнего файла все записи, удовлетворяющие условию, заданному в варианте, и распечатать информацию, оставшуюся в файле.
   
   
   
   
2. Добавить N записей в начало (конец) внешнего файла и распечатать записи полученного файла согласно конкретному варианту.
   
   
   

Методические указания

1. При подготовке исходных данных необходимо учесть, что выходная информация программы обработки внешнего файла должна составлять не менее одной четверти от входной.
   
   
   

Варианты задания

I. Из внешнего файла, содержащего исходные данные, удалить записи, соответствующие:
3. Абитуриентам, имеющим средний балл меньше 4 и хотя бы одну оценку 3 в аттестате.Распечатать полученный файл.
П. Используя внешний файл, содержащий исходные данные, добавить N записей и распечатать:
3. Список абитуриентов, имеющих средний балл больше 4,5; N=4.

[LLIRIKS]

еще вопрос: как удалить запись из типизированного файла?

Код

{-------------------------------OBRABOTKA_FAILA_1---------------------------}
 reset(F);
 clrscr;
 while (not EOF(F)) do
   begin
     read(F,S);
     with S do
       if ((AB_MAT+AB_RUS+AB_FIZ)/3<4) and ((AT_MAT=3) or (AT_RUS=3)
       or (AT_FIZ=3)) then [здесь надо бы удалить запись...];
   end;
 close(F);

и вообще кому несложно посмотрите, правильно ли я организовал обработку?
спасибо заранее...