Profil supprimé | Salut a tous !
Voici mon Algo
Code :
- Algo Bowling
- Variables
- compt,lancer[13],b1[13],b2[13],b1sup,b2sup,cumul,score[13]:réel
- rep, nom:chaîne
- Début
- cumul:=0
- rep:="oui"
- Tant que rep="oui"
- Saisir "Nom du joueur ? ",nom
- Pour compt de 1 à 10
- Afficher "Lancer" ,compt
- Saisir "Boule 1 " ,b1[compt]
- si b1[compt]=10
- Alors b2[compt]:=0
- Sinon
- Saisir "Boule 2 " ,b2[compt]
- Finsi
- Finpour
- Si b1[10]=10
- Alors Saisir "Boule1supp " ,b1sup
- b1[11]:=b1sup
- Saisir "boule2sup " ,b2sup
- b1[12]:=b2sup
- b2[11]:=b2sup
- Sinon
- si b1[10]+b2[10]=10
- alors Saisir "Boule1supp" ,b1sup
- b1[11]:=b1sup
- Finsi
- Finsi
- efface_écran
- Pour compt de 1 à 10
- Si b1[compt]+b2[compt]<10
- Alors score[compt]:=b1[compt]+b2[compt]
- Sinon
- si b1[compt]=10
- Alors
- si b1[compt+1]=10
- Alors
- score[compt]:=20+b1[compt+2]
- Sinon score[compt]:=10+b1[compt+1]+b2[compt+1]
- Finsi
- Sinon score[compt]:=10+b1[compt+1]
- Finsi
- Finsi
- Finpour
- Pour compt de 1 à 10
- cumul:=cumul+score[compt]
- Finpour
- Afficher tab(10),"boule 1",tab(25),
- "boule 2",tab(40),"score"
- Pour compt de 1 à 10
- Afficher "Lancer",compt,tab(10),b1[compt],tab(25),b2[compt],
- tab(40),score[compt],tab(50),score[2]
- finpour
- Afficher tab(20), "Le score de " ,cumul
- Saisir "Un autre joueur ? (oui/non)" ,rep
- Fin tant que
- 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 |