Adapter un programme de dichotomie AlgoBox

[NspireCas]

Pour gagner légèrement en vitesse d'exécution, il est plus efficace de ne faire qu'une seule fois le calcul de 10^(-n).
Le programme devient alors :

Code: Select all

Define dichoto(f,v,a,b,k,n)=
Prgm
Local c,d,e,eps
c:=f|v=a
eps:=10^(-n)
While b-a>eps
d:=((a+b)/(2))
e:=f|v=d
  If (k-e)*(k-c)<0 Then
    b:=d
  Else
    a:=d
  EndIf
EndWhile
Disp "a=",a," ; b=",b
EndPrgm

[Bisam]

quinou : tu n'as pas dit quel algorithme tu voulais adapter !!
On ne peut pas deviner.

Tu reprends un post qui a plus d'un an pour poster 3 messages où tu ne dis rien... Je vois mal comment on pourrait t'aider. Ce n'est pourtant pas faute de bonne volonté.