Turbo pascal
Fermé
tpw
-
13 nov. 2010 à 17:46
KX Messages postés 16668 Date d'inscription samedi 31 mai 2008 Statut Modérateur Dernière intervention 17 mars 2023 - 13 nov. 2010 à 19:15
KX Messages postés 16668 Date d'inscription samedi 31 mai 2008 Statut Modérateur Dernière intervention 17 mars 2023 - 13 nov. 2010 à 19:15
A voir également:
- Turbo pascal
- Turbo pascal download - Télécharger - Édition & Programmation
- Iphone turbo sim inconvénient - Forum iPhone
- My pascal - Télécharger - Édition & Programmation
- Turbo sim - Forum iPhone
- Telecharger turbo pascal 7.0 gratuit 01net ✓ - Forum Pascal
4 réponses
KX
Messages postés
16668
Date d'inscription
samedi 31 mai 2008
Statut
Modérateur
Dernière intervention
17 mars 2023
3 005
13 nov. 2010 à 17:58
13 nov. 2010 à 17:58
Non tu ne peux pas, case ne s'applique qu'à des types simples (byte, char, integer...)
Tu ne peux pas faire pareil avec un string, utilise des if successifs.
Tu ne peux pas faire pareil avec un string, utilise des if successifs.
mais le probleme c'est que avec des if je n'arive pas a faire exactement ce que je veut
c'est du genre
var rep: dtring;
begin
repeat
writeln('ete vous marier');
readln(rep);
if sex=('homme') then writeln('patati patata');
if sex=('femme') then writeln('patata patati')
else writeln('veyé repondre par oui ou non');
until rep=oui or rep=non
donne moi la forme corecte s'il te plé enfin ci il y'a une solution merci
c'est du genre
var rep: dtring;
begin
repeat
writeln('ete vous marier');
readln(rep);
if sex=('homme') then writeln('patati patata');
if sex=('femme') then writeln('patata patati')
else writeln('veyé repondre par oui ou non');
until rep=oui or rep=non
donne moi la forme corecte s'il te plé enfin ci il y'a une solution merci
KX
Messages postés
16668
Date d'inscription
samedi 31 mai 2008
Statut
Modérateur
Dernière intervention
17 mars 2023
3 005
13 nov. 2010 à 18:58
13 nov. 2010 à 18:58
Ceci ne peut pas marcher, car sex n'est pas défini, de plus dtring n'existe pas, et il ne faut pas mettre de parenthèses autour des chaînes de caractères, l'apostrophe suffit.
c'est juste des faute de frape en vré c'est
var rep: string;
begin
repeat
writeln('ete vous marier');
readln(rep);
if rep='homme' then writeln('patati patata');
if rep='femme' then writeln('patata patati')
else writeln('veyé repondre par oui ou non');
until rep=oui or rep=non
var rep: string;
begin
repeat
writeln('ete vous marier');
readln(rep);
if rep='homme' then writeln('patati patata');
if rep='femme' then writeln('patata patati')
else writeln('veyé repondre par oui ou non');
until rep=oui or rep=non
KX
Messages postés
16668
Date d'inscription
samedi 31 mai 2008
Statut
Modérateur
Dernière intervention
17 mars 2023
3 005
13 nov. 2010 à 19:15
13 nov. 2010 à 19:15
Comment veux que ça marche, ton until fais des comparaisons de rep avec 'oui' et 'non' (n'oublie pas les apostrophes) or tu utilises cette même variable rep pour la comparaison homme ou femme !
De plus, il te faut un begin. à a fin du programme, et un ; avant le else
De plus, il te faut un begin. à a fin du programme, et un ; avant le else