; {Bagazhnik} (450, 425, 10); (1,7); (450, 425, 7); (570, 425, 10); (1,7); (570, 425, 7); (15) ; {Kabina} (476, 399, 500, 375); (500, 375, 515, 375); (515, 375, 515, 399); (476, 399, 515, 399); (1, 15); ( 500, 390, 15); (6); (558, 400, 362, 538, 42); (516, 399, 600, 399); (1,6); (520, 390, 6);;Solnce;(14);(50,150,30);(1,14);(50,150,14);(8);(35,140,5);(4,8);(35,140,8);(65,140,5);(5,8);(65,140,8);(50,160,580,330,10);;Dim;(15); {Bol shoe oblako} (1,15); (226,118,18); (226,110,15); (15); {Srednee oblako} (1,15); (226,128,15); (215,135,15); (235,135,15); (15); {Malen koe oblako}(1,15);(226,139,10);(226,137,15);(226,146,15);;Vodoem;SetColor(1);(1,1);(100,330,0,360,90,20);(100,330,1);(10); {Kyvshinka} (1,10); (50,330,0,360,35,10); (50,330,10); (15); {Cvetok}(1,15);(35,325,0,360,2,5);(35,325,15);(35,335,0,360,2,5);(35,335,15);(30,330,0,360,5,2);(30,330,15);(40,330,0,360,5,2);(40,330,15);(14);(1,14);(35,330,4);(35,330,14);(6); {Ytka} (1,6); (130,335,0,360,20,7); {Tulovishe} (130,335,6); (110,320,115,335); {Sheya} (111,320,5); {Golova} (107,320,6); (14); {Klyv} (1,14); (100,320); (106,318); (106,322); (100,320); (101,320,14); (8); {Glaz} (1,8); (110,318 , 2); (110,318,8); (7); {Per ya} (130,334,10,165,10,3); (130,337,10,165,10,3); (7); {Hvost} (1,7 ); (147,330); (155,325); (157,327); (149,333); (147,330); (148,330,7) ;; Veshalka; (7); {Palka} (1,7); (70,200,72,300); (70,200,4); {Nakone4nik} (69,200,7); (15); {Verevka} (135,200,180,360,65,10); (1); {Shtani}(1,1);(96,209);(115,210);(115,250);(108,250);(107,220);(106,250);(98,250);(96,209);(110,215,1);(10); {Rubaha}(1,10);(140,210);(180,208);(190,225);(180,229);(175,220);(175,250);(145,250);(145,220);(140,229);(130,225);(140,210);(150,230,10);;Dvizhenie;x,y,x1,y1,x2,y2:longint;,p1,p2:pointer;,Image1,Image2:Integer;:=ImageSize(19,115,80,181);(p1,Image1);(19,115,80,181,p1^);x1:=1 to 600 doy1:=round (115 * sin (x1/- 200)+115);(x1,y1,p1^,CopyPut);(1);;:=ImageSize(419,355,601,441);(p,Image);(419,355,601,441,p^);x:=419 downto 0 doy:=355; (x, y, p ^, CopyPut); (1) ;;:=ImageSize (207,99,245,150); (p2, Image2); (207,99,245,150, p2 ^); y2:= 99 downto 1 dox2:=208; (x2, y2, p2 ^, CopyPut); (1) ;;;:=detect; (gd, gm, ); (3) ;;;;;;; ;;;;;;;
end.
3. Результат
зображення графічний програма пам'ять
За траєкторії рухається сонце
Їде машина по дорозі
У небо піднімається дим
