Sínus

-π / 2

π / 2

α

Kosínus

π

K = Point(xAxis)
a = false
M = Point(yAxis)
N = Point(yAxis)
o_y = Line(M, N)
O: (0, 0)
o_x = Line(O, K)
A_2: (((-π)) / 2, 0)
B: (π / 2, 0)
j = Segment(A_2, B)
k = OrthogonalLine(B, o_x)
l = OrthogonalLine(A_2, o_x)
α = 1.0471975511965976 rad (slider from (-(90°)) to 360°, step 0.1°)
x_a: α
A_1 = Point(Circle[O, x_a])
u = Vector(O, A_1)
h = OrthogonalLine(A_1, o_x)
b = false
g = If(a ≟ 1, sin(x), b ≟ 1, cos(x))
A = Intersect(g, h, (1.0471975511965976, 0.8660254037844386))
f = Segment(A_1, A)
C: ((-π), 0)
D: (π, 0)
d = Length(f)
text1 = SurdText(d)
text2: "Funkčná \;  hodnota \;  funkcie \;  " + (LaTeX[g]) + "   \; pre \;   x =" + (LaTeX[x_a]) + "  \;  je  \; rovná  \; číslu \;   " + (LaTeX[text1]) + ""