problema 2

f: y = (-x^(3)) + x + 9
m: (((-sqrt(3))) / 3, f(((-sqrt(3))) / 3))
M_1: (sqrt(3) / 3, f(sqrt(3) / 3))
F: (0, 9)
A: (1, f(1))
g = Tangent(F, f)
h = Tangent(A, f)
M = Intersect(g, h)
B = Intersect(g, xAxis)
C = Intersect(h, xAxis)
t1, c, b, m_1 = Polygon(B, M, C)
D = Intersect(f, m_1, 1)
i: y = f(sqrt(3) / 3)
E = Point(m_1)
q1, c_1, e, f_1, m_2 = Polygon(C, E, F, M)
Testoq1: "Area di  " + (Name[C]) + (Name[E]) + (Name[F]) + (Name[M]) + " = " + q1
Puntoq1 = PointIn(q1)
G = Intersect(g, i)
H = Intersect(h, i)
t2, h_1, g_1, m_3 = Polygon(G, M, H)
Testot2: "Area di  " + (Name[G]) + (Name[M]) + (Name[H]) + " = " + t2
Puntot2 = PointIn(t2)
probabilità: Area[t2] / Area[t1]
testo1: "Probabilità = " + probabilità + ""