program graph_1; uses graph,crt; var detect,keypressed,graphmode:integer; begin initgraph(detect,graphmode,'C:\tp71\bgi'); setcolor(5); line(640,480,520,430); line(520,430,320,240); line(640,1,520,50); { (нижне праве)ЪЪ} circle(520,430,3); circle(520,430,4); circle(520,430,5); circle(520,430,10); circle(520,430,20); circle(520,430,30); circle(520,430,60); circle(520,430,40); circle(520,430,50); circle(520,430,70); circle(520,430,80); circle(520,430,90); circle(520,430,100); circle(520,430,110); line(320,240,120,430);line(120,430,1,480); circle(120,430,3); circle(120,430,4); circle(120,430,5); circle(120,430,10); circle(120,430,20); circle(120,430,30); circle(120,430,90); circle(120,430,40); circle(120,430,50); circle(120,430,100); circle(120,430,60); circle(120,430,70); circle(120,430,80); circle(120,430,4); circle(120,430,110); circle(520,50,3); circle(520,50,4); circle(520,50,5); circle(520,50,60); circle(520,50,70); circle(520,50,10); circle(520,50,20); circle(520,50,110); circle(520,50,30); circle(520,50,100); circle(520,50,40); circle(520,50,90); circle(520,50,50); circle(520,50,80); line (1,1,120,50); circle(120,50,70); circle(120,50,60); circle(120,50,50); circle(120,50,40); circle(120,50,80); circle(120,50,4); circle(120,50,3); circle(120,50,30); circle(120,50,90); circle(120,50,20); circle(120,50,100); circle(120,50,10); circle(120,50,110); circle(120,50,5); setcolor(3); line(320,240,80,480); line(320,240,240,480); line(320,240,400,480); line(320,240,560,480); line(320,240,80,1); line(320,240,240,1); line(320,240,400,1); line(320,240,560,1); line(320,240,640,60); line(320,240,640,180); setcolor(45); line(320,240,640,240); line(320,240,640,300); line(320,240,640,360); setcolor(54); line(320,240,640,420); line(1,240,640,240); line(320,1,320,480); line(160,1,320,240); setcolor(21); line(480,1,320,240); line(1,120,320,240); line(1,360,320,240); setcolor(5); line(160,480,320,240); line(480,480,320,240); line(640,120,320,240); setcolor(2); line(640,360,320,240); line(1,1,640,480); line(1,60,320,240); line(1,180,320,240); setcolor(1); line(1,300,320,240); line(1,360,320,240); line(1,420,320,240); line(1,480,320,240); line(1,480,640,1); setcolor(45); circle(320,240,0); circle(320,240,5); circle(320,240,10); setcolor(12); circle(320,240,20); circle(320,240,30); circle(320,240,40); setcolor(10); circle(320,240,50); circle(320,240,60); circle(320,240,70); setcolor(9); circle(320,240,80); circle(320,240,90); { setcolor(red);} circle(320,240,100); setcolor(6); circle(320,240,110); circle(320,240,120); circle(320,240,130); setcolor(5); circle(320,240,140); circle(320,240,150); circle(320,240,160); setcolor(2); circle(320,240,170); circle(320,240,180); circle(320,240,190); setcolor(4); circle(320,240,200); circle(320,240,210); circle(320,240,220); setcolor(58); {llipse(10,10,300,655,100,4);} setcolor(15); line(520,50,320,240); line(120,50,320,240); line(320,240,120,430); line(320,240,520,430); line(320,240,120,240); circle(120,240,3); circle(120,240,4); circle(120,240,5); circle(120,240,10); circle(120,240,20); circle(120,240,40); circle(120,240,50); circle(120,240,30); {circle(120,240,90);} circle(120,240,60); circle(120,240,70); {circle(120,240,80); circle(120,240,100); circle(120,240,110);} line( 120,240,1,1); line(120,240,1,480); line(320,240,520,240); circle(520,240,3); circle(520,240,4); circle(520,240,5); circle(520,240,10); circle(520,240,20); circle(520,240,40); circle(520,240,50); circle(520,240,30); {circle(120,240,90);} circle(520,240,60); circle(520,240,70); line(520,240,640,480); line(520,240,640,1); line(320,120,320,360); circle(320,120,3); circle(320,120,4); circle(320,120,5); circle(320,360,3); circle(320,360,4); circle(320,360,5); setcolor(15); line(320,360,520,430); line(320,360,120,430); line(320,120,120,50); line(320,120,520,50); readln; closegraph; end.