Si mes restes de Ti-Basic sont bon, ca ca devrait le faire:
tangente(fon,var,pt)
Func
local der
d(fon,var)|var=pt -> der
fon|var=pt -> fon
fon*(var-pt) + fon
EndFunc
tangente(fon,var,pt): nom de la fonction ainsi que les arguments (parametres a lui fournir) soit la fonction (f), la variable (x) dont depend la fonction et le point pour lequel on veut la tangente par exemple x0
Func: déclare qu'il s'agit d'une fonction
local der: creer une variable locale der (pour la derivée)
d(fon,var)|var=pt -> der

ici le petit d, c'est le symbole de derivation) ici on calcule la dérivée de la fonction qu'on evalue au point voulu (par exemple x0), on met donc f'(x0) dans der
fon|var=pt -> fon :ici on cevalue la fonction au point x0, on met ainsi f(x0) dans fon
fon*(var-pt) + fon: finalement on retourne f(x0)*(x-x0)+f(x0)
EndFunc