Exécution bizarre d'un programme simple : read ou readln ? [Résolu]

[mopl014]

Bonjour à tous,

Comme vous allez le voir dans le code que je présente, je débute en Pascal, je viens d'avoir mes premiers cours.

Nous avons eu un programme à réaliser pour mettre en pratique le cours sur les char, et j'obtiens un résultat très bizarre à l'exécution.

Voici mon code :

Code :

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
program affiche;
 
var
  f : char;
  e : integer;
  a : char;
begin
 writeln('entrez un caractere');
 readln(f);
 writeln('le code ASCII de  ',f,'  est  ',ord(f) );
 writeln('entrez un rang');
 read(e);
 writeln('le caractere de rang ',e,' est ',chr(e) );
 writeln('excusez moi mais entrez encore un caractere');
 readln(a);
 writeln(a);
 f:=succ(a);
 writeln('apres ',a,' est ',f,' cest marrant non!!');
 readln;
 end.

Je compile et exécute ce code, et voici le résultat que j'obtiens :



Ce qui est encore plus bizarre, c'est que si je commente les premières lignes de code (jusqu'à writeln('excusez-moi...)), le programme se déroule comme prévu...

Pouvez-vous m'orienter ? Merci d'avance

[M.Dlb]

Remplace le read par readln

[mopl014]

OK merci bien, ça fonctionne sans problème !

Mais cependant une question... pourquoi ???

Je pensais que le fonctionnement de read et readln était identique au saut de ligne près

[droggo]

Gie,

"le fonctionnement de read et readln était identique au saut de ligne près".

C'est exact.

Et de ce fait, quand tu fais un Read, le retour chariot que tu as entré pour valider n'est pas pris en compte, et reste dans le buffer d'entrée ...

... et à la prochaine lecture, il sera le 1er caractère lu, d'où problème.

[mopl014]

Grand merci pour la précision des réponses !

Résolu