Vertical Cross Section of Sphere

Vertical Cross Section of Cone in Cylinder

Horizontal Cross Section of Sphere

Horizontal Cross Section of Cone in Cylinder

a

h_1 = 3.75 (slider from 0 to 5, step 0.05)
A = (0.66, -1.26)
B = (12, -1.26)
a_2 = Line(A, B)
r_1 = 5
c_2 = Circle(A, r_1)
d = Circle(B, r_1)
C = Intersect(c_2, a_2, 1)
D = Intersect(c_2, a_2, 2)
E = Intersect(d, a_2, 1)
F = Intersect(d, a_2, 2)
e = Circle(E, B)
f = Circle(F, B)
b_2 = OrthogonalLine(E, a_2)
g = OrthogonalLine(F, a_2)
G = Intersect(e, b_2, 2)
H = Intersect(f, g, 2)
i = Segment(G, H)
j = Segment(H, F)
k = Segment(F, E)
l = Segment(E, G)
m = Segment(G, B)
n = Segment(H, B)
p = Circle(A, h_1)
q = OrthogonalLine(A, a_2)
I = Intersect(p, q, 2)
s = Line(I, a_2)
J = Intersect(c_2, s, 1)
K = Intersect(c_2, s, 2)
L = Intersect(s, l)
M = Intersect(s, m)
N = Intersect(s, n)
O = Intersect(s, j)
t = Segment(L, O)
P = Midpoint(t)
c_1 = CircleArc(A, D, C)
b = Segment(I, K)
r = Segment(A, D)
a = Segment(A, I)
a_1 = Segment(F, O)
Q = Point(q)
b_1 = Line(Q, a_2)
d_1 = OrthogonalLine(B, b_1)
R = Intersect(b_1, d_1)
e_1 = Circle(Q, r)
f_1 = Circle(R, r)
g_1 = Circle(Q, b)
k_1 = Circle(R, a)
S = Intersect(g_1, b_1, 2)
i_1 = Segment(K, S)
T = Intersect(k_1, b_1, 2)
j_1 = Segment(N, T)
U = Point(g_1)
V = Point(k_1)
W = Point(f_1)
p_1 = CircleSector(Q, S, U)
Z = Intersect(f_1, b_1, 2)
q_1 = CircleSector(R, Z, W)
s_1 = CircleSector(R, T, V)
CrossSectionOfSphere: (π * b^(2))
AreaOfWasher: (π * (r^(2) - a^(2)))
text5: "Cross Section of Sphere = " + CrossSectionOfSphere + ""
c = Segment(M, P)
text6: "Area of Annulus = " + AreaOfWasher + ""