Pente

Fonction affine

a = 1.2 (slider from -10 to 10, step 0.1)
b = -1 (slider from -10 to 10, step 0.1)
f(x) = a * x + b
X = Intersect(f, yAxis)
A = Point(f)
B = Point(f)
poly1, Δ_x, Δ_y, e = Polygon(A, (x(B), y(A)), B)
fonction: " f(x) =  " + f
d = true
c = true
texte1: " $\frac{y_B-y_A}{x_B-x_A} = $ " + (If[a < 0.0, -(Δ_y) / Δ_x, Δ_y / Δ_x])