Forum |  HardWare.fr | News | Articles | PC | S'identifier | S'inscrire | Shop Recherche
998 connectés 

  FORUM HardWare.fr
  Programmation
  Delphi/Pascal

  Turbo Pascal : help

 


 Mot :   Pseudo :  
 
Bas de page
Auteur Sujet :

Turbo Pascal : help

n°138923
Kadounet
Posté le 14-05-2002 à 22:25:45  profilanswer
 

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);

mood
Publicité
Posté le 14-05-2002 à 22:25:45  profilanswer
 

n°138936
Kadounet
Posté le 14-05-2002 à 22:42:40  profilanswer
 

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 ;)

n°138943
antp
Super Administrateur
Champion des excuses bidons
Posté le 14-05-2002 à 22:57:00  profilanswer
 

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
n°138952
Kadounet
Posté le 14-05-2002 à 23:15:08  profilanswer
 

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 ; ?

n°138953
Willyzekid
Posté le 14-05-2002 à 23:18:32  profilanswer
 

??
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!

n°138960
antp
Super Administrateur
Champion des excuses bidons
Posté le 14-05-2002 à 23:26:13  profilanswer
 

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
n°138962
Kadounet
Posté le 14-05-2002 à 23:32:13  profilanswer
 

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

n°138964
antp
Super Administrateur
Champion des excuses bidons
Posté le 14-05-2002 à 23:39:53  profilanswer
 

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


---------------
mes programmes ·· les voitures dans les films ·· apprenez à écrire
n°138965
Willyzekid
Posté le 14-05-2002 à 23:40:44  profilanswer
 

antp a écrit a écrit :

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




 
pareil :)


---------------
Horizon pas Net, reste à la buvette!!
n°138966
Kadounet
Posté le 14-05-2002 à 23:56:08  profilanswer
 

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à :))

mood
Publicité
Posté le 14-05-2002 à 23:56:08  profilanswer
 

n°138968
Willyzekid
Posté le 15-05-2002 à 00:03:20  profilanswer
 

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!!
n°138972
Kadounet
Posté le 15-05-2002 à 00:18:37  profilanswer
 

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 ;)


Aller à :
Ajouter une réponse
  FORUM HardWare.fr
  Programmation
  Delphi/Pascal

  Turbo Pascal : help

 

Sujets relatifs
[javascript] HELPproblème avec RMI en java: HELP!
[HELP] Commande sqlrestreindre l'accés a un répertoire HELP!
Turbo Pascal[ HELP ] Aidez moi a faire fonctionner ce zip en C please
HELP pour un script CGI de la version 1.6 vers 1.9 ...[Need Help] Turbo Pascal...
Turbo Pascal et equa -diff :(( Help meHELP!!! SUJET DE TURBO PASCAL
Plus de sujets relatifs à : Turbo Pascal : help


Copyright © 1997-2022 Hardware.fr SARL (Signaler un contenu illicite / Données personnelles) / Groupe LDLC / Shop HFR