encore mieux que la calculatrice chauffante
(cf :
- Code: Tout sélectionner
Lbl 0
Goto 0
)

ClrGraph
AxesOff
0»A~Z
ViewWindow 1,127,0,1,63,0
1»B
For 63»A To 30 Step - 1
Horizontal B
Horizontal A
B+1»B
Next
PxlOn 1,1
0»N
Lbl 0
If 1.07^N2:Then N+1»N:Goto 0
IfEnd
N
ClrText
"Quel taux d'intérêt"?
?»T
0»N
1000»K
While K2000:K(1+T/100)»K:N+1»N:WhileEnd
N
Mic a écrit:Pas sur qu'elle soit meilleure, déjà le code du prof est plus court mais bon ça c'est pas le plus important. Ce qu'il faut voir, c'est le coup en opérations.
Retourner vers Autres discussions
Utilisateurs parcourant ce forum: Aucun utilisateur enregistré et 13 invités