Rss
Виртуальный кабинет МАТЕМАТИКУС
Популярное
Календарь
«    Апрель 2025    »
ПнВтСрЧтПтСбВс
 123456
78910111213
14151617181920
21222324252627
282930 
Журнал "Математика"
Математика
Счетчик посещений
счетчик посещений Рейтинг: Учеба
Flag Counter

Опросы
Оцените работу сайта

Интернет с пользой
Интернет с пользой
Знаток » Информатика » Рисуем в ABCPascal » ПРИМЕР 4. РИСУЕМ В ABCPASCAL
  • Опуликовал: admin
  • |
  • Коментариев: 0
  • |
  • Просмотров: 936
  • Сообщить о ошибке
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.
Составил Томашевич Вадим

Облако Тегов

{links}