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]

k = 2.5
h = 0 (slider from 0 to 6, step 0.1)
O = (0, 0)
d = OrthogonalLine(O, xOyPlane)
S = Point(d)
hauteur = Segment(O, S)
rayon = 1.5 (slider from 0 to 6, step 0.01)
cone, c, b = Cone(O, S, rayon)
O': (0, 0, h)
p = OrthogonalPlane(O', hauteur)
pla, a, e, f, g = Polygon(((-k), (-k), h), (k, (-k), h), (k, k, h), ((-k), k, h))
section = IntersectPath(p, cone)