JuliaKurs23/images/pi1.tex
2023-05-12 20:12:56 +02:00

22 lines
657 B
TeX

\documentclass[tikz, border=10pt,convert=true]{standalone}
\usepackage[]{tkz-euclide}
%\usetikzlibrary{shapes.geometric,calc}
\begin{document}
\begin{tikzpicture}[scale=3]
\tkzDefPoints{0/0/M, 1/1/B}
\tkzDefRegPolygon[center,sides=4,name=P](M,B)
\tkzDrawPolygon[very thick,red](P1,P...,P4)
\tkzDefRegPolygon[center,sides=8,name=Q](M,B)
\tkzDrawPolygon[very thick,blue](Q1,Q...,Q8)
\tkzDefRegPolygon[center,sides=16,name=R](M,B)
\tkzDrawPolygon[very thick,green](R1,R...,R16)
\tkzDrawCircle[very thick,black](M,B)
\foreach \j in {1,...,16} {
\tkzDrawSegment[gray](R\j, M)
}
\end{tikzpicture}
\end{document}