Pascal : erreur de débutante..
Pascal : erreur de débutante.. - Delphi/Pascal - Programmation
Marsh Posté le 01-10-2006 à 20:32:59
Nan, j'ai juste copié un extrait comme indiqué dans mon premier message.
Y'a pas tout le programme, parce que ça me semble pas essentiel pour comprendre mon pb.
Marsh Posté le 02-10-2006 à 09:20:39
Reply
Marsh Posté le 02-10-2006 à 10:55:01
| aldo13000 a écrit : le readln; est a remplacer par readln(f); |
Tout a fait, 
Au meme titre , plutot que de faire :
Code :
|
Préfere faire :
Code :
|
Marsh Posté le 02-10-2006 à 19:07:33
Ca me rappelle le python pour l'incrémentation en n = n+1 ^^
Marsh Posté le 02-10-2006 à 19:07:42
Merci ! (et merci pour la fonction qui sert à incrémenter)
Effectivement c'est une erreur bien bete..
Message édité par $temp le 03-10-2006 à 00:03:11
Marsh Posté le 04-10-2006 à 10:32:03
| $temp a écrit : Merci ! (et merci pour la fonction qui sert à incrémenter) |
C'est parceque tu débute. Nous, on ne fait plus que des erreurs intelligentes 
Sujets relatifs:
- Besoin d'aide pour programmation Pascal
- Erreur php de noobs...
- erreur de syntaxe ???
- erreur lorqu'on veut s'enregistrer sur mon forum
- [ACCESS] Gestion erreur doublon VBA
- erreur move_uploaded_file
- Erreur SQL/ASP
- [Résolu] Anjuta , erreur stdio.h
- question d'une débutante en C++
- Erreur ouverture Delphi 2005
Marsh Posté le 01-10-2006 à 11:51:25
Bonjour,
Je tente de faire un programme en Pascal, mais apparement il doit y avoir un souci dans mon code, puisqu'il ne me renvoie rien de concluant.
Je copie ici un extrait du prog que je pense suffisant.
S'il faut que je mette tout le prog pour voir l'erreur, dites le moi.
program triage;
var
n:integer;
adresse:string[60];
f:text;
begin
writeln('Tapez le chemin complet du fichier :');
readln(adresse);
assign(f,adresse);
n:=0;
writeln('assign ok');
(*On compte le nb de lignes. *)
reset(f);
while not(eof(f)) do
begin
readln;
n:=n+1;
end;
writeln('La premiere boucle a compte ',n,'lignes ds le fichier.');
close(f);
Le but de ce que je fais là, c'est juste de compter le nb de lignes qu'il y a dans un fichier .txt
J'ai bien 'assign ok' qui s'affiche, mais je n'ai jamais le second writeln qui se réalise.
Est-ce que ma condition est mal fichue et ne se réalise donc jamais ?
Merci d'avance à ceux qui vondront bien me donner un coup de main.