Jeder Schüler hat seinen eigenen Wert für die Kegelhöhe
und legt eine Wertetabelle an für das Zylindervolumen in
Abhängigkeit vom Radius r. Also: linke Spalte der Tabelle: r
rechte Spalte der Tabelle: Zylindervolumen.
HA: jeder zeichnet seine individuelle Volumenfunktion
       in Abhängigkeit vom Radius r in ein Koordinatensystem.

Kegelhöhe = 6 (slider from 2 to 10, step 0.1)
Radius = 1.08 (slider from 0 to 4, step 0.02)
D = (-3.196990109086832, 0.0046921788987396885)
A = Point(xAxis)
B = Point(xAxis)
C = (-1.71698822677178, -0.3339608150413447)
c = Ellipse(A, B, C)
F = (4, 0)
S: (0.0, Kegelhöhe)
a = Segment(S, F)
G = (-4, 0)
b = Segment(S, G)
I: (-(Radius), y(S) - Radius * y(S) / 4.0)
d: (x(A) / x(I) * x)^(2.0) / 16.13646 + (x(A) / x(I) * y)^(2.0) / 0.13646 = 1.0
e: (x(A) / x(I) * x)^(2.0) / 16.13646 + (x(A) / x(I) * (y - y(I)))^(2.0) / 0.13646 = 1.0
H: (x(I), 0.0)
J: (-x(I), 0.0)
II: (-x(I), y(I))
f = Segment(I, H)
g = Segment(II, J)
Zylindervolumen: x(I)^(2.0) * 3.141592653589793 * y(I)
Text1: "Zylindervolumen=" + Zylindervolumen
K: (0.0, y(I))
r = Segment(I, K)
Text2: "Zylinderhöhe=" + f
L = Intersect(xAxis, yAxis)
h = Segment(L, K)
Text4: "Radius r = " + Radius