подскажзите плз(по turbo паскалю)

Доброго времени суток.

Прежде чем браться за заполнение матрицы, нужно определиться с форматом файла. Что это за файл? Текстовый, бинарный? В зависимости от ответа будет и решение. Допустим, файл текстовый. Тогда обычно первой строчкой идет размерность матрицы, которую надо прочитать в самом начале (предполагается, что файл уже открыт) .

ReadLn(N,M);

Дальше в зависимости от того, как в файле записаны элементы выполняется чтение. Часто элементы записаны по строкам. Тогда считать их можно так.

for i:=1 to N do begin {цикл по строкам}
for j:=1 to M do Read(F, A[i,j]; {читаем элементы строки}
ReadLn; {переходим к новой строке (из буфера ввода удаляются символы CRLF)}
end;

При иной организации файла чтение надо будет делать несколько иначе, но общая идея останется такой же.

Удачи!

PS Естественно, массив должен быть объявлен таким образом, чтобы N и M не вышли за границу размерности.

Gennady прав. только не забудьте для открытия файла использовать Assign(F, "текстовое имя файла. расширение") - для инициализации переменной (здесь var F: Text);

Затем функцию Reset(F) - открытие файла для чтения.. . и Close(F) - для закрития (вконце) .

и в строчке for j:=1 to M do Read(F, A[i,j] у Gennady в ответе поставить закрывающую скобку) )

Удачи..

Ты хочешь чтобы за тебя программу написали или разъяснили непонятный для тебя момент?

for i:=0 to x do
for j:=0 to x do begin
<читаем что надо из файла>;
a[i,j]:= <ну что там надо прочитать>;
end;