hauteur = 5 (slider from 0 to 10, step 1)
rayon = 1.7 (slider from 0 to 5, step 0.1)
A = (-1.343082615931791, 0.8202700767878416)
c = Circle(A, rayon)
airec = Area(c)
Pointc = PointIn(c)
Textec: "Aire du disque = " + (rayon^(2)) + " π cm²
                          ≈  " + airec + " cm²"
C = (1.0152183010467688, -3.3472571375686684, 3.5409360823268554)
m, q, n = Cone(c, hauteur)
volumem = Volume(m)
Pointn = PointIn(n)
Textem: "Volume\; du\; cône =" + (LaTeX[(rayon^(2) / 3 * hauteur)]) + " \; π   \;  cm^3≈ " + (LaTeX[((rayon^(2) / 3 * hauteur) * π)]) + " \;cm^3"