Помогите написать функцию в паскале, которая читает матрицу вещественных чисел из заданного файла

Question

Информатика

Русланка

13 мая, 22:14

Помогите написать функцию в паскале, которая читает матрицу вещественных чисел из заданного файла

+1

Ответы (1)

Знаете ответ на вопрос?

Симаня · Answer 1

Function read (file:string, size:integer) : array[1 ... 1000,1 ... 1000] of integer;

var t : text;

var i, j : integer;

var a:array[1 ... 1000, 1 ... 1000] of integer;

begin

assign (t, path) ; reset (t) ;

for i : = 1 to size do begin

for j : = 1 to size do read (t, a[i, j]) ;

readln () ; end;

read: = a;

end.