Войти
Регистрация
Спроси ai-bota
В
Все
Б
Биология
Б
Беларуская мова
У
Українська мова
А
Алгебра
Р
Русский язык
О
ОБЖ
И
История
Ф
Физика
Қ
Қазақ тiлi
О
Окружающий мир
Э
Экономика
Н
Немецкий язык
Х
Химия
П
Право
П
Психология
Д
Другие предметы
Л
Литература
Г
География
Ф
Французский язык
М
Математика
М
Музыка
А
Английский язык
М
МХК
У
Українська література
И
Информатика
О
Обществознание
Г
Геометрия
Показать больше
Показать меньше
kochanovaleksa
17.03.2021 15:17 •
Информатика
Как по икт сделать снеговика в abc паскаль напишите программу
Показать ответ
Ответ:
ЛераЛи123
02.10.2020 09:49
Program sneg;
uses graphABC;
beginsetpenwidth(3);
setwindowsize(400,500);
ellipse(120,350,280,480);
circle(200,300,60);
circle(200,210,40);
line(170,90,230,90);
line(160,180,240,180);
line(170,90,160,180);
line(230,90,240,180);
floodfill(200,173,clblack);
floodfill(200,123,clblack);
setbrushcolor(clblack);
circle(190,200,5);
circle(210,200,5);
line(200,210,220,220);
line(200,220,220,220);
line(200,210,200,220);
floodfill(204,214,clblack);
setpenwidth(5);
arc(200,230,10,180,0);
line(70,320,170,250);
line(230,250,330,300);
line(300,450,350,200);
line(350,200,320,140);
line(350,200,340,140);
line(350,200,360,140);
line(350,200,380,140);
line(350,200,400,140);
end.
0,0
(0 оценок)
Популярные вопросы: Информатика
mandarin50
11.07.2020 10:56
Сызбаны дәптеріңе толтыр.Программалық блоктағы үш жұмыс режимін жаз....
777stepan777
13.07.2020 09:17
Массив a заполните случайными числами. Элементы меньше 5 отнесите к массиву b . Решите 2 массива...
povshedna
19.03.2020 16:44
В таблице приведены за к поисковому серверу. Для обозначения логической операции или в за используется символ »l« а для логической операции И -- «&»...
ХЕЕЕЛПАНИТЕ
07.06.2021 10:24
на бесконечном поле имеются две одинаковые вертикальные параллельные стены, расположенные на одинаковой высоте и от стоящие друг от друга более чем на одну клетку....
Ди1501
15.07.2021 23:43
Решите не является высказыванием 3)C=0...
mexoc
14.06.2020 06:35
Рассчитай объём видеопамяти, необходимой для хранения графического изображения, занимающего весь экран монитора с разрешением 800×480 и палитрой из 16777216 цветов....
karipzhanovalibek11
28.09.2022 08:40
9. Если при суммировании не учитывается признак переноса, то соответствующая логическая схема называется полу- сумматором. По имеющейся таблице истинности постройте...
BlackSenpai
08.06.2020 04:56
Нарисуйте функциональную схему для следующей логической функции...
Vantsyan0
18.04.2022 08:59
Какую информацию можно использовать в презентации?...
ПеЧеНьКа811
30.01.2020 14:44
СТОЛБЕЦ С ВЕРХУ ЭТО 4 ЗАДАНИЕ ВО Запишите формулу для вычисления суммы выделенного диапазона...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
uses graphABC;
beginsetpenwidth(3);
setwindowsize(400,500);
ellipse(120,350,280,480);
circle(200,300,60);
circle(200,210,40);
line(170,90,230,90);
line(160,180,240,180);
line(170,90,160,180);
line(230,90,240,180);
floodfill(200,173,clblack);
floodfill(200,123,clblack);
setbrushcolor(clblack);
circle(190,200,5);
circle(210,200,5);
line(200,210,220,220);
line(200,220,220,220);
line(200,210,200,220);
floodfill(204,214,clblack);
setpenwidth(5);
arc(200,230,10,180,0);
line(70,320,170,250);
line(230,250,330,300);
line(300,450,350,200);
line(350,200,320,140);
line(350,200,340,140);
line(350,200,360,140);
line(350,200,380,140);
line(350,200,400,140);
end.