Реферат: Графика в Турбо Паскале

Line(280,130,335,105);

Line(280,130,285,120);

Line(285,120,266,120);

Line(285,120,333,98);

Arc(332,102,270,90,4);

Line(240,150,270,150);

Line(240,140,270,140);

Line(270,140,353,102);

SetFillStyle(1,5);

FloodFill(338,102,1);

Ellipse(248,152,165,23,8,8);

SetFillStyle(9,8);

FloodFill(248,154,1);

Circle(280,152,10);

SetFillStyle(9,8);

FloodFill(280,152,1);

arc(240,145,90,270,5);

SetFillStyle(1,7);

FloodFill(240,145,1);

SetColor(6);

Line(435,230,370,240);

Line(440,215,390,230);

Line(435,230,435,300);

Line(425,240,370,260);

Line(425,240,425,300);

Line(425,300,435,300);

Line(435,295,440,295);

Line(440,215,440,295);

Line(391,230,351,185);