uses graphABC;
begin
setwindowSize(800,600);

//небо
  brush.color:=rgb(58,192,255);
  pen.color:=rgb(58,192,255);
  rectangle(-1,-50,801,500);

//облака
  pen.Color:=clWhiteSmoke;
  Brush.Color := clWhiteSmoke;
  circle(50,90,30); circle(100,90,45); circle(150,90,30);
  circle(220,70,30); circle(270,70,45); circle(320,70,30);
  circle(400,90,30); circle(450,90,45); circle(500,90,30);

//солнышко
  brush.color:=clyellow;
  pen.color:=clblack;
  circle(600,100,50);

  
//дерево
  brush.color:=rgb(176, 129, 69);
  pen.color:=clblack;
  rectangle(500,400,530,501);
  brush.color:=clgreen;
  pen.color:=clgreen;
  circle(515,353,50);
  
//домик
  //каркас
    brush.color:=rgb(127,0,0);
    pen.color:=clblack;
    Rectangle(100,400,200,500);
    moveto(200,400); lineto(300,350);
    moveto(200,500); lineto(300,450);
    line(300,350,300,450); FloodFill(250,450,rgb(127,0,0)); 
  //крыша
    brush.color:=clblack;
    Line(100,400,150,300); Line(200,400,150,300); floodfill(150,350,rgb(153, 75, 153));
    line(260,275,300,350); line(260,275,150,300); floodfill(250,300,rgb(153, 75, 153));
  //дверь
    brush.Color:=rgb(255, 126, 46);
    Rectangle(130,440,170,500);
  //окно
    line(240,415,240,450); line(280,390,280,425);
    line(240,415,280,390); line(240,450,280,425);
    FloodFill(250,430,clYellow);
    line(260,405,260,440); line(240,432,280,407);
    
//будка
  Brush.Color:=rgb(127,0,0);
  Rectangle(600,430,680,500);
  Brush.Color:=rgb(230, 215, 53);
  Circle(640,485,30);
  line(600,430,640,380); line(680,430,640,380);
  FloodFill(650,400,rgb(245, 208, 208));
    
//трава
  brush.color:=clgreen;
  pen.color:=clblack;
  pen.Width:=3;
  rectangle(0,500,800,600);
end.