Länge

Breite

A = 2 (slider from 1 to 50, step 1)
P = Point(xAxis)
Vieleck1, a, b, c, d = Polygon((0, 0), (sqrt(A), 0), (sqrt(A), sqrt(A)), (0, sqrt(A)))
A2: x(P)
B2: A / A2
A3: (A2 + B2) / 2
B3: A / A3
A4: (A3 + B3) / 2
B4: A / A4
A5: (A4 + B4) / 2
B5: A / A5
A6: (A5 + B5) / 2
B6: A / A6
B: (A2, B2)
C: (A3, B3)
D: (A4, B4)
E: (A5, B5)
F: (A6, B6)
Liste1: {B, C, D, E, F}
e = Line(B, xAxis)
f = Line(B, d)
g = Line(C, xAxis)
h = Line(C, d)
i = Line(D, xAxis)
j = Line(D, d)
k = Line(E, xAxis)
l = Line(E, yAxis)
G = Intersect(k, d)
H = Intersect(i, d)
I = Intersect(g, d)
J = Intersect(e, d)
K = Intersect(h, xAxis)
L = Intersect(j, xAxis)
M = Intersect(l, xAxis)
N = Intersect(yAxis, a)
Vieleck2, p, b_1, j_1, n = Polygon(P, B, J, N)
Vieleck3, k_1, c_1, i_1, n_1 = Polygon(K, C, I, N)
Vieleck4, l_1, d_1, h_1, n_2 = Polygon(L, D, H, N)
Vieleck5, m, e_1, g_1, n_3 = Polygon(M, E, G, N)
q = Line(F, yAxis)
r = Line(F, n)
O = Intersect(r, yAxis)
Q = Intersect(n, xAxis)
R = Intersect(q, a)
S = Intersect(q, a)
T = Intersect(n, xAxis)
U = Intersect(a, n)
V = Intersect(q, n)