Normalgerade
Author: Mag. G. Wengler

Eine rote Gerade (mit Geodreieck) soll im rechten Winkel zur blauen Gerade sein.

Auf der blauen Gerade sind zwei blaue Punkte gegeben.

Überlege, wie die zwei roten Punkte liegen müssen, damit die beiden Geraden normal aufeinander stehen.

NORMAL

Bewege mich

Hurra, ich bin normal!

neue Aufgabe

B: (Random[-10, 10], Random[-10, 10])
A: (Random[-6, 6], Random[-6, 6])
a = Segment(A, B)
C = (0, 0)
D = (-2, -4)
b = Line(C, D)
E = (-5, 9)
c = Line(B, A)
s: b ⊥ c
w: atan(y(D) / x(D))
k: (y(B) - y(A)) / (x(B) - x(A))
d: y(A) - k * x(A)
Bild2 = If(d ≥ 0, Rotate[Bild1, w, D], Rotate[Bild1, w + 180°, D])
Bild3 = If(d ≥ 0, Rotate[Bild1, w, D], Rotate[Bild1, w + 180°, D])
Bild4 = If(d ≥ 0, Rotate[Bild1, w, D], Rotate[Bild1, w + 180°, D])