Author: A. Nussbaumer
Date: 24 Februar 2013

h

r

Spur löschen

A = Point(xAxis)
A' = Mirror(A, yAxis)
c = Semicircle(A, A')
B = Point(yAxis)
a = OrthogonalLine(B, yAxis)
C, D = Intersect(c, a)
M: (0, x(A) - 1)
d = Circle(M, Segment[D, B])
b = Segment(C, D)
E: (x(A') + 1, 0)
F: (x(A') + 1 + x(A'), 0)
G: (x(F) + x(A'), 0)
H: (x(E), x(A'))
I: (x(G), y(H))
e = Segment(E, G)
f = Segment(E, H)
g = Segment(H, F)
h = Segment(F, I)
i = Segment(G, I)
J = Intersect(a, f)
K = Intersect(a, g)
L = Intersect(a, h)
N = Intersect(a, i)
j = Segment(J, K)
k = Segment(L, N)
O: (x(F), y(M))
p = Circle(O, x(A'))
q = Circle(O, Segment[K, L] / 2)
Text1: "q(" + (y(B)) + ") = " + ((Segment[D, B]^(2) * π))
Text2: "q(" + (y(B)) + ") = " + (((x(A')^(2) - (Segment[K, L] / 2)^(2)) * π)) + ""
l = Segment(A, A')
m = Ray((0, 0), B)
Pos: (0, y(B) / 2)
Text4: "h = " + (y(B)) + ""
Pos2: (x(A) / 2, 0)
rr: abs(x(A))
Text7: "V_{Halbkugel} = " + (((rr^(3) * π) * 2 / 3))
Text6: "r = " + rr + ""