r = 3.202

x = 2

y = 2.5

Deslice el punto P a las coordenadas que desee y
evalúe o confirme los cálculos realizados.

O = (0, 0)
P = (2, 2.5)
a = Ray(O, P)
A = Point(xAxis)
b = Ray(O, A)
c = Circle(O, P)
d = Segment(O, P)
f = OrthogonalLine(P, yAxis)
B = Intersect(f, yAxis)
e = OrthogonalLine(P, xAxis)
C = Intersect(e, xAxis)
h = Segment(O, C)
g = Segment(C, P)
xp: x(P)
yp: y(P)
α = Angle(A, O, P)
r: sqrt(xp^(2) + yp^(2))
i: sin(α)
texto1: "sen(" + (LaTeX[α]) + ") = \frac{" + (LaTeX[yp]) + "}{" + (LaTeX[r]) + "} = " + (LaTeX[i]) + ""
j: cos(α)
texto2: "cos(" + (LaTeX[α]) + ") = \frac{" + (LaTeX[xp]) + "}{" + (LaTeX[r]) + "} = " + (LaTeX[j]) + ""
k: tan(α)
texto4: "tan(" + (LaTeX[α]) + ") = \frac{" + (LaTeX[yp]) + "}{" + (LaTeX[xp]) + "} = " + (LaTeX[k]) + " "
l: cot(α)
texto5: "cot(" + (LaTeX[α]) + ") = \frac{" + (LaTeX[xp]) + "}{" + (LaTeX[yp]) + "} = " + (LaTeX[l]) + ""
m: sec(α)
texto6: "sec(" + (LaTeX[α]) + ") = \frac{" + (LaTeX[r]) + "}{" + (LaTeX[xp]) + "} = " + (LaTeX[m]) + ""
n: csc(α)
texto7: "cot(" + (LaTeX[α]) + ") = \frac{" + (LaTeX[r]) + "}{" + (LaTeX[yp]) + "} = " + (LaTeX[n]) + ""