A = (0, 0)
Prozentsatz = 0.1 (slider from 0.1 to 0.9, step 0.01)
Prozentwert = 6 (slider from 5 to 150, step 1)
B: (Prozentwert, 0.0)
C: (Prozentwert / Prozentsatz, 0.0)
A1 = (0, 2)
B2: (Prozentwert, 2.0)
C2: (Prozentwert / Prozentsatz, 2.0)
Vieleck1, a, c, c2, a1 = Polygon(A, C, C2, A1)
Vieleck2, a_1, b, b2, a1_1 = Polygon(A, B, B2, A1)
Text3: "Prozentwert P = " + Prozentwert + " €"
Text2: "Prozentstatz p = " + (100.0 * Prozentsatz) + "%"
Text1: "Grundwert G = " + a + " €"