Boucle de calcul

greggilson Messages postés 2 Date d'inscription lundi 27 juin 2005 Statut Membre Dernière intervention 8 septembre 2006 - 28 juin 2005 à 00:10
Scalpweb Messages postés 1467 Date d'inscription samedi 13 mars 2004 Statut Membre Dernière intervention 5 mai 2010 - 28 juin 2005 à 01:00
Bonjour à tous,

J'essaie en vain de trouver l'algorhytme me permettant de :
1. Lire une ligne comportant plusieurs valeur
2. Pour chaque indicateur se trouvant sur cette ligne (une fourchette haute et une basse pour chaque indicateur), appliquer une formule avec toutes les possibilités de valeur des autres indicateurs

Si je simplifie je recherche toutes les combinaisons de valeur possible pour effectuer un calcul.

Quel est l'algorythme à utiliser ? et quelle est le style de boucle ?

Un exemple : j'ai de 4 à 8 pommes dans mon pannier, de 10 à 15 poires et de 20 à 25 prunes
une pomme pèse 80g
une poire pèse 100g
une prune pèse 90g

Je dois trouver toutes les combinaisons de fruits possible dans mon pannier et en trouver le poids

Merci beaucoup de votre aide précieuse

Greg

1 réponse

Scalpweb Messages postés 1467 Date d'inscription samedi 13 mars 2004 Statut Membre Dernière intervention 5 mai 2010 4
28 juin 2005 à 01:00
Alors, moi, ce que je ferais c'est plusieurs boucle For emboiter les unes dans les autres, une pour chaque type de fruit par exemple.

Ca donnerai un truc du genre :


Dim p as integer
Dim comb as string
For i = 4 To 8 // Pomme p i * 80 : comb ""
For r = 10 to 15 // Poires
p = p + (r * 100)
For y = 20 to 25 // Prunes
p = p + (y * 90)
comb = i & " Pommes et " & r & " Poires et " & y " Prunes"
msgbox comb & " on un poid de " & p & "grammes."
Next y
Next r
Next i

Voilà, je vois un truc du genre...

Une prune plus lourde qu'une pomme ? lol

Bonne prog, @+, Scalpweb
0
Rejoignez-nous