\documentclass[landscape,12pt]{article}
\usepackage[applemac]{inputenc}
\usepackage{epic}
\begin{document}
Deux exemples de dessins réalisés avec l'environnement \texttt{picture}
et le paquetage \texttt{epic}.
\begin{figure}[h]
\begin{center}
\setlength{\unitlength}{3pt}
\begin{picture}(40,45)(0,0)
\thicklines
\drawline(0,10)(10,0)(24,0)(34,10)(34,24)(24,34)(10,34)(0,24)(0,10)
\thinlines
\dashline{1}(10,0)(34,24)
\dashline{1}(10,0)(34,10)
\dashline{1}(10,34)(10,0)
\dashline{1}(10,34)(34,24)
\dashline{1}(10,34)(0,10)
\put(24,34){\makebox[0pt][l]{ $A_1(\ell_1)$}}
\put(29,29){\makebox[0pt][l]{ $M_1$}}
\put(34,24){\makebox[0pt][l]{ $A_2(c_1=\ell_2)$}}
\put(34,17){\makebox[0pt][l]{ $M_2$}}
\put(34,10){\makebox[0pt][l]{ $A_3(c_2=\ell_3)$}}
\put(29,3){\makebox[0pt][l]{ $M_3$}}
\put(24,-2){\makebox[0pt][l]{ $A_4(c_3=\ell_4)$}}
\put(17,-3){\makebox[0pt][c]{ $M_4$}}
\put(10,-2){\makebox[0pt][r]{$A_5(c_4=\ell_5)$ }}
\put(5,3){\makebox[0pt][r]{$M_5$ }}
\put(0,10){\makebox[0pt][r]{$A_6(c_5=\ell_6)$ }}
\put(0,17){\makebox[0pt][r]{$M_6$ }}
\put(0,24){\makebox[0pt][r]{$A_7(c_6=\ell_7)$ }}
\put(10,34){\makebox[0pt][r]{$A_8(c_7)$ }}
\put(5,29){\makebox[0pt][r]{$M_7$ }}
\put(17,37){\circle*{1}}
\drawline(17,37)(22,32)
\put(22,32){\circle*{1}}
\drawline(22,32)(29,29)
\put(29,29){\circle{1}}
\drawline(22,32)(20,18)
\put(20,18){\circle*{1}}
\drawline(20,18)(28,12)
\put(28,12){\circle*{1}}
\drawline(28,12)(34,17)
\put(34,17){\circle{1}}
\drawline(28,12)(24,4)
\put(24,4){\circle*{1}}
\drawline(24,4)(29,5)
\put(29,5){\circle{1}}
\drawline(24,4)(17,0)
\put(17,0){\circle{1}}
\drawline(20,18)(6,14)
\put(6,14){\circle*{1}}
\drawline(6,14)(3,22)
\put(3,22){\circle*{1}}
\drawline(6,14)(5,5)
\put(5,5){\circle{1}}
\drawline(3,22)(0,17)
\put(0,17){\circle{1}}
\drawline(3,22)(5,29)
\put(5,29){\circle{1}}
\end{picture}
\caption{octogone et produit matriciel}
\end{center}
\end{figure}
\begin{figure}[h]
\begin{center}
\setlength{\unitlength}{1pt}
\begin{picture}(100,80)
\def\point#1#2{\put(#1,#2){\circle*{2}}}
\drawline(40,70)(10,40)(30,10)(90,40)(40,70)
\point{40}{70}
\put(40,74){\makebox(0,0)[c]{$A_i$}}
\point{10}{40}
\put(10,40){\makebox(0,0)[r]{$A_\ell$ }}
\point{30}{10}
\put(30,10){\makebox(0,-2)[tc]{ $B_k$ }}
\point{90}{40}
\put(90,40){\makebox(0,0)[l]{ $B_j$ }}
\dottedline{2}(10,40)(90,40)
\dottedline{2}(30,10)(40,70)
\end{picture}
\caption{l'inégalité du quadrangle convexe}
\label{quadrangle-convexe}
\end{center}
\end{figure}
\end{document}
Cliquez ici pour voir le résultat.