Исправить ошибки-переделать лабораторную работу на файлы delphi (двусвязный список)

ЗАДАНИЕ:

Файл Студент. Структура записи:

• ФИО (40 знаков);

• номер курса (1 знак);

• номер группы (1 знак);

• успеваемость - 5 экзаменов в каждой из 10 сессий

• форма обучения(целевая, договорная)(1 знак);

• экзамен:

 - наименование предмета(10 знаков);

 - оценка(1 знак).

Создайте файл Студент.

Занесите в отдельные файлы записи о студентах различных форм обучения.

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