Sinus

Cosinus

Tangens

Winkel α

Hilfslinien

π

$ 2\pi $

$ \tfrac{3\pi}{2} $

$ \tfrac{\pi}{2} $

Einheitskreis = Circle((0, 0), 1)
P = Point(Einheitskreis)
O = (0, 0)
h = Segment(O, P)
P_x = Intersect(xAxis, OrthogonalLine[P, xAxis])
s = Segment(P, P_x)
A = (1, 0)
α = Angle(A, O, P)
s_g = Segment(P, P_x)
c_g = Segment(P_x, O)
P_s: (α / °, y(P))
a = false
b = false
d = false
c = Segment(P_x, O)
P_α: (α / °, 0)
e = OrthogonalLine(P_α, xAxis)
PB_s: P_s
f = OrthogonalLine(P_s, yAxis)
g = false
P_c: (α / °, x(P))
PB_c: P_c
B = (0, 1)
p = Circle(O, P_x)
C = Intersect(p, yAxis, 2)
D = Intersect(p, yAxis, 1)
Hilfsbogen = If(α < 90°, Arc[p, P_x, C], If[α ≤ 270°, Arc[p, P_x, D], Arc[p, P_x, C]])
i = OrthogonalLine(If[x(P) > 0, C, D], yAxis)
F = Intersect(Line[O, P], OrthogonalLine[A, xAxis])
t = Segment(F, A)
k = Segment(P, F)
j = OrthogonalLine(F, yAxis)
P_t: (α / °, y(F))
PB_t: P_t
Text2: "cos(" + (round(α)) + ") = " + (x(P)) + ""
Text1: "sin(" + (round(α)) + ") = " + (y(P)) + ""
Text3: "tan(" + (round(α)) + ") = " + (tan(round(α))) + ""