[Algo] Calcul des points d'une partie de bowling

Calcul des points d'une partie de bowling [Algo] - Algo - Programmation

Marsh Posté le 03-06-2004 à 22:46:10    

Salut a tous !
 
Voici mon Algo  
 

Code :
  1. Algo Bowling
  2. Variables
  3. compt,lancer[13],b1[13],b2[13],b1sup,b2sup,cumul,score[13]:réel
  4. rep, nom:chaîne
  5. Début
  6. cumul:=0
  7. rep:="oui"
  8. Tant que rep="oui"
  9. Saisir "Nom du joueur ? ",nom
  10. Pour compt de 1 à 10
  11.    Afficher "Lancer" ,compt
  12.    Saisir "Boule 1 " ,b1[compt]
  13.    si b1[compt]=10
  14.       Alors b2[compt]:=0
  15.       Sinon
  16.       Saisir "Boule 2 " ,b2[compt]
  17.    Finsi
  18. Finpour
  19. Si b1[10]=10
  20.       Alors Saisir "Boule1supp " ,b1sup
  21.             b1[11]:=b1sup
  22.             Saisir "boule2sup " ,b2sup
  23.             b1[12]:=b2sup
  24.             b2[11]:=b2sup
  25.       Sinon
  26.             si b1[10]+b2[10]=10
  27.                alors Saisir "Boule1supp" ,b1sup
  28.                b1[11]:=b1sup
  29.             Finsi
  30. Finsi
  31. efface_écran
  32. Pour compt de 1 à 10
  33. Si b1[compt]+b2[compt]<10
  34.    Alors score[compt]:=b1[compt]+b2[compt]
  35.    Sinon
  36.       si b1[compt]=10
  37.       Alors
  38.          si b1[compt+1]=10
  39.          Alors
  40.          score[compt]:=20+b1[compt+2]
  41.          Sinon score[compt]:=10+b1[compt+1]+b2[compt+1]
  42.          Finsi
  43.       Sinon score[compt]:=10+b1[compt+1]
  44.       Finsi
  45. Finsi
  46. Finpour
  47. Pour compt de 1 à 10
  48. cumul:=cumul+score[compt]
  49. Finpour
  50. Afficher tab(10),"boule 1",tab(25),
  51. "boule 2",tab(40),"score"
  52. Pour compt de 1 à 10
  53. Afficher "Lancer",compt,tab(10),b1[compt],tab(25),b2[compt],
  54. tab(40),score[compt],tab(50),score[2]
  55. finpour
  56. Afficher tab(20), "Le score de " ,cumul
  57. Saisir "Un autre joueur ? (oui/non)" ,rep
  58. Fin tant que
  59. Fin


 
 
Voila, je n'arrive pas a afficher corectement le cumul du mancer 1 puis du lancer 2 etc..
 
Par exemple: qu ca marque "9" puis "24" et ainsi de suite
 
Merci pour votre aide

Reply

Marsh Posté le 03-06-2004 à 22:46:10   

Reply

Sujets relatifs:

Leave a Replay

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