Article View: fr.comp.os.ms-windows.programmation
Article #56Re: Petit algorithme
From: Verdier St�phane
Date: Sun, 13 Feb 2000 00:00
Date: Sun, 13 Feb 2000 00:00
92 lines
3019 bytes
3019 bytes
Comment transposes tu ton algo pour 3 d�s.
Voici la modification que j'apporterai � ton algo :
Les lignes modifi�es sont not�es **
> D�but
>
> Saisir(N)
> nfacon <- 0
> Pour d1 allant de 1 � 6 faire
** Pour d2 allant de d1 � 6 faire (Tu �vites ainsi les doublons)
> Si (d1+d2)=N
> nfacon <- nfacon +1
** ----------------- Tu peux envisager une
sortie de boucle d2, tu limites les occurences inutiles.
> FinSi
> FinPour
> FinPour
** Plus besoin de faire un calcul savant, qui doit poser des pbs � trois
d�s.
> Afficher(nfacon)
> Fin
Pour ton algo � trois d�s ca doit donner ceci :
D�but
Saisir(N)
nfacon <- 0
Pour d1 allant de 1 � 6 faire
Pour d2 allant de d1 � 6 faire
** Pour d3 allant de d2 � 6 faire
** Si (d1+d2+d3)=N
nfacon <- nfacon +1
FinSi
FinPour
FinPour
Afficher(nfacon)
Fin
jeuf <jeufman@worldonline.fr> a �crit dans le message :
38A713BF.7DCD594C@worldonline.fr...
> Bonjour le NG ,
>
> J'ai un petit probleme d'algorithmique que j'ai du mal a resoudre.
> Pouvez vous m'aider ?
>
>
>
> L'utilisateur donne un entier entre 3 et 18, le programme donne le
> nombre de fa�on de faire en lan�ant 3 d�s dont les faces portent de 1 �
> 6 points
>
> Pour la version entre 2 et 12 points avec 2 d�s j'ai fait
>
> Variables :
> -N : entier compris entre 2 et 12
> -d1 : compteur pour le 1er d�
> -d2 : compteur por le 2eme d�
> -nfacon : comptabilise le nombre de fa�on
>
> D�but
>
> Saisir(N)
> nfacon <- 0
> Pour d1 allant de 1 � 6 faire
> Pour d2 allant de 1 � 6 faire
> Si (d1+d2)=N
> nfacon <- nfacon +1
> FinSi
> FinPour
> FinPour
> Si (nfacon%2=0)
> nfacon <- nfacon/2
> FinSi
> Sinon
> nfacon <- (nfacon+1)/2
> FinSinon
>
> Afficher(nfacon)
> Fin
>
>
> Cet algorithme marche mais si je le transpose a la version 3 d�s, ca ne
> marche plus.
>
> Pouvez vous � dieux de l'algorithme m'indiquer la solution ?
>
>
> Jeufman
>
>
Technical Details
Message-ID:
<ibFp4.58$%Y7.521364@nnrp2.proxad.net>Path:
arc1-ca.pugleaf.net!unknown!not-for-mailReferences:
<38A713BF.7DCD594C@worldonline.fr>Show Full Headers
Complete Article Headers
X-Google-Language: FRENCH,ASCII X-Google-Thread: fff80,939171b795193bee X-Google-Attributes: gidfff80,public X-Google-Thread: 1053e6,939171b795193bee X-Google-Attributes: gid1053e6,public X-Google-Thread: fa08f,939171b795193bee X-Google-Attributes: gidfa08f,public From: "Verdier St�phane" <verdier.st@free.fr> Subject: Re: Petit algorithme Date: 2000/02/13 Message-ID: <ibFp4.58$%Y7.521364@nnrp2.proxad.net> X-Deja-AN: 585466131 References: <38A713BF.7DCD594C@worldonline.fr> X-Priority: 3 X-MimeOLE: Produced By Microsoft MimeOLE V5.00.2615.200 X-Complaints-To: abuse@proxad.net X-Trace: nnrp2.proxad.net 950476622 213.228.27.27 (Sun, 13 Feb 2000 22:17:02 CET) Organization: Guest of ProXad - France X-MSMail-Priority: Normal NNTP-Posting-Date: Sun, 13 Feb 2000 22:17:02 CET Newsgroups: fr.comp.os.ms-windows.programmation,francom.programmation,fr.comp.divers