Aleja

Acerca

Cono

Tronco de cono

r

r'

h

h'

Ver ejes

Ocultar ejes

h-h'

O = (0, 0, 0)
R = 3 (slider from 0.5 to 10, step 0.1)
c = Circle(O, R, xOyPlane)
A0 = Point(c)
h = 6 (slider from 0.5 to 10, step 0.1)
h' = 1.7 (slider from 0 to h, step 0.1)
a = Surface(((R * r) * cos(t)), ((R * r) * sin(t)), (h * (1 - r)), t, 0, (2 * π), r, (h - h') / h, 1)
b, d, e = Cone(c, h)
B: (0, 0, h')
f: ((R * (h - h'))) / h
C: (f, 0, h')
i: h - h'
F = Point(c)
G = Intersect(zAxis, d)
j = Segment(F, G)
k = Circle(zAxis, C)
l = Segment(O, G)
n = Plane(F, G, B)
r = Segment(O, F)
o = true
q = false
A' = Intersect(j, k)
r' = Segment(B, A')
ejes = 0 (slider from 0 to 1, step 1)
g: (R * (h - h') / h)
texto6: "\frac{h}{r}=\frac{h-h'}{r'}⇒r'=\frac{r\left(  h-h' \right) }{h}=" + (LaTeX[g]) + " \:cm"
m, p, s = Cone(k, h - h')
t: b - m
texto1: "V_C=\frac{π·r^2·h}{3}=\frac{π·" + (LaTeX[R]) + "^2·" + (LaTeX[h]) + "}{3}≈" + (LaTeX[b]) + " \:cm^3"
texto7: "V_{Tc}=\frac{πr^2h}{3}-\frac{πr'^2(h-h')}{3}≈\\\:\:\:\:\:\:\:\:\:\:≈" + (LaTeX[b]) + "-" + (LaTeX[m]) + "≈" + (LaTeX[t]) + " \:cm^3"
texto8: "r=" + (LaTeX[R]) + "\:cm"
texto9: "h=" + (LaTeX[h]) + "\:cm"
texto10: "h'=" + (LaTeX[h']) + ""
f_1 = Segment(B, G)