\[ \int_{3}^{7} { 20 \over {x+1}}  \, \mathrm{d}x \] \approx 13,86

H1: (6.5, 0)
I: (3, 0)
k(x) = If[0 ≤ x ≤ 1, (100 * x)]
Q: (7, k(7))
U: (6.5, y(Q))
F = (4, 0)
M: (4, k(4))
M2: (3.5, y(M))
E: (0, 0)
F1: (3.5, 0)
M1: (3.5, k(3.5))
R: (3, y(M1))
a = Integral(k, 3, 7)
A = Intersect(xAxis, yAxis)
B = Point(xAxis)
poly1, f, g, h, i, C, D = Polygon(A, B, 4)
N: (5, k(5))
P: (6, k(6))
T: (5.5, y(P))
poly2, j, l, m_1, r = Polygon(R, E, F1, M1)
G: (5.5, 0)
poly3, n, s, b, c = Polygon(M2, F1, F, M)
H: (6, 0)
poly5, q, d, e, g_1 = Polygon(U, H1, I, Q)
poly4, t, g_2, h_1, p = Polygon(T, G, H, P)
N1: (4.5, k(4.5))
P1: (5.5, k(5.5))
Q1: (6.5, k(6.5))
S: (4, y(N1))
J: (4.5, 0)
poly6, s_1, n1, j_1, f_1 = Polygon(S, N1, J, F)
N2: (4.5, y(N))
J2: (5, 0)
poly7, n2, n_1, j2, j_2 = Polygon(N2, N, J2, J)
P2: (5, y(P))
Q3: (6, y(Q))
U1: (5, y(P1))
poly8, u1, p1, g_3, j2_1 = Polygon(U1, P1, G, J2)
U3: (6, y(Q1))
poly9, q1, u3, h_2, h1 = Polygon(Q1, U3, H, H1)
m = 7.25 (slider from 0 to 100, step 0.001)
MO1: (0, m)
MO2: (3, m)
poly10, e_1, i_1, mo2, mo1 = Polygon(E, I, MO2, MO1)
Pointpoly10_1 = PointIn(poly10)
Pointpoly10 = PointIn(poly10)
texte2: "Aire du rectangle bleu= " + poly10 + ""
p_1(x) = If[1 ≤ x ≤ 2.5, 100]
q_1(x) = If[2.5 ≤ x ≤ 3, (-200 * x) + 600]