Forum TI-Planet.org

Bonjour à tous,

Je colle depuis quelque jours sur la programmation d'un programme qui est, je cite, "Soit deux nombres réels tels que A et B (B étant non nul), calculez leur quotient et donnez la valeur décimale arrondie avec N de chiffres après la virgules" Le problème est que je n'arrive pas pour l'histoire du nombre de chiffres après la virgule.

Quelqu'un pourrait-il m'aider?

Merci D'avance

Edwin

En fait il y a deux manières de voir la chose.
Si N<=12, alors:
format( ((a)/(b)),"f"&string(n) )
(format permet, comme son nom l'indique, de formater un nombre selon le "format" voulu)

Si N>12, je te dis ça dans quelques minutes .

Code: Select all

Define z(a,b,n)=
Func
:Local c,i
:setMode(1,26)
:c:=string(approx(((a)/(b))))
:i:=1
:While mid(c,i,1)≠"."
:i:=i+1
:EndWhile
:left(c,i+n)
:EndFunc

Si n reste petit .