Pascal - Stocker dans une matrice
Artic
-
KX Messages postés 16761 Date d'inscription Statut Modérateur Dernière intervention -
KX Messages postés 16761 Date d'inscription Statut Modérateur Dernière intervention -
Bonjour,
J'ai un probleme. J'ai un fichier texte de ce genre:
qqqqqqqqqqqqqqqqqqqqq
qqqqeqqqqqeqqqqqeqqqq
qqqqqiqqqqiqqqqiqqqqq
qqqqqqlqqqlqqqlqqqqqq
qqqqqqqrqqrqqrqqqqqqq
qqqqqqqqaqaqaqqqqqqqq
qqqqqqqqqhhhqqqqqqqqq
qqqqeilrahcharlieqqqq
qqqqqqqqqhhhqqqqqqqqq
qqqqqqqqaqaqaqqqqqqqq
qqqqqqqrqqrqqrqqqqqqq
qqqqqqlqqqlqqqlqqqqqq
qqqqqiqqqqiqqqqiqqqqq
qqqqeqqqqqeqqqqqeqqqq
qqqqqqqqqqqqqqqqqqqqq
Je souhaiterais le stocker dans une matrice. J'ai donc creer le bout de programme suivant:
Begin
Assign(Ftext,nom); //Lecture du fichier
Reset(Ftext);
j:=0;
i:=0;
While not EOF (Ftext) do
Begin // stockage
ReadLn(Ftext,Ligne);
WriteLn(Ligne);
cmax:=length(Ligne);
for i:=1 to cmax do
mat[i,j]:=Ligne[i];
j:=j+1;
lmax:=j;
end;
End;
Le probleme que j'ai c'est que lorsque je lit cette matrice, je me rends compte que la premiere ligne du fichier n'a pas ete stocker. J'obtient donc une matrice qui contient toutes les lettres au bon endroit sauf la premiere ligne du fichier...
Quelqu'un saurait pourquoi?
(voila ce que j'obtient lorsque je demande d'afficher la matrice:
qqqqeqqqqqeqqqqqeqqqq
qqqqqiqqqqiqqqqiqqqqq
qqqqqqlqqqlqqqlqqqqqq
qqqqqqqrqqrqqrqqqqqqq
qqqqqqqqaqaqaqqqqqqqq
qqqqqqqqqhhhqqqqqqqqq
qqqqeilrahcharlieqqqq
qqqqqqqqqhhhqqqqqqqqq
qqqqqqqqaqaqaqqqqqqqq
qqqqqqqrqqrqqrqqqqqqq
qqqqqqlqqqlqqqlqqqqqq
qqqqqiqqqqiqqqqiqqqqq
qqqqeqqqqqeqqqqqeqqqq
qqqqqqqqqqqqqqqqqqqqq
J'ai un probleme. J'ai un fichier texte de ce genre:
qqqqqqqqqqqqqqqqqqqqq
qqqqeqqqqqeqqqqqeqqqq
qqqqqiqqqqiqqqqiqqqqq
qqqqqqlqqqlqqqlqqqqqq
qqqqqqqrqqrqqrqqqqqqq
qqqqqqqqaqaqaqqqqqqqq
qqqqqqqqqhhhqqqqqqqqq
qqqqeilrahcharlieqqqq
qqqqqqqqqhhhqqqqqqqqq
qqqqqqqqaqaqaqqqqqqqq
qqqqqqqrqqrqqrqqqqqqq
qqqqqqlqqqlqqqlqqqqqq
qqqqqiqqqqiqqqqiqqqqq
qqqqeqqqqqeqqqqqeqqqq
qqqqqqqqqqqqqqqqqqqqq
Je souhaiterais le stocker dans une matrice. J'ai donc creer le bout de programme suivant:
Begin
Assign(Ftext,nom); //Lecture du fichier
Reset(Ftext);
j:=0;
i:=0;
While not EOF (Ftext) do
Begin // stockage
ReadLn(Ftext,Ligne);
WriteLn(Ligne);
cmax:=length(Ligne);
for i:=1 to cmax do
mat[i,j]:=Ligne[i];
j:=j+1;
lmax:=j;
end;
End;
Le probleme que j'ai c'est que lorsque je lit cette matrice, je me rends compte que la premiere ligne du fichier n'a pas ete stocker. J'obtient donc une matrice qui contient toutes les lettres au bon endroit sauf la premiere ligne du fichier...
Quelqu'un saurait pourquoi?
(voila ce que j'obtient lorsque je demande d'afficher la matrice:
qqqqeqqqqqeqqqqqeqqqq
qqqqqiqqqqiqqqqiqqqqq
qqqqqqlqqqlqqqlqqqqqq
qqqqqqqrqqrqqrqqqqqqq
qqqqqqqqaqaqaqqqqqqqq
qqqqqqqqqhhhqqqqqqqqq
qqqqeilrahcharlieqqqq
qqqqqqqqqhhhqqqqqqqqq
qqqqqqqqaqaqaqqqqqqqq
qqqqqqqrqqrqqrqqqqqqq
qqqqqqlqqqlqqqlqqqqqq
qqqqqiqqqqiqqqqiqqqqq
qqqqeqqqqqeqqqqqeqqqq
qqqqqqqqqqqqqqqqqqqqq
A voir également:
- Pascal - Stocker dans une matrice
- Turbo pascal - Télécharger - Édition & Programmation
- My pascal - Télécharger - Édition & Programmation
- Dev pascal - Télécharger - Édition & Programmation
- Diagonale secondaire d'une matrice - Forum C
- Uses crt pascal - Forum Pascal