чет выдает ошибку
....................
var
studfile:Text;
recstud: Array[1..Nstud_max] of stud
;
BadStud:Array[1..Nstud_max] of Word;
i,j,y,Nstud,Nbadstud:integer;
........................перед красной ставит курсор и пишет: Error 22: Structure too large.