Rss
Виртуальный кабинет МАТЕМАТИКУС

5 класс

6-7 классы

8-9 классы

10-11 классы

Категории
Полезные ссылки
Материалы
Популярное
Информатикус
Информатикус. РАЗНОЕ
О Свислочи
Электронные пособия
  • Microsoft Excel: теория, практика, контроль
  • Раскраски онлайн для самых маленьких
    • Ребусы по физике
    Календарь
    «    Март 2023    »
    ПнВтСрЧтПтСбВс
     12345
    6789101112
    13141516171819
    20212223242526
    2728293031 
    Журнал "Математика"
    Математика
    Портфолио ученика
    Портфолио Фестиваль исследовательских и творческих работ учащихся "Портфолио ученика"
    Открытый урок
    Открытый урок Учительский фестиваль педагогических идей
    Счетчик посещений
    счетчик посещений
    Flag Counter

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

    Интернет с пользой
    Интернет с пользой
    Знаток » Информатика » Рисуем в ABCPascal
    Дистанционное обучение

    ПРИМЕР 12. РИСУЕМ В ABCPASCAL

    • Опуликовал: admin
    • |
    • Коментариев: 0
    • |
    • Просмотров: 619
    ПРИМЕР 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.
    Подготовил Томашевич Вадим.
    Подробнее

    ПРИМЕР 11. РИСУЕМ В ABCPASCAL

    • Опуликовал: admin
    • |
    • Коментариев: 0
    • |
    • Просмотров: 568
    ПРИМЕР 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.
    Подготовил Яковенко Матвей.
    Подробнее

    ПРИМЕР 10. РИСУЕМ В ABCPASCAL

    • Опуликовал: admin
    • |
    • Коментариев: 0
    • |
    • Просмотров: 520
    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.
    Подготовил Томашевич Вадим.
    Подробнее

    ПРИМЕР 9. РИСУЕМ В ABCPASCAL

    • Опуликовал: admin
    • |
    • Коментариев: 0
    • |
    • Просмотров: 633
    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.
    Подготовил Яковенко Матвей.
    Подробнее

    ПРИМЕР 8. РИСУЕМ В ABCPASCAL

    • Опуликовал: admin
    • |
    • Коментариев: 0
    • |
    • Просмотров: 664
    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.
    Подготовил Журавель Егор.
    Подробнее

    ПРИМЕР 7. РИСУЕМ В ABCPASCAL

    • Опуликовал: admin
    • |
    • Коментариев: 0
    • |
    • Просмотров: 612
    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.
    Составил Грико Игнат.
    Подробнее

    ПРИМЕР 6. РИСУЕМ В ABCPASCAL

    • Опуликовал: admin
    • |
    • Коментариев: 0
    • |
    • Просмотров: 637
    uses graphabc;
    begin
    moveto(200,200);
    lineto(600,200);
    lineto(400,400);
    lineto(200,200);
    floodfill(200,209,clred);
    floodfill(206,201,clgreen);
    circle(400,300,50);
    floodfill(400,300,clblack);
    circle(400,300,20);
    end.
    Составил Грико Игнат.
    Подробнее

    ПРИМЕР 5. РИСУЕМ В ABCPASCAL

    • Опуликовал: admin
    • |
    • Коментариев: 0
    • |
    • Просмотров: 618
    uses GraphABC;
    begin
    MoveTo(200,200);
    LineTo(600,200);
    LineTo(400,400);
    LineTo(200,200);
    FloodFill(500,203,clblack);
    end.
    Составил Яковенко Матвей.
    Подробнее

    ПРИМЕР 4. РИСУЕМ В ABCPASCAL

    • Опуликовал: admin
    • |
    • Коментариев: 0
    • |
    • Просмотров: 635
    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.
    Составил Томашевич Вадим
    Подробнее

    ПРИМЕР 3. РИСУЕМ В ABCPASCAL

    • Опуликовал: admin
    • |
    • Коментариев: 0
    • |
    • Просмотров: 631
    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,70);
    circle(200,320,50);
    circle(500,390,90);
    floodfill(200,175,clblue);
    floodfill(500,390,clsilver);
    floodfill(200,320,clmoneygreen);
    floodfill(500,175,clyellow);
    floodfill(102,102,clgray);
    floodfill(302,102,clmedgray);
    floodfill(102,252,cllime);
    floodfill(302,498,clteal);
    end.
    Составил Грико Игнат
    Подробнее
    1 2 3
    Предыдущая Следующая

    Облако Тегов

    {links}
    ГУО Физика для всех Виртуальный кабинет физики
    Copyright © 2015; ВИРТУАЛЬНЫЙ КАБИНЕТ МАТЕМАТИКИ
    Источник: ГУО "Гимназия №1 имени К.Калиновского г.Свислочь"

    АДРЕС: Гродненская обл., г.Свислочь, saassl@mail.ru.

    Designed by Elcreativo