200

20

40

60

80

100

120

140

160

180

Variieren der Punkte A, B und C

A = (-3.449090909090908, -9.558181818181836)
B = (15.123636363636338, -6.885454545454561)
D = (20, -10)
E = (22, -10)
f = Segment(D, E)
F = (20, 10)
G = (22, 10)
g = Segment(F, D)
h_{1} = Segment(G, E)
i = Segment(F, G)
H = Point(g)
I = (22, 8)
j = Segment(H, I)
J = Point(g)
K = Point(h_{1})
k = Segment(J, K)
L_{1} = Point(g)
M = Point(h_{1})
l = Segment(L_{1}, M)
Q = Point(h_{1})
R = (20, 2)
m = Segment(Q, R)
S = Intersect(g, xAxis)
T = Intersect(h_{1}, xAxis)
n = Segment(S, T)
U = Point(g)
V = Point(h_{1})
p = Segment(U, V)
W = Point(g)
Z = (22, -4)
q = Segment(W, Z)
A_1 = Point(g)
B_1 = Point(h_{1})
r = Segment(A_1, B_1)
C_1 = Point(g)
D_1 = Point(h_{1})
s = Segment(C_1, D_1)
t = Line(A, B)
C = (10.43272727272726, 6.314545454545455)
c = Segment(A, B)
a = Segment(C, B)
b = Segment(C, A)
h_{2} = Line(A, B)
f_1 = OrthogonalLine(C, h_{2})
N = Intersect(h_{2}, c)
O = Intersect(f_1, h_{2})
h = Segment(C, O)
Flächeninhalt: ((1 / 2 * Length[c]) * Length[h])
d1, c_1, a_{1}, b_1 = Polygon(A, B, C)
Textd1: "Fläche von  " + (Name[A]) + (Name[B]) + (Name[C]) + " = " + d1
Punktd1 = PointIn(d1)
L: ((1 / 2 * Length[c]) * Length[h])
g_1 = Ray(D, F)
d_1 = Circle(D, L / 10)
P = Intersect(g, g_1)
E_1 = Intersect(g, g_1)
F_1 = Intersect(d_1, g_1)
i_1 = OrthogonalLine(F_1, g)
G_1 = Intersect(i_1, h_{1})
v2, d_2, e_1, j_1, k_1 = Polygon(D, E, G_1, F_1)