Date: 5 Febrero 2014

Constante proporcionalidad

C = (20, 0)
c = 4 (slider from 1 to 5, step 0.1)
O = (0.1, 0)
a = Segment(O, C)
A = Point(a)
xx: x(A)
yy: c / x(A)
P: (xx, yy)
b = Segment(A, P)
B: (0, yy)
c_1 = Segment(B, P)
A1 = 1
A2 = 1.5
A3: 2 * A2 - A1
A4: 2 * A3 - A2
A5: 2 * A4 - A3
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
texto1: "A = " + (LaTeX[xx]) + ""
texto2: "B = " + (LaTeX[yy]) + ""
texto3: "B·A=" + (LaTeX[yy]) + "·" + (LaTeX[xx]) + " = " + (LaTeX[c]) + ""
d: x * y = c
B1: c / A1
B2: c / A2
B3: c / A3
B4: c / A4
B5: c / A5
B6: c / A6
B7: c / A7
B8: c / A8
B9: c / A9
B10: c / A10
B11: c / A11
B12: c / A12
B13: c / A13
B14: c / A14
B15: c / A15
B16: c / A16
B17: c / A17
B18: c / A18
B19: c / A19
B20: c / A20