α

escolher o ponto C

triângulo retângulo ACB

perpendicular em C ao lado horizontal de α e ponto B

D = Point(a_2)
A = Point(a_2)
g = Ray(A, D)
α_1 = 0.6981317007977318 rad (slider from 0 to 70*°, step 0.017453292519943295)
B_1 = Point(a_2)
B' = Rotate(B_1, α_1, A)
α = Angle(B_1, A, B')
b_1 = Ray(A, B')
C = Point(g)
c_2 = OrthogonalLine(C, a_2)
B = Intersect(c_2, b_1)
polígono1, b, a, c = Polygon(A, C, B)
d = false
f = false
e = false
h: a / c
i: b / c
texto1: "cos\,\alpha = cos\, " + (LaTeX[α_1]) + "=\frac{b}{c} =\frac{" + (LaTeX[b]) + "}{" + (LaTeX[c]) + "} =" + (LaTeX[i]) + "  "