Rss
Виртуальный кабинет МАТЕМАТИКУС
Популярное
Календарь
«     2024    »
1234567
891011121314
15161718192021
22232425262728
2930 
Журнал "Математика"
Математика
Счетчик посещений
счетчик посещений
Flag Counter

Опросы
Оцените работу сайта
Лучший
Неплохой
Устраивает ... но ...
Встречал и получше
Совсем не понравился

Интернет с пользой
Интернет с пользой
  • Опуликовал: admin
  • |
  • Коментариев: 0
  • |
  • Просмотров: 488
Сайт учителя математики Сайт учителя математики http://matik.jimdo.com/
  • Опуликовал: admin
  • |
  • Коментариев: 0
  • |
  • Просмотров: 703
ПРИМЕР 15. РИСУЕМ В ABCPASCALuses graphABC;
begin
circle(50,100,20);
circle(75,100,20);
circle(100,100,20);
circle(125,100,20);
circle(150,100,20);
circle(175,75,30);
floodfill(50,100,clteal);
floodfill(75,100,clteal);
floodfill(100,100,clteal);
floodfill(125,100,clteal);
floodfill(150,100,clteal);
floodfill(175,75,CLteal);
Circle(160,70,7);
circle(190,70,7);
arc(175,90,11,0,180);

circle(250,100,20);
circle(275,100,20);
circle(300,100,20);
circle(325,100,20);
circle(350,100,20);
circle(375,75,30);
floodfill(250,100,clteal);
floodfill(275,100,clteal);
floodfill(300,100,clteal);
floodfill(325,100,clteal);
floodfill(350,100,clteal);
floodfill(375,75,CLteal);
Circle(360,70,7);
circle(390,70,7);
arc(375,90,11,0,180);
end.
Подготовила Синица Юлия.
  • Опуликовал: admin
  • |
  • Коментариев: 0
  • |
  • Просмотров: 704
ПРИМЕР 14. РИСУЕМ В ABCPASCALuses graphabc;
begin
circle(50,100,20);
circle(75,100,20);
circle(100,100,20);
circle(125,100,20);
circle(150,100,20);
circle(175,75,30);
floodfill(45,90,clgreen);
floodfill(70,90,clgreen);
floodfill(90,90,clgreen);
floodfill(110,90,clgreen);
floodfill(140,90,clgreen);
floodfill(160,70,clgreen);
circle(170,70,5);
circle(180,70,5);
arc(175,90,10,0,180);

circle(250,100,20);
circle(275,100,20);
circle(300,100,20);
circle(325,100,20);
circle(350,100,20);
circle(375,75,30);
floodfill(245,90,clgreen);
floodfill(270,90,clgreen);
floodfill(290,90,clgreen);
floodfill(310,90,clgreen);
floodfill(340,90,clgreen);
floodfill(360,70,clgreen);
circle(370,70,5);
circle(380,70,5);
arc(375,90,10,0,180);
end.
Подготовила Волонсевич Яна.
  • Опуликовал: admin
  • |
  • Коментариев: 0
  • |
  • Просмотров: 707
ПРИМЕР 13. РИСУЕМ В ABCPASCALuses graphabc;
begin
circle(200,200,30);
circle(250,200,30);
circle(300,200,30);
circle(350,200,30);
circle(400,200,30);
circle(450,170,50);
floodfill(202,202,clgreen);
floodfill(252,202,clgreen);
floodfill(302,202,clgreen);
floodfill(352,202,clgreen);
floodfill(402,202,clgreen);
floodfill(452,202,clgreen);
line(425,130,410,80);
line(480,130,500,80);
circle(410,80,10);
circle(500,80,10);
floodfill(410,80,clgreen);
floodfill(500,80,clgreen);
circle(440,160,10);
circle(485,160,10);
floodfill(440,160,clyellow);
floodfill(485,160,clyellow);
line(440,190,465,210);
line(465,210,485,190);
line(485,190,465,200);
line(465,200,440,190);
end.
Подготовил Грико Игнат.
  • Опуликовал: admin
  • |
  • Коментариев: 0
  • |
  • Просмотров: 732
ПРИМЕР 12. РИСУЕМ В ABCPASCALuses GraphABC;
begin
Circle(50,100,20);
FloodFill(50,100,clGreen);
Circle(75,100,20);
FloodFill(75,100,clRed);
Circle(100,100,20);
FloodFill(100,100,clBlue);
Circle(125,100,20);
FloodFill(125,100,clYellow);
Circle(150,100,20);
FloodFill(150,100,clGray);
Circle(175,75,30);
FloodFill(175,75,clAqua);
Circle(165,72,10);
FloodFill(165,72,clblack);
Circle(190,72,10);
end.
Подготовил Томашевич Вадим.
  • Опуликовал: admin
  • |
  • Коментариев: 0
  • |
  • Просмотров: 679
ПРИМЕР 11. РИСУЕМ В ABCPASCALUses GraphABC;
begin
Circle(50,100,20);
FloodFill(50,100,clGray);
Circle(75,100,20);
FloodFill(75,100,clRed);
Circle(100,100,20);
FloodFill(100,100,clLime);
Circle(125,100,20);
FloodFill(125,100,clGreen);
Circle(150,100,20);
FloodFill(150,100,clSkyBlue);
Circle(175,73,30);
FloodFill(175,73,clGreen);
circle(162,72,7);
FloodFill(162,75,clBlack);
circle(189,72,7);
FloodFill(189,75,clBlack);
Circle(50,200,20);
end.
Подготовил Яковенко Матвей.
  • Опуликовал: admin
  • |
  • Коментариев: 0
  • |
  • Просмотров: 640
uses graphABC;
begin;
rectangle(80, 260, 200, 370);
rectangle(200, 100, 350, 400);
rectangle(350, 180, 650, 400);
circle(275, 400, 60);
circle(550, 400, 60);
floodfill(260, 150, clyellow);
floodfill(370, 185, clgreen);
floodfill(300, 350, clblack);
floodfill(550, 400, clblack);
floodfill(100, 300, clgray);
rectangle(220, 110, 280, 330);
end.
Подготовил Томашевич Вадим.
  • Опуликовал: admin
  • |
  • Коментариев: 0
  • |
  • Просмотров: 748
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.
Подготовил Яковенко Матвей.
  • Опуликовал: admin
  • |
  • Коментариев: 0
  • |
  • Просмотров: 784
uses GraphABC;
begin
rectangle(80,260,200,370);
rectangle(200,100,350,380);
rectangle(350,180,650,380);
circle(275,400,60);
circle(550,400,60);
FloodFill(85,265,clMoneyGreen);
FloodFill(205,105,clSilver);
FloodFill(355,185,clTeal);
FloodFill(280,405,clMedGray);
FloodFill(560,405,clSkyBlue);
rectangle(250,170,300,300);
FloodFill(355,185,clLime);
circle(550,400,20);
FloodFill(555,405,clTeal);
circle(275,400,20);
FloodFill(275,405,clTeal);
rectangle(400,100,630,180);
FloodFill(405,165,clBrown);
rectangle(410,110,630,180);
FloodFill(415,115,clBrown);
end.
Подготовил Журавель Егор.
  • Опуликовал: admin
  • |
  • Коментариев: 0
  • |
  • Просмотров: 731
uses graphabc;
begin
rectangle(80,260,200,370);
rectangle(200,100,350,380);
rectangle(350,210,700,380);
circle(275,400,60);
circle(550,400,60);
floodfill(82,262,clred);
floodfill(202,102,clyellow);
floodfill(352,212,clblue);
rectangle(250,150,300,260);
floodfill(252,152,claqua);
circle(275,400,20);
circle(550,400,20);
floodfill(278,402,clgray);
floodfill(558,402,clgray);
floodfill(235,360,clblack);
floodfill(510,360,clblack);
rectangle(400,150,650,210);
rectangle(450,165,675,210);
floodfill(402,152,clbrown);
floodfill(452,167,clbrown);
rectangle(375,175,625,210);
floodfill(377,177,clbrown);
end.
Составил Грико Игнат.

Облако Тегов

{links}