[TP] Read/ReadLn ?

Voilà, j'ai un souci et impossible de savoir lequel !
Voici mon code:

Code:

---

1 2 3 4 5 6 7 8 9 10

Var mess:string;   [...]   Begin Writeln('Entrez le message à coder') Read(mess); Readln; Writeln('Le message que vous avez tapé est le suivant :',mess); End.

---

Ce que j'obtiens à l'execution est :
"Entrez le message à coder
Le message que vous avez tapé est le suivant:"
Ou est le souci ? Merci d'avance !

Kio,

Je ne vois rien qui empêche ton programme de fonctionner (à part qu'il ne doit pas compiler, manque un ; (signalé ci-dessous)

Code:

---

1 2 3 4 5 6 7 8 9 10

Var mess:string; [...] Begin Writeln('Entrez le message à coder') { ici manque le ; } Read(mess); Readln; Writeln('Le message que vous avez tapé est le suivant : ',mess); End.

---

Et qu'une bonne pratique est d'utiliser ReadLn plutôt que Read pour lire une donnée au clavier.

Sans oublier une petite mise en forme (indentation, etc. )

Code:

---

1 2 3 4 5 6 7 8 9

Var mess:string;   [...]   Begin Write('Entrez le message à coder : ') ; ReadLn(mess); Writeln('Le message que vous avez tapé est le suivant :',mess); End.

---

(Les petites modifications permettent une meilleure présentation à l'écran, mais c'est très subjectif)

ps : pense à encadrer ton code par les balises [ code] [ /code], sans les espaces qui ne sont là que pour invalider ces balises. :D

le ; y était et ca compilait parfaitement. Mais ca ne marchait pas. J'ai mis un Readln avant au lieu d'après et ca marche, je ne sais toujours pas pourquoi. Bizarre...:roll:

essaye de mettre deux readln; à la fin (juste avant le END)
peut-être que le programme finit tellement vite son exécution que tu vois pas qu'il marche bien... :D
sinon pour plus joli (ou pas, enfin sur PASCAL...) tu peux utiliser la procédure
GotoXY(x,y:integer); pour lire ou écrire à un endroit donné de ton écran...

Exemple

Code:

---

1 2	Gotoxy(5,5); write("hello");

---

Merci

Kio,

Citation:

---

Envoyé par SansPseudo

essaye de mettre deux readln; à la fin (juste avant le END)
peut-être que le programme finit tellement vite son exécution que tu vois pas qu'il marche bien... :D
sinon pour plus joli (ou pas, enfin sur PASCAL...) tu peux utiliser la procédure
GotoXY(x,y:integer); pour lire ou écrire à un endroit donné de ton écran...

Exemple

Code:

---

1 2	Gotoxy(5,5); write("hello");

---

Merci

---

Pourquoi 2 readln ?

le readln ke tu as mis aprés read sert à quoi?

Quelqu'un pour m'expliquer pourqoi read(...) ;

et puis readln ???

Normalement un seul readln n'est ce pas ?

Mau,

Citation:

---

Envoyé par Kiefer_Sutherland

Quelqu'un pour m'expliquer pourqoi read(...) ;

et puis readln ???

Normalement un seul readln n'est ce pas ?

---

Oui, évidemment, comme je l'ai corrigé dans mon message (voir plus haut).