Технический форум - Работа с файлами на Паскале

Технический форум (http://www.tehnari.ru/)

- Delphi, Kylix and Pascal (http://www.tehnari.ru/f43/)

- - Работа с файлами на Паскале (http://www.tehnari.ru/f43/t54762/)

Работа с файлами на Паскале

Добрый вечер))) помогите ,пожалуйста, составить программу и к ней составить блок-схему))
Подготовить данные о абитуриентах, поступающих в техникум. Информацию о каждом абитуриенте оформить в виде записи, содержащей следующие поля
1. Фамилия, имя, отчество.
2. Год рождения.
3. Год окончания школы.
4. Оценки в аттестате.
5. Признак – нуждается ли в общежитии.
6. Оценки вступительных экзаменов.
Разработать программу записи подготовленных данных во внешний файл и обработки созданного внешнего файла.
I. Из внешнего файла, содержащего исходные данные удалить записи, соответствующие абитуриентам, имеющим средний балл в аттестате меньше 4.
II. Используя внешний файл, содержащий исходные данные, добавить N записей и распечатать список абитуриентов, не нуждающихся в общежитии; N=2.

Цитата:

Сообщение от Tanuysha (Сообщение 555616)

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

Класс для вашей базы

Код HTML:

My_Base=record

        FIO:String;

        Year_New:String[10];

        Year_End_School:String[10];

        Atestat:String;

        priznak:String;

        Ocenka_Ikzamena:string[100];

end;

Цитата:

Сообщение от Tanuysha (Сообщение 555616)

I. Из внешнего файла, содержащего исходные данные удалить записи, соответствующие абитуриентам, имеющим средний балл в аттестате меньше 4.

предлога такой вариант.
1. Открыть фаил прочитать его и записать в динамически расширяемый массив.
2. ну а далее все проще сравнить элемент массива (всё что меньше 4 перенести в конец и обрезать массив..)
3. после завершения процесса записать массив обратно в файл. и всё