В
Все
У
Українська література
Г
Геометрия
Д
Другие предметы
Э
Экономика
Г
География
О
ОБЖ
М
Математика
М
МХК
Х
Химия
Қ
Қазақ тiлi
Л
Литература
У
Українська мова
О
Обществознание
Ф
Физика
А
Английский язык
А
Алгебра
И
История
Б
Беларуская мова
Б
Биология
М
Музыка
П
Право
И
Информатика
П
Психология
В
Видео-ответы
Н
Немецкий язык
Ф
Французский язык
О
Окружающий мир
Р
Русский язык
alieksandra10981
alieksandra10981
04.11.2020 23:21 •  Информатика

Тем, кто работает с pascal abc! не заливается хобот у слона. в чем проблема? 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); end.

Ответ:
DJZargo
DJZargo
02.10.2020 10:25
Проблема в том, что для закрашивания тела вы прописали вызов процедуры FloodFill(60,400,clgray), а для закрашивания хобота - нет, ни одна из строк кода его не должна закрашивать. Добавьте после первого FloodFill'а еще одну строку: FloodFill (400,300,clgray);  (координаты подобраны на глаз, но подходят)
0,0(0 оценок)
Популярные вопросы: Информатика
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку
logo
Начни делиться знаниями
Вход Регистрация
Что ты хочешь узнать?