1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
|
\begin{center} % mogoce izgleda, kakor da imam obsesivno-kompulzivno
\begin{tikzpicture} % motnjo, ko pisem program takole v dveh stolpcih (:
\tkzDefPoint(0,0){C} \tkzDefPoint(285:4){B}
\tkzDrawLine(C,B) \tkzLabelLine[below left](C,B){$a$}
\tkzCompass(C,B) \tkzDefPoint(255:10){VH}
\tkzInterCC(C,B)(B,C) \tkzGetPoints{K60X}{K60}
\tkzCompass(C,K60) \tkzCompass(B,K60) \tkzCompass(C,VH)
\tkzDefMidPoint(K60,B) \tkzGetPoint{K30}
\tkzCompass(K60,K30) \tkzCompass(B,K30)
\tkzDrawLine(C,VH) \tkzDrawLine(VH,B) % od VisinaHelperja do tocke B
\tkzInterCC(VH,B)(B,VH) \tkzGetPoints{PB}{PBX} % perpendicular bisector
\tkzCompass(VH,PB) \tkzCompass(B,PB)
\tkzCompass(VH,PBX) \tkzCompass(B,PBX)
\tkzInterLL(C,VH)(PB,PBX) \tkzGetPoint{A}
\tkzDrawLine(A,B) \tkzLabelLine[above left](A,B){$c$}
\tkzDrawLine(PB,PBX) \tkzLabelLine[right](A,C){$b$}
\tkzCalcLength[cm](A,B) \tkzGetLength{ABl}
\tkzCalcLength[cm](A,C) \tkzGetLength{ACl}
\tkzDrawPolygon [fill=blue!30, opacity=.3](A,B,C)
\tkzDrawSegment [dim={\pgfmathprintnumber\ABl,-6pt,transform shape}](A,B)
\tkzDrawSegment [dim={\pgfmathprintnumber\ACl,6pt,transform shape}](A,C)
\tkzDrawPoints(C) \tkzLabelPoints(C,B,A)
\end{tikzpicture}
\end{center}
|
