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

SetFillStyle(1,4);

FloodFill(370,26,1);

Line(370,10,370,25);

Line(370,10,400,10);

Line(400,10,400,45);

SetFillStyle(1,15);

FloodFill(386,29,1);

Line(400,15,430,15);

Line(430,15,430,34);

SetFillStyle(1,9);

FloodFill(425,25,1);

Line(415,15,415,5);

Line(415,5,470,5);

Line(470,5,470,19);

SetFillStyle(1,6);

FloodFill(425,8,1);

Line(470,2,485,2);

Line(470,2,470,5);

Line(485,2,485,12);

SetFillStyle(1,10);

FloodFill(478,4,1);

Line(290,360,290,210);

Line(290,212,410,120);

Line(290,300,410,170);

Line(410,120,410,170);

SetFillstyle(1,3);

FloodFill(300,250,1);

SetfillStyle(1,3);

FloodFill(291,298,1);