$ Koostas: Maario \; Lemmik $
$ 2 \; TJ : Harjutus \; 4 $

g: y = cos(x)
f(x) = sin(x)
α = 0.7853981633974483 rad (slider from 0 to 360°, step 0.017453292519943295)
A: (α, f(α))
B: (α, cos(α))
C = Intersect(f, g, (0.7853981633970017, 0.7071067811862317))
D = Intersect(f, g, (3.926990816986795, -0.7071067811862318))
X_1 = 6.283185307179586 rad (slider from 0 to 6.283185307179586, step 0.1)
X_0 = -0.017453292519943295 rad (slider from 0 to 6.283185307179586, step 0.017453292519943295)
h(x) = If[X_0 ≤ x ≤ X_1, f(x)]
p(x) = If[X_0 ≤ x ≤ X_1, g(x)]
pindala = IntegralBetween(h, p, x(C), x(D))
tekst2: "$Joontevahelise \; kujundi \;pindala \;lõikepunktide \;C \;ja \;D \;vahel \;on\;" + (LaTeX[pindala]) + " $"
tekst3: "$Funktsioonide \;f(x)=sin(x) \;ja\;g(x)=cos(x) \; lõikepunktid \; on \;C " + (LaTeX[C]) + "\;, \;D" + (LaTeX[D]) + ""