Bonjour,
nono ceci n'est pas correct, car si tu veux écrire dans le fichier il fatu que tu utilises write et non read !!!
D'autre part, pourquoi te compliques tu la vie pour déclarer ta matrice ?
Un tableau double entrée ferait aussi bien l'affaire :
matrice : array [1..9,1..9]
Puis lorsque tu veux accéder à l'élément [i,j] ben tu fais matrice[i,j] !!!
Enfin pour le fichier je prendaris un simple fichier texte.
donc moi je ferais cela :
Citation :
procedure sauvegarde(m:matrice);
var fichier : textfile;
i,j:cardinal;
begin
assignfile(fichier,'mat.txt'); //c'est peut-être assignfile au lieu de assign. De même pour close et closefile.
rewrite(fichier);
for i:=1 to 9 do begin
for j:=1 to 9 do begin write(inttostr(m[i,j])); // inttostr : transforme un nb en une chaine de caractères
end;
end;
closefile(fichier);
end;
|
PS : c'est de delphi ou du pascal 7 ??
Message édité par davidmarli le 01-05-2006 à 17:52:01