[delphi/pascal] Odczytywanie macierzy z pliku

0

Witam,
mam problem z odczytaniem danych z pliku. Dane są zapisane w takiej postaci:

2 5 4 2 10
23 5 6 0 7
31 19 14 7 9
38 2 7 4 18
1 3 0 2 3

2 5 4
23 5 6
1 3 0

Muszę odczytać dane i zapisać je w tablicach, dane reprezentują macierze, rozmiary mam zadeklarowane w programie. Próbowałem to wykonać, natomiast efektu nie było żadnego, najpewniej sam przekombinowałem rozwiązanie. Nie proszę o kod, ale o jakieś wskazówki bądź listę kroków jak wykonać taką procedurę do odczytu. Język jak w temacie - Pascal.

Pozdrawiam

0

Jako wskazówka niech posłuży fragment z pomocy Turbo Pascala:

 uses WinCrt;

 var
   f : Text;
   i, j : Integer;
 begin
   Assign(f,'TEST.TXT');
   Rewrite(f);
   { Create a file with 8 numbers and some
     whitespace at the ends of the lines }
   Writeln(f,'1 2 3 4 ');
   Writeln(f,'5 6 7 8 ');
   Reset(f);
   { Read the numbers back. SeekEoln returns
     TRUE if there are no more numbers on
     the current line; SeekEof returns TRUE
     if there is no more text (other than
     whitespace) in the file. }
   while not SeekEof(f) do
   begin
     if SeekEoln(f) then
       Readln; { Go to next line }
     Read(f,j);
     Writeln(j);
   end;
 end.

Tu jest wszystko dokładnie opisane.

PS. Niestety Borland nie ustrzegł się błędu. Na końcu brakuje instrukcji zamknięcia pliku

Close(f);

1 użytkowników online, w tym zalogowanych: 0, gości: 1