Текущий архив: 2007.06.10;
Скачать: CL | DM;
Вниз
Считывание матрицы Найти похожие ветки
← →
newnewnew (2007-04-17 11:55) [0]Подскажите, как быстрее всего считать из текстового файла матрицу в массив
M: array [1..100,1..100] of Double;
Внешний файл:
1 2 3 4 5
1 2 3 4 5
1 2 3 4 5
1 2 3 4 5
1 2 3 4 5
← →
newnewnew (2007-04-17 11:55) [1]Или такой внешний файл:
1 2 3 4 5
1 2 3 4 5
1 2 3 4 5
← →
Сергей М. © (2007-04-17 12:12) [2]Размерности твоего массива не совпадают с размерностями матриц, примеры которых ты привел.
Что на это скажешь ?
← →
newnewnew (2007-04-17 12:42) [3]Размерность любая
← →
Сергей М. © (2007-04-17 12:46) [4]
> Размерность любая
Любая так любая)
Но размерности матрицы, "изображенной" в файле, должны в точности соответствовать размерностям массива, а у тебя они не соответствуют.
← →
newnewnew (2007-04-17 13:06) [5]Но она же меньше чем размерность матрицы. Что из этого?
← →
Сергей М. © (2007-04-17 13:08) [6]
> она же меньше чем размерность матрицы. Что из этого?
Ты что, с дуба упал ?)
Ну и в какое "место массива" должно считывать твою матрицу при этом ?
← →
MBo © (2007-04-17 15:01) [7]прочитать построчно, разделить по пробелам.
← →
palva © (2007-04-17 21:15) [8]
{$APPTYPE CONSOLE}
var
M: array [1..100,1..100] of Double;
f: Text;
i, j: Integer;
begin
AssignFile(f, "infile.txt");
Reset(f);
i := 1;
while not Eof(f) do begin
j := 1;
while not Eoln(f) do begin
Read(f, M[i][j]);
j := j + 1;
end;
ReadLn(f);
i := i + 1;
end;
CloseFile(f);
ReadLn
end.
Страницы: 1 вся ветка
Текущий архив: 2007.06.10;
Скачать: CL | DM;
Память: 0.48 MB
Время: 0.026 c
