problème de variables

bonjour a tous
voila, notre prof de math nous a demandé de faire un programme en lien avec un DM qu'il nous a donné, qui porte sur les approximations de courbes par leur dérivée
ce programme est donc censé, après qu'on lui ai renseigné une fonction dérivé, les coordonnées d'un point, le nombre de points à calculer et le pas de calcul les coordonnées des points qui suivent celui qui a été entré
voila mon programme :
le problème se situe sur cette ligne :
après cette ligne, ma variable Y prends la valeur 0 ... et seulement la première fois que le programme lit cette ligne...
et là j'avoue que franchement, je ne comprends absolument pas pourquoi j'ai ce résultat, j'espère que l'un d'entre vous pourra m'aider...
voila, notre prof de math nous a demandé de faire un programme en lien avec un DM qu'il nous a donné, qui porte sur les approximations de courbes par leur dérivée
ce programme est donc censé, après qu'on lui ai renseigné une fonction dérivé, les coordonnées d'un point, le nombre de points à calculer et le pas de calcul les coordonnées des points qui suivent celui qui a été entré
voila mon programme :
- Code: Select all
StoreGDB 1
FnOff
AxesOff
1-E
1-I
ClrDraw
Input "F'(x) = ",Str1
Input "Abscisse de M :",X
Input "Ordonnee de M :",Y
Input "Pas de calcul :",P
Input "Nombre de points a calculer :",N
ClrHome
While I÷N
expr(Str1-A
Y-(AX)-B
X+P-X
(AX)+B-Y
If fPart(I/7)=0
Then
1-E
Pause
ClrDraw
End
Text(E*8,1,"M",I," (",X,",",Y,")"
Pause
I+1-I
E+1-E
End
Pause
RecallGDB 1
le problème se situe sur cette ligne :
- Code: Select all
Text(E*8,1,"M",I," (",X,",",Y,")"
après cette ligne, ma variable Y prends la valeur 0 ... et seulement la première fois que le programme lit cette ligne...
et là j'avoue que franchement, je ne comprends absolument pas pourquoi j'ai ce résultat, j'espère que l'un d'entre vous pourra m'aider...