Создать файл.

[ROMA2PVT]

так те решить сложно? если нет тогда реши,а есл да тогда ты не прогромист или не можешь ее самм решить.

<<offtop>>
Оу!!!ХоХоХо!!!В детстве это называлось а тебе слабо.На слабо здесь на форуме никого не возьмёшь.Жди сегодня фрилансеры должны написать тебе.Да и объясните почему я за кого то бесплатно должен писать.

[kot i @]

Создать файл, содержащий сведения о том ,какие из пяти предлагаемых дисциплин по выбору желает слушать студент. Структура записи: фамилия студента ,номер группы, пять дисциплин, средний балл успеваемости. Выбираемая дисциплина отмечается символом- 1,иначе -пробелом. Напечатать списки студентов, желающих прослушать дисциплину Х. если число желающих превысит восемь человек, то необходимо отобрать студентов имеющих более высокий балл успеваемости.
Вот структуру как организовать ее как запись

type
student = record
surname: string;
groupnumber: integer;
d1,d2,d3,d4,d5: string;
ball: integer;
end;

...

var
students: array[1..128] of student;

из записи лучше оргинизовать массив,нужно сделать всю программу!

[kot i @]

а кто сказал что бесплатно!