A voir également:
- [Pascal] lire une variable Char ???
- Lire le coran en français pdf - Télécharger - Histoire & Religion
- Lire epub - Guide
- Turbo pascal download - Télécharger - Édition & Programmation
- My pascal - Télécharger - Édition & Programmation
- Lire fichier bin - Guide
3 réponses
plorytriass
Messages postés
17
Date d'inscription
samedi 5 janvier 2008
Statut
Membre
Dernière intervention
21 décembre 2008
10
25 janv. 2008 à 13:44
25 janv. 2008 à 13:44
Program ... ;
uses wincrt ;
var C: char;
s:integer;
begin
write('donnez la valeur de s:');
read(s);
write('entrez votre choix');
readln(C);
case c of
'a': write('......');
'b': write('......');
'c': write('.........');
else write ('........');
end;
end.
Read(c)=== change it with ===> readln(c)
Hope that's right ...
uses wincrt ;
var C: char;
s:integer;
begin
write('donnez la valeur de s:');
read(s);
write('entrez votre choix');
readln(C);
case c of
'a': write('......');
'b': write('......');
'c': write('.........');
else write ('........');
end;
end.
Read(c)=== change it with ===> readln(c)
Hope that's right ...