Probleme algorithme dicothomie maple

[inviteab4b845d]

SALUT ,

Je voudrais bien traduire un algo vers un langage maple , chose que je n'ai pas reussi :/


et voila ma traduction sur maple

dichotom:=proc (pre,f,nmax,a,b)
local n,g,d,
n := 1
g:=a
d:=b

while n<=nmax and (d-b)/2 > pre

p:=(g+d)/2;
print(n,d,g,p)
p:=p+1
           
        if f(d)*f(g)>0 then 
        g:=p
        else
        d:=p
        fi;
od;
end;

en attendant votre aide svp ^^

Merci d'avance
-----

[gg0]

Bonsoir.

Pas de th dans dichotomie (en plus tu as le mot dans le passage que tu cites).

Sinon, comme tu ne dis pas pourquoi "je n'ai pas reussi", difficile de t'aider.
Juste quelques remarque :
* Le paramètre f doit être une fonction, pas une expression
* n ne varie pas
* p:=(g+d)/2 suivi de p=p+1 montre que tu ne sais pas ce que tu fais
* od seul ne veut rien dire.
* Pourquoi utiliser Maple pour cet algorithme ?

Cordialement.

[gg0]

Par politesse, tu aurais pu dire que tu as posé la même question sur un autre forum, et que tu as eu des réponses et même modifié ton programme.

Et tu ferais bien d'apprendre à programmer des choses plus simples. L'utilisation d'une fonction n'est jamais simple, que ce soit en Maple ou dans d'autres langages. Intégrer la fonction dans le corps du programme (donc l'expression f(x) plutôt que la fonction f) permet d'éviter cet écueil.

[inviteb6b93040]

ET aussi

d:=b

while n<=nmax and (d-b)/2 > pre

d-b=0 donc < pre donc la boucle sort dés le début

[A voir en vidéo sur Futura]