blob: 60e7b1c69556cccbe264af6f6b17ff8432483d88 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
|
\begin{tikzpicture}[scale=.5]
\tkzDefPoint(0,0){O}
\tkzDefPoint(6,6){E}
\tkzDefRandPointOn[circle=center O radius 4cm]
\tkzGetPoint{A}
\tkzDefRandPointOn[circle=center O radius 4cm]
\tkzGetPoint{B}
\tkzDrawSegments(O,A O,B)
\tkzDrawCircle(O,A)
\tkzDefTangent[from with R=E](O,4cm)
\tkzGetSecondPoint{k}
\tkzDefTangent[at=A](O)
\tkzGetPoint{h}
\tkzDrawPoints(E)
\tkzDrawLine[add = .5 and .5](A,h)
\tkzDrawLine[add = .5 and .5](E,k)
\tkzMarkRightAngle[fill=red!30](O,A,h)
\end{tikzpicture}
|