Фестиваль исследовательских и творческих работ учащихся "Портфолио ученика" 
Учительский фестиваль педагогических идей 
- Опуликовал: admin
- |
- Коментариев: 0
- |
- Просмотров: 904
uses GraphABC;
begin;
Rectangle(100,100,700,500);
line (300,100,300,500);
line (100,250,700,250);
circle(200,175,50);
circle(500,175,75);
circle(200,390,70);
circle (500,390,70);
FloodFill(200,175,clGreen);
FloodFill(500,170,clBlue);
FloodFill(200,390,clPurple);
FloodFill(500,390,clYellow);
Floodfill(102,102,clRed);
Floodfill(500,300,clBrown);
Floodfill(300,100,clBlue);
end.
Составил Томашевич Вадим
begin;
Rectangle(100,100,700,500);
line (300,100,300,500);
line (100,250,700,250);
circle(200,175,50);
circle(500,175,75);
circle(200,390,70);
circle (500,390,70);
FloodFill(200,175,clGreen);
FloodFill(500,170,clBlue);
FloodFill(200,390,clPurple);
FloodFill(500,390,clYellow);
Floodfill(102,102,clRed);
Floodfill(500,300,clBrown);
Floodfill(300,100,clBlue);
end.
Составил Томашевич Вадим
