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

,105,55,115);

Line (40,115,55,115);

SetFillStyle (1,14);

FloodFill (45,110,1);

Line (70,105,85,105);

Line (70,105,70,115);

Line (85,105,85,115);

Line (70,115,85,115);

SetfillStyle (1,14);

FloodFill (80,110,1);

Line (5,130,20,130);

Line (5,130,5,140);

Line (20,130,20,140);

Line (5,140,20,140);

SetFillStyle (1,14);

FloodFill (7,135,1);

Line (40,130,55,130);

Line (40,130,40,140);

Line (55,130,55,140);

Line (40,140,55,140);

SetFillStyle (1,14);

FloodFill (45,135,1);

Line (70,130,85,130);

Line (70,130,70,140);

Line (85,130,85,140);

Line (70,140,85,140);

SetFillStyle (1,14);

FloodFill (75,135,1);

Line (0,60,40,60);

Line (40,60,40,100);

SetFillStyle (1,5);

FloodFill (5,65,1);

Line (5,70,15,70);

Line (5,70,5,80);

line (15,70,15,80);

Line (5,80,15,80);

SetfillStyle (1,14);

FloodFill (10,75,1);

Line (25,70,35,70);

Line (35,70,35,80);

Line (25,70,25,80);

Line (25,80,35,80);

SetFillStyle (1,14);

FloodFill (30,75,1);

Line (0,15,55,15);

Line (55,15,55,100);

SetFillStyle (1,6);

FloodFill (10,20,1);

Line (5,40,15,40);

Line (5,40,5,55);

Line (15,40,15,55);

Line (5,55,15,55);

SetFillStyle (1,14);

FloodFill (10,45,1);

Line (25,40,35,40);

Line (25,40,25,55);

Line (35,40,35,55);

Line (25,55,35,55);

SetFillStyle (9,8);

FloodFill (30,45,1);

Line (45,40,55,40);

Line (45,40,45,55);

Line (55,40,55,55);

Line (45,55,55,55);

SetFillStyle (1,14);

FloodFill (50,45,1);

Line (60,45,70,45);

Line (60,45,60,60);

Line (70,45,70,60);

Line (60,60,70,60);

Setfillstyle (1,14);

Floodfill (65,50,1);

Line (90,45,100,45);

Line (90,45,90,60);

Line (100,45,100,60);

Line (90,60,100,60);

SetFillstyle (1,14);

FloodFill (95,50,1);

Line (90,80,90,90);

Line (90,90,105,90);

Line (105,80,105,90);

Line (90,80,105,80);

SetFillStyle (1,14);

FloodFill (95,85,1);

line (70,80,70,90);

line (70,80,55,80);

Line (55,80,55,90);

Line (55,90,70,90);

SetFillStyle (9,8);

FloodFill (59,85,1);

Line (120,90,120,110);

Line (120,110,135,110);

Line (135,110,135,90);

Line (120,90,135,90);

SetFillStyle (1,14);

FloodFill (125,95,1);

Rectangle (155,90,170,110);

SetFillStyle (1,14);

FloodFill (165,95,1);

Rectangle (190,60,200,70);

SetFillStyle...