Sextion d'un cône

La figure représente un cône de révolution.
L'axe du cône est (OS). Sa hauteur OS sera notée h.
O est le centre du cercle de base (c) de rayon r.

Soit O’ un point de [OS]. On coupe ce cône par un plan (P) perpendiculaire à son axe en O’.

L'ensemble des points qui sont à la fois dans le plan et sur la surface latérale du cône est un cercle (c’) de centre O’ et de rayon r’.

Descartes et les Mathématiques - GeoGebra 3D en troisième : [url]http://www.debart.fr/geogebra_3D/geogebra_3D_troisieme.html[/url]

h = -2.3 (slider from -5 to 5, step 0.1)
O = (0, 0)
rayon = 2 (slider from 0 to 6, step 0.1)
B: (0, 0, (-rayon))
A: (0, 0, rayon)
AB = Segment(A, B)
d = OrthogonalLine(O, xOyPlane)
S = Sphere(O, rayon)
O': (0, 0, h)
p = OrthogonalPlane(O', AB)
section = IntersectPath(p, S)
q = PlaneBisector(A, B)
c = IntersectPath(q, S)
M = Point(section)
MO = Segment(O, M)
MO' = Segment(M, O')
k = 3
pla, a, b, e, f = Polygon(((-k), (-k), h), (k, (-k), h), (k, k, h), ((-k), k, h))