prueba
Author: José Luis Álvarez

x² = p x + q

p

q

Término

Valor

Cociente

n = 1 (slider from 1 to 5, step 1)
m = 1 (slider from 1 to 5, step 1)
g = Function((m * x) + n, 0, Infinity)
f(x) = x^(2)
a: y = (m * x) + n
E_1, E_2 = Intersect(f, g)
E: E_2
F: (x(E), 0)
polígono1, b, f_1, c, d = Polygon((0, 0), F, (x(F), 1), (0, 1))
texto1: "x² = " + (If[m ≠ 1, m + "x", "x"]) + " + " + n
texto3: "x =  \frac{ " + m + "+ \sqrt{ " + (m^(2) + (4 * n)) + " }  }{2 }=" + (m / 2) + "+ \sqrt{ " + (m^(2) / 4 + n) + " } "
texto4: "" + (x(F))
texto5: "" + (x(F))
e = Segment(F, F - (0, 0.6))
g1 = Segment(E, F)
A = Intersect(f, a, 1)
x1: (m + sqrt(m^(2) + (4 * n))) / 2
texto2: "x =  \frac{ " + m + "+ \sqrt{ " + (m^(2) + (4 * n)) + " }  }{2 }"
texto9: "x =  \frac{ " + m + "+ \sqrt{ " + (m^(2) + (4 * n)) + " }  }{2 }=" + x1
B1: m
B2: n
A4 = 1
A5 = 2
A6: (2 * A5) - A4
A7: (2 * A6) - A5
A8: (2 * A7) - A6
A9: (2 * A8) - A7
A10: (2 * A9) - A8
A11: (2 * A10) - A9
A12: (2 * A11) - A10
A13: (2 * A12) - A11
A14: (2 * A13) - A12
A15: (2 * A14) - A13
A16: (2 * A15) - A14
A17: (2 * A16) - A15
A18: (2 * A17) - A16
A19: (2 * A18) - A17
A20: (2 * A19) - A18
A21: (2 * A20) - A19
A22: (2 * A21) - A20
A23: (2 * A22) - A21
A24: (2 * A23) - A22
A25: (2 * A24) - A23
A26: (2 * A25) - A24
A27: (2 * A26) - A25
A28: (2 * A27) - A26
B4 = 1
B5 = 1
B6: (m * B5) + (n * B4)
B7: (m * B6) + (n * B5)
B8: (m * B7) + (n * B6)
B9: (m * B8) + (n * B7)
B10: (m * B9) + (n * B8)
B11: (m * B10) + (n * B9)
B12: (m * B11) + (n * B10)
B13: (m * B12) + (n * B11)
B14: (m * B13) + (n * B12)
B15: (m * B14) + (n * B13)
B16: (m * B15) + (n * B14)
B17: (m * B16) + (n * B15)
B18: (m * B17) + (n * B16)
B19: (m * B18) + (n * B17)
B20: (m * B19) + (n * B18)
B21: (m * B20) + (n * B19)
B22: (m * B21) + (n * B20)
B23: (m * B22) + (n * B21)
B24: (m * B23) + (n * B22)
B25: (m * B24) + (n * B23)
B26: (m * B25) + (n * B24)
B27: (m * B26) + (n * B25)
B28: (m * B27) + (n * B26)
C5: B5 / B4
C6: B6 / B5
C7: B7 / B6
C8: B8 / B7
C9: B9 / B8
C10: B10 / B9
C11: B11 / B10
C12: B12 / B11
C13: B13 / B12
C14: B14 / B13
C15: B15 / B14
C16: B16 / B15
C17: B17 / B16
C18: B18 / B17
C19: B19 / B18
C20: B20 / B19
C21: B21 / B20
C22: B22 / B21
C23: B23 / B22
C24: B24 / B23
C25: B25 / B24
C26: B26 / B25
C27: B27 / B26
C28: B28 / B27
texto7: "p = " + m
texto8: "q = " + n