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

Как сделать, чтобы глаза котика моргали? паскаль! uses graphabc; begin setwindowsize(600,700); setbrushcolor(clgray); line(120,240,150,40); line(150,40,280,150); line(280,150,120,240); line(320,150,480,240); line(480,240,450,40); line(450,40,320,150); floodfill(200,100,clsilver); floodfill(400,100,clsilver); setbrushcolor(clgray); floodfill(300,500,clgray); setbrushcolor(clgray); ellipse(100,430,500,130); line(120,350,0,700); line(0,700,600,700); line(600,700,470,350); line(120,350,300,550); line(300,550,470,350); floodfill(120,370,cllime); floodfill(90,360,clskyblue); setbrushcolor(clwhite); ellipse(300,240,200,330); ellipse(300,240,400,330); setbrushcolor(clblack); ellipse(260,270,240,300); ellipse(360,270,340,300); setbrushcolor(clblack); ellipse(270,330,330,370); line(50,350,200,350); line(30,340,190,340); line(10,330,180,330); line(410,330,570,330); line(400,340,560,340); line(390,350,550,350); end.

Показать ответ
Ответ:
Ярослав12345678
Ярослав12345678
18.09.2020 10:55
Можно поставить "вечный цикл" с задержкой и перерисовывать ему глаза раз в секунду. Самый простой который пришёл в голову.

Исходник в приложении к ответу.
0,0(0 оценок)
Популярные вопросы: Информатика
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку
logo
Начни делиться знаниями
Вход Регистрация
Что ты хочешь узнать?
Спроси ai-бота