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
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
|
\input preamble.tex
\def\Disk(#1,#2){\Circle(16)(#1,#2,0.03) \Gfill(0)}
% ---------------------------------------------------------------------------
\begin{document}
\unitlength1.25cm
\begin{center}
{\Huge\bf{Pythagoras I}}
\bigskip
\begin{lapdf}(14.9,16.4)(-8.5,-7.8)
\Setwidth(0.01)
\Dash(1)
\Line(0,0)(0,3.6) \Stroke
\Dash(0)
\Arc(8)(+0.0,+3.6)(216.87,90)(0.4)
\Disk(+0.0,+3.4)
\Arc(8)(+0.0,+0.0)(90,90)(0.4)
\Disk(-0.18,+0.18)
\Varc(8)(-4.8,+0.0)(0,36.87)(1)
\Varc(8)(+2.7,+0.0)(180,-53.13)(1)
\Setwidth(0.02)
\Red
\Rectangle(-4.8,0)(6,6)(36.87) \Fill(1,0.9,0.9)
\Green
\Rectangle(2.7,0)(4.5,4.5)(36.87) \Fill(0.9,1,0.9)
\Blue
\Rectangle(2.7,0)(7.5,7.5)(180) \Fill(0.9,0.9,1)
\Text(+1.4,+2.1,c){$a$}
\Text(-2.6,+2.1,c){$b$}
\Text(-1.0,-0.3,c){$c$}
\Text(+0.8,+0.2,c){$p$}
\Text(-2.2,+0.2,c){$q$}
\Text(+0.2,+1.5,c){$h$}
\Text(+3.0,+3.1,c){$A_1$}
\Text(-4.5,+4.2,c){$A_2$}
\Text(-1.1,-3.7,c){$A_3=A_1+A_2$}
\Text(-4.2,+0.2,c){$\alpha$}
\Text(+2.1,+0.25,c){$\beta$}
\end{lapdf}
\newpage
{\Huge\bf{Pythagoras II}}
\bigskip
\begin{lapdf}(12.5,11.8)(-7.5,-5.2)
\Setwidth(0.01)
\Dash(1)
\Line(0,0)(0,4.8) \Stroke
\Dash(0)
\Arc(8)(+0.0,+4.8)(216.87,90)(0.4)
\Disk(+0.0,+4.6)
\Arc(8)(+0.0,+0.0)(90,90)(0.4)
\Disk(-0.15,+0.15)
\Varc(8)(-6.4,+0.0)(0,36.87)(1.2)
\Varc(8)(+3.6,+0.0)(180,-53.13)(1.2)
\Setwidth(0.02)
\Red
\Sector(64)(-3.2,+2.4)(36.87,180)(4.0) \Fill(1,0.9,0.9)
\Green
\Sector(64)(+1.8,+2.4)(-53.13,180)(3.0) \Fill(0.9,1,0.9)
\Blue
\Sector(64)(-1.4,+0.0)(180,180)(5.0) \Fill(0.9,0.9,1)
\Text(+1.9,+2.7,c){$a$}
\Text(-3.4,+2.7,c){$b$}
\Text(-1.0,-0.3,c){$c$}
\Text(+1.2,+0.2,c){$p$}
\Text(-3.0,+0.2,c){$q$}
\Text(+0.2,+2.0,c){$h$}
\Text(+2.9,+3.1,c){$A_1$}
\Text(-4.7,+3.8,c){$A_2$}
\Text(-1.4,-2.3,c){$A_3=A_1+A_2$}
\Text(-5.7,+0.2,c){$\alpha$}
\Text(+2.9,+0.25,c){$\beta$}
\end{lapdf}
\end{center}
\end{document}
|
