Turbo Pascal : help

Turbo Pascal : help - Delphi/Pascal - Programmation

Marsh Posté le 14-05-2002 à 22:25:45    

Comment on code 2 conditions ?
 
par exemple  
 
X:=random(3);
if X=0 and A=0 then A:=1;
if X=0 and A=1 then A:=0;
if X=1 and B=0 then B:=1;
if X=1 and B=1 then B:=0;
else {if X=2} A:=A and B:=B;
writeln(A, B);

Reply

Marsh Posté le 14-05-2002 à 22:25:45   

Reply

Marsh Posté le 14-05-2002 à 22:42:40    

héhé Pascal attire pas les foules, ce message a même pas été lu 1 fois, j'aurais dû mettre un titre plus accrocheur, dans le genre "Turbo Pascal et le sexe" :)
Plus sérieusement, une petite aide pliize ;)

Reply

Marsh Posté le 14-05-2002 à 22:57:00    

X := random(3);
if (X = 0) and (A = 0) then A := 1 else
if (X = 0) and (A = 1) then A := 0 else
if (X = 1) and (B = 0) then B := 1 else
if (X = 1) and (B = 1) then B := 0 else
...;
WriteLn(A, B);
 
Ta ligne avec un else me semble très bizarre... tu voulais y faire quoi ?


---------------
mes programmes ·· les voitures dans les films ·· apprenez à écrire
Reply

Marsh Posté le 14-05-2002 à 23:15:08    

je croyais que qd il y avait un if, fallait tjs mettre un else après. Faut donc mettre un else à chaque fois à la fin et pas de ; ?

Reply

Marsh Posté le 14-05-2002 à 23:18:32    

??
non d'après mes souvenir, tu mets un else si tu veux et tu mets un ";" quand il n'y a pas de else qui suit!

Reply

Marsh Posté le 14-05-2002 à 23:26:13    

Il n'y a que devant un else qu'il n'y a pas de ";"
Mais t'es pas obligé de mettre un else (je sais pas pourquoi j'en ai foutu à chaque ligne d'ailleurs, c'était utile qu'une ligne sur deux.
Enfin tes tests sont quand même bizarres :heink:


---------------
mes programmes ·· les voitures dans les films ·· apprenez à écrire
Reply

Marsh Posté le 14-05-2002 à 23:32:13    

je vous avoue que je galère là :)
avec ou sans, ça marche pas...
je sais plus quoi essayer
 
if .. and..
c'est correct ?

Reply

Marsh Posté le 14-05-2002 à 23:39:53    

- quel message met le compilateur ?
- pour quel code à quelle ligne ?


---------------
mes programmes ·· les voitures dans les films ·· apprenez à écrire
Reply

Marsh Posté le 14-05-2002 à 23:40:44    

antp a écrit a écrit :

- quel message met le compilateur ?
- pour quel code à quelle ligne ?  




 
pareil :)


---------------
Horizon pas Net, reste à la buvette!!
Reply

Marsh Posté le 14-05-2002 à 23:56:08    

erreur 57, Then expected
dès la 1ère ligne de if, le curseur pointe le = du and A=0
je suis sous Turbo Pascal MSDOS... (j'espère que je dis pas une connerie là :))

Reply

Marsh Posté le 14-05-2002 à 23:56:08   

Reply

Marsh Posté le 15-05-2002 à 00:03:20    

montre le code...en entier tel qu'il est maintenant!
A mon avis, c'est les parenthèse genre elles sont obligatoires...
 
pas if X=0 and A=0 then
mais if (X=0) and (A=0) then
 
(comme antp l'a écrit quoi!)


---------------
Horizon pas Net, reste à la buvette!!
Reply

Marsh Posté le 15-05-2002 à 00:18:37    

merciiii !! j'avais oublié les parenthèses, sorry !
ça marche now !
enfin mnt c'est le début devrais-je dire, car ça c'est juste la structure, mnt je dois intégrer ça dans une boucle, l'utilisateur définit le nbre de lancers (de couples A-B), et au hasard (random), j'ai X=0,1,2
ce qui fait que le couple change à chaque fois; et je dois tout afficher...
 
merci pr votre aide, et si vous avez des idées pr la suite ;)

Reply

Sujets relatifs:

Leave a Replay

Make sure you enter the(*)required information where indicate.HTML code is not allowed