- Опуликовал: admin
- |
- Коментариев: 0
- |
- Просмотров: 948

uses GraphABC;
begin
rectangle(80,260,200,370);
rectangle(200,100,350,400);
FloodFill(195,300,clBlack);
rectangle(350,180,650,400);
FloodFill(250,200,clSilver);
circle(275,400,60);
FloodFill(275,400,clGray);
circle(550,400,60);
FloodFill(550,400,clGray);
rectangle(205,285,280,102);
FloodFill(210,280,clSkyBlue);
rectangle(205,105,350,80);
end.
Подготовил Яковенко Матвей.
begin
rectangle(80,260,200,370);
rectangle(200,100,350,400);
FloodFill(195,300,clBlack);
rectangle(350,180,650,400);
FloodFill(250,200,clSilver);
circle(275,400,60);
FloodFill(275,400,clGray);
circle(550,400,60);
FloodFill(550,400,clGray);
rectangle(205,285,280,102);
FloodFill(210,280,clSkyBlue);
rectangle(205,105,350,80);
end.
Подготовил Яковенко Матвей.