Konstrukcija_tangente_na_Arhimedovu_spiralu

a: 0.5
t_{1} = 11.9 (slider from 0 to (10 * pi), step 0.1)
P: (((a * t_{1}) * cos(t_{1})), ((a * t_{1}) * sin(t_{1})))
O: (0, 0)
r = Segment(O, P)
p = OrthogonalLine(O, Line[O, P])
r_1 = Distance(O, P)
s: (r_1 * t_{1})
T = Point(p)
c = Circle(T, s)
A = Intersect(c, p, 1)
B = Intersect(c, p, 2)
tangenta = Line(P, A)
b = CurveCartesian(((a * t) * cos(t)), ((a * t) * sin(t)), t, 0, (10 * pi))