Cara menympan data matriks 100 x 100 ke dalam file

Saya sedang membuat program matriks 100 x 100, yang hasilnya akan di simpan ke dalam file.
Bagaimana caranya agar pada saat perintah writeln setiap baris dapat terisi 100 kolom?



if SaveFile.Execute then
  begin
  sp:=' ';
    AssignFile(F, SaveFile.Filename);
    Rewrite(F);
    for n:=0 to nt do
    begin
      nStr:=FormatFloat('00',n);
      for i:=0 to it do
      begin
        TStr[n,i]:=FormatFloat('00.000',T[n,i]);
      end;
      Writeln (F,nStr,sp,TStr[n,0],sp,TStr[n,1],sp,.....,TStr[n,it]);?????
               
    end;
    CloseFile(F);

0 komentar:

Posting Komentar