Паскаль работа с внешними файлами

[Zin8]

Дана матрица Х. матрица В получается путем вычеркивания из Х K-ого столбца. Найти В и сумму элементов L-ого столбца. Использовать внешние файлы.
Программу написала, но она не работает как надо

program matix8;
uses crt;
var fl:text;
    a,b:array[1..10,1..10] of real;
    p,i,j,k,l,m,n:byte;
    s:real;
begin
assign(fl,'C:\PABCWork\a.txt');
rewrite(fl);
read(m,n);
writeln('Èñõîäíàÿ ìàòðèöà X:');
for i:=1 to m do
 begin
  for j:=1 to n do
   begin
    read(fl,a[i,j]);
    write(a[i,j]:6:1);
   end;
  writeln;
 end;
k:=4;
writeln('Ìàòðèöà B âû÷åðêèâàíèå ',k,' ñòðîêè:');
p:=0;
for i:=1 to m do
if i<>k then
 begin
  p:=p+1;
  for j:=1 to n do
  b[p,j]:=a[i,j];
 end;
for i:=1 to p do
 begin
  for j:=1 to n do
  write(b[i,j]:6:2);
  writeln;
 end;
l:=3;
s:=0;
for i:=1 to m do
s:=s+a[i,l];
writeln('Ñóììà ',l,' ñòîëáöà ìàòðèöû X=',s:0:1);
close(fl);
end.

хотелось бы обнаружить ошибку)

[Stilet]

А как она работает? Что именно не так делает? Пошаговку с помошью клавиши F8 делала?

[Zin8]

да, пробовала, программа говорит, что ей не нравится запись в 10 6 строке

[Zin8]

а в результате выводит пустое окно