Affiche la courbe passant par A

f_k(x)=k.e^{a.x}

Résolution de l'équation différentielle : 

y'=a.y

C = (8.72, 5.12)
B = (2.72, 5.12)
d = Segment(B, C)
E = Point(d)
e = Segment(B, E)
A = (3.44, 2.54)
a = 1 (slider from -5 to 5, step 0.1)
c: 8 * (e / d - 0.5)
k: c^(5)
f_k(x) = k exp(a x)
k1: y(A) / exp(a x(A))
g(x) = k1 exp(a x)
b = false
text4: "k=" + k