[BoRoV]

Из двух типизированных файлов с компонентами записей
type
Stud = record
Year: Integer;
Name: String[20];
end;

Ну дык ты же щас приводишь просто список имен и годов, это не типизированный.