Pascal - Stocker dans une matrice

Fermé
Artic - 27 mai 2011 à 16:40
KX Messages postés 16752 Date d'inscription samedi 31 mai 2008 Statut Modérateur Dernière intervention 31 août 2024 - 27 mai 2011 à 17:17
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


A voir également:

1 réponse

KX Messages postés 16752 Date d'inscription samedi 31 mai 2008 Statut Modérateur Dernière intervention 31 août 2024 3 019
27 mai 2011 à 17:17
Met nous le code complet (déclaration de la matrice et affichage), tu enregistres la première ligne en j=0 alors que tu commences toujours par i=1, je me demande s'il n'y a pas un problème dans tes indices, par exemple en affichant à l'écran à partir de j=1 au lieu de 0
0