Home
Logithèque
|
Home |
|
Logithèque |
TI85
Développement limité de la fonction Tangente
Code
Ce programme nommé DLTAN appelle un sous-programme appellé NumStr qui doit être présent.
0->V6:30->dim V6
0->V7:30->dim V7
1->V6(2)
For(N,1,13)
V6(2)->V7(1)
For(I,2,N+2)
(I-2)*V6(I-1)+I*V6(I+1)->V7(I)
End
V7->V6
If V6(1)/=0:Then
V6(1)/gcd(V6(1),N!):NumStr:Ans+"/"->X
N!/gcd(V6(1),N!):NumStr:X+Ans+"*X^"->X
N:NumStr:X+Ans->X
Disp X:End
End
Les signes "/=" en ligne 10 représentent la comparaison"différent de".
Le sous-programme NumStr (nom impératif) est le suivant :
Ans->Z
If Z==0:Then:"0":Return:End
"*"->W
While Z>=1
Z/10->Z
sub("0123456789",iPart (1+10*fPart Z),1)+W->W
End:sub(W,1,lngth W-1)
Mode d'emploi
Exécuter le programme. Les treize premiers termes du développement limité en zéro sont affichés.
Mathématiques à l'oeuvre
Tout se base sur le fait que la dérivée de tg est (1+tg^2). Voir le calcul en ligne 7 du programme.
Fichiers
Voici les deux programmes pour chargement direct dans votre machine via le "GraphLink".