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

Rectangle(265,40,290,45);

SetFillStyle(1,14);

FloodFill(270,42,1);

Rectangle(300,40,325,45);

SetFillStyle(9,8);

FloodFill(310,42,1);

Rectangle(265,50,290,55);

SetFillStyle(1,14);

FloodFill(270,52,1);

Rectangle(300,50,325,55);

SetFillStyle(1,14);

FloodFill(310,52,1);

Rectangle(300,60,325,65);

SetFillStyle(1,14);

FloodFill(310,62,1);

Rectangle(265,60,290,65);

SetFillStyle(1,14);

FloodFill(270,62,1);

Rectangle(360,50,365,55);

SetFillStyle(9,8);

FloodFill(362,52,1);

Rectangle(360,40,365,45);

SetFillStyle(1,14);

FloodFill(362,42,1);

Rectangle(370,45,375,40);

SetFillStyle(1,14);

FloodFill(372,42,1);

Rectangle(360,30,365,35);

SetFillStyle(1,14);