Algorithme: réduction de boucle

[invitef47010ed]

Bonjour,
j'ai un problème pour un petit programme que je vous soumets. J'ai une suite de n boucles:
Ai est le ième vecteur d'une liste.
bj est la j-éme composante d'un vecteur B.

Pour b1=1 puis -1
Pour b2=1 puis -1
Pour b3=1 puis -1
...
Pour bn=1 puis -1

Faire Ai=B
i=i+1
Fin Faire
Fin pour
Fin pour
...
Fin pour

Vous comprenez bien que le problème consiste à trouver comment réduire cette succession de Pour.
Je bloque :s
Merci!
-----

[invite9cf21bce]

Bonjour.

Si tu as droit aux fonctions, tu peux faire comme suit :

B : tableau[1..kmax]
i : entier

boucler(k,kmax)
{

si k<kmax

debut boucle sur chaque valeur possible de B[k]

affecter B[k]
boucler(k+1,kmax)

fin boucle sur chaque valeur possible de B[k]

sinon

faire un truc avec le tableau B (A[i]=B, i=i+1)

}

main()
{

i=0
boucler(1,kmax)

}

Taar

[invitef47010ed]

Merci! Mais je travaille sous Maple et je ne crois pas qu'une fonction puisse s'appeler elle même comme c'est le cas ici

[invite9cf21bce]

Merci! Mais je travaille sous Maple et je ne crois pas qu'une fonction puisse s'appeler elle même comme c'est le cas ici

Si si, une procédure peut s'appeler elle-même en Maple.
Ceci fait l'affaire (Maple V release 4 et toute version suivante) :

> boucler := proc (k,kmax)
local j;
global i, A, B;
for j in [1,-1] do
B[k] := j;
if (k = kmax) then
A[i] := [seq(B[t],t=1..kmax)];
#ici tu peux rajouter "print A[i];" pour voir ce que ça donne
i := i+1;
else
boucler(k+1,kmax);
fi;
od;
end;

> n := 4 ; # par exemple
i:=1; # ou bien 0
boucler(1,n);

Pas la peine de déclarer les variables, à part à l'intérieur du corps de la procédure pour distinguer les locales des globales.

Taar

[A voir en vidéo sur Futura]

[invitef47010ed]

Merci beaucoup je ne savais pas que Maple pouvait faire ça... Faut dire que j'ai l'habitude de travailler sous fortran mais j'ai besoin de la biblio de Maple pour la suite de mon problème

[invite007f93cb]

AIDEZ MOI svp j'ai un problème pour ecrire un algorithme qui dit:
pour multiplier deux entier x et y, on répète la double opération suivante sur le couple (x,y) : tant que y est non nul, on multiplie x par 2 et on divise y par 2 (quotient entier). le résultat est égal à la somme des multiples de x correspondant à des quotients de y impairs (le couple initial y compris).
svp help me mrc d'avance

[RoBeRTo-BeNDeR]

bonjour,
a mon avis il y a un problème dans ton tant que y est non nul , car le divisé par 2 ne l'annulera jamais ... mis à part si il est nul au départ donc bon ...

[inviteea028771]

Sauf si il fait la division entière

Sinon ton problème est simple, il suffit d'écrire en code ta phrase
En C :

int res=0;

while (y != 0) // tant que y n'est pas nul
{
    if (y%2 == 1) // si le quotient de y est impair
    {
         res = res + x; // alors on ajoute le multiple de x
    }
    x = x * 2; // puis on multiplie x par deux
    y = y / 2; // et on divise y par deux
}

[sylvainc2]

C'est bien connu sous le nom de méthode du paysan russe, ou méthode russe pour la multiplication de deux entiers:
http://www.recreomath.qc.ca/dict_rus...iplication.htm

[RoBeRTo-BeNDeR]

Ok si c'est une division entière.