Rechtwinkliges Dreieck, c und h gegeben
Author: Prof. Dr. Haftendorn

An D und B ziehen.

Ha 12

A = Intersect(xAxis, yAxis)
B = Point(xAxis)
C = Midpoint(A, B)
c = Circle(C, B)
D = Point(yAxis)
a_3 = OrthogonalLine(D, yAxis)
E, F = Intersect(c, a_3)
Vieleck1, b, a, e = Polygon(A, E, B)
Vieleck2, b_1, a_2, f = Polygon(A, F, B)
Text2: "c = " + (x(B)) + "
h = " + (y(D)) + "
a= " + a + "
b= " + b