largo

ancho

largo

INICIO

P

largo = 1.9 (slider from 0 to 2.5, step 0.05)
ancho: 2.5 - largo
largo_1: (largo, 0)
ancho_1: (0, ancho)
area(largo) = If[3 ≤ largo ≤ 4.25, (-(largo - 3)^(2)) + (2.5 * (largo - 3))]
A = Point(xAxis)
f = OrthogonalLine(A, xAxis)
AreaPuesto: (x(largo_1) * y(ancho_1))
c = Circle(A, largo)
B, LargoPuesto = Intersect(c, xAxis)
g = OrthogonalLine(LargoPuesto, xAxis)
P = Intersect(area, g)
h = OrthogonalLine(P, f)
D = Intersect(f, h)
i = Segment(D, P)
j = Segment(P, LargoPuesto)
area2(largo) = If[4.25 < largo ≤ 5.5, (-(largo - 3)^(2)) + (2.5 * (largo - 3))]
k = OrthogonalLine(LargoPuesto, xAxis)
P_2 = Intersect(area2, k)
l = Segment(LargoPuesto, P_2)
m = OrthogonalLine(P_2, f)
C = Intersect(f, m)
n = Segment(C, P_2)
texto2: "" + ancho + ""
Peri: (2 * ancho) + (2 * largo)
texto3: "Perímetro=" + Peri + ""
texto1: "Area=" + AreaPuesto + ""