Чем отличается текстовая информация от графической?

Текcтовая .dok а графическая .pas (файлы)

// pascalabc.net 3.2, сборка 1417 от 28.03.2017 // внимание! если программа не работает, обновите версию! procedure view(fams: array of string; balls: array[,] of integer); begin   for var i: =0 to fams.length-1 do begin       write(fams[i],': ');       balls.row(i).println       end end; begin   var n: =readlninteger('количество студентов: ');   var m: =readlninteger('количество оценок у студента: ');   var afam: =new string[n];   var aball: =new integer[n,m];   for var i: =0 to n-1 do begin       afam[i]: =readlnstring('студент '+(i+1)+': ');       write('оценки студента: ');       for var j: =0 to m-2 do read(aball[i,j]);       readln(aball[i,m-1]);       end;   writeln('*** принятые сведения ***');   view(afam,aball);   var s: =aball.rows.select(x-> x.all(y-> y=           .where(x-> not x[1]).select(x-> x[0]-1).toarray;   var n1: =s.count;   if n1> 0 then begin       var t: =new string[n1];       var t1: =new integer[n1,m];       for var i: =0 to n1-1 do begin           t[i]: =afam[s[i]];           for var j: =0 to m-1 do t1[i,j]: =aball[s[i],j]           end;       afam: =copy(t);       aball: =copy(t1);       writeln('*** после удаления отличников ***');       view(afam,aball);       end end. пример количество студентов: 5 количество оценок у студента: 3 студент 1: иванов и.и. оценки студента: 5 4 5 студент 2: петров п.п. оценки студента: 5 5 5 студент 3: сидорова т.с. оценки студента: 5 5 5 студент 4: козлова к.к. оценки студента: 4 4 3 студент 5: макаров м.м. оценки студента: 4 5 4 *** принятые сведения *** иванов и.и.: 5 4 5 петров п.п.: 5 5 5 сидорова т.с.: 5 5 5 козлова к.к.: 4 4 3 макаров м.м.: 4 5 4 *** после удаления отличников *** иванов и.и.: 5 4 5 козлова к.к.: 4 4 3 макаров м.м.: 4 5 4