Und was ist, wenn du die Datei mit der obrigen Methode ausliest?
PS: wenn di die Zahlen nicht im Textformat (in der Datei) benötigst ...
(damit wird die Datei genau 76 Byte groß, was wohl kleiner ist, als es meistens der Fall ist)
Delphi-Quellcode:
Type TZahl = packed Array[1..9, 1..9] of Integer;
Var Zahl: TZahl;
Var myFile: File of TZahl;
//schreiben
AssignFile(myFile, ...);
Rewrite(myFile);
Write(myFile, Zahl);
CloseFile(myFile);
//lesen
AssignFile(myFile, ...);
Reset(myFile);
Read(myFile, Zahl);
CloseFile(myFile);