profile
Опубликовано - 1 месяц назад | По предмету Информатика | автор Аноним

Тем, кто работает с Pascal ABC! Не заливается хобот у слона. В чем проблема? Program elephant_Meri_13; uses graphABC;

  1. Ответ
    Ответ дан Силина Виктория
    Program elephant_Meri_13;
    uses graphABC;
    begin
    setwindowsize(500,500);
    setpenwidth(8);
    arc(150,300,100,0,180);
    arc(360,250,80,160,360);
    arc(370,240,60,160,360);
    line(443,252,428,242);
    setbrushcolor (clgray);
    circle(250,150,100);
    line(50,300,50,450);
    line(50,450,140,450);
    line(140,450,140,400);
    line(140,400,160,400);
    line(160,400,160,450);
    line(160,450,250,450);
    line(250,450,250,300);
    line(50,290,10,370);
    FloodFill (60,400,clgray);
    setpenwidth(3);
    circle(150,300,98);
    circle(250,150,98);
    setbrushcolor (clwhite);
    circle(300,180,20);
    setpenwidth(8);
    setbrushcolor(clskyblue);
    circle(300,175,10);
    FloodFill (320,290,clgray);
    end.

    Ошибка исправлена
    0