RADIO

ÁREA

INICIO

B = (-1.55, 0.03735408560311002)
radio = 1.32 (slider from 0 to 3, step 0.01)
h: 4 / ((π * radio^(2)))
C_1: (radio, 8 / radio + ((2 * π) * radio^(2)))
f(x) = 8 / x + ((2 * π) * x^(2))
D = Point(xAxis)
b = OrthogonalLine(D, xAxis)
E = Point(Circle[D, ((2 * π) * radio)])
A = Point(Circle[D, h])
d = OrthogonalLine(E, xAxis)
e = OrthogonalLine(A, d)
F = Intersect(e, d)
polígono1, d_1, a, f_1, e_1 = Polygon(D, A, F, E)
G = (2, 6)
c = Circle(G, radio)
g = Tangent(C_1, f)
H = Intersect(xAxis, yAxis)
ar: (0.1 * (8 / radio + 2^(radio^(2))))
k = Circle(H, radio)
p = Circle(H, ar)
f2(x) = (0.1 * f(x))
j: ar ≟ (0.1 * (8 / radio + ((2 * π) * radio^(2))))
q = Circle(H, ar)
I = Point(c)
i = Tangent(I, c)
l = OrthogonalLine(I, i)
J = Point(c)
m = Tangent(J, c)
n = OrthogonalLine(J, m)
C = Intersect(l, n)