При создании изображения использовалось 16 цветов. Сколько бит памяти занимает 1 пиксель?
211
365
Ответы на вопрос:
// pascalabc.net 3.1, сборка 1218 от 12.04.2016 uses graphabc; procedure sun(x, y: integer); begin var c : = 8; for var j : = 1 to 100 do begin var r : = 15 * c; var k : = 0; if j mod 2 = 0 then k : = 20; for var i : = 0 to c do begin brush.color : = rgb(230 - k, 230 - k, 0); circle(x, y, r); k : = k + 15; r : = r - 15; sleep(100); end; end; end; procedure house(x, y: integer); begin brush.color : = clbrown; pen.color : = clburlywood; var house_width : = 300; var house_height : = 300; var count : = 10; var step : = round(house_width / count); fillrectangle(x, y, x + house_width, y + house_height); var xx : = x; for var i : = 1 to count - 1 do begin xx : = xx + step; line(xx, y, xx, y + house_height); end; brush.color : = clgray; fillrectangle(x + 100, y + 100, x + 200, y + 210); brush.color : = clyellow; fillrectangle(x + 105, y + 105, x + 195, y + 150); brush.color : = clred; fillrectangle(x + 105, y + 155, x + 150, y + 205); brush.color : = clblue; fillrectangle(x + 155, y + 155, x + 195, y + 205); moveto(x + house_width div 2, y - 80); lineto(x + house_width, y, pen.color); lineto(x, y, pen.color); lineto(x + house_width div 2, y - 80, pen.color); floodfill(x + house_width div 2, y - 10, clolive); brush.color : = clred; circle(x + house_width div 2, y - 35, 30); end; procedure turtoise(x, y: integer); begin brush.color : = clgreen; pen.color : = clgreen; fillrectangle(x + 5, y + 15, x - 20, y + 24); fillrectangle(x + 50, y, x + 30, y + 70); fillrectangle(x + 100, y, x + 120, y + 70); fillcircle(x + 170, y, 30); brush.color : = clwhite; fillcircle(x + 180, y - 20, 10); brush.color : = clblack; fillcircle(x + 182, y - 18, 2); brush.color : = clred; fillrectangle(x + 180, y, x + 200, y + 4); brush.color : = clbrown; fillellipse(x, y - 10, x + 150, y + 50); end; begin window.init(0, 0, 1920, 1000, clblue); brush.color : = cllimegreen; rectangle(0, 580, 1920, 1018); house(700, 380); turtoise(300, 600); turtoise(900, 750); sun(1200, 200); end.
Реши свою проблему, спроси otvet5GPT
-
Быстро
Мгновенный ответ на твой вопрос -
Точно
Бот обладает знаниями во всех сферах -
Бесплатно
Задай вопрос и получи ответ бесплатно
Популярно: Информатика
-
Valeria00018.11.2021 12:19
-
польска21.11.2020 03:47
-
Messi11111111111111106.10.2020 23:54
-
Ap4ik88802.03.2021 02:39
-
Zhaksyldi11.09.2022 00:16
-
grimm330066Flippoo07.07.2022 16:08
-
патишка123.11.2020 14:19
-
Onik200205.02.2020 05:11
-
narminanarminaovsozg13.01.2022 13:20
-
Artemka161018.09.2020 22:13
Есть вопросы?
-
Как otvet5GPT работает?
otvet5GPT использует большую языковую модель вместе с базой данных GPT для обеспечения высококачественных образовательных результатов. otvet5GPT действует как доступный академический ресурс вне класса. -
Сколько это стоит?
Проект находиться на стадии тестирования и все услуги бесплатны. -
Могу ли я использовать otvet5GPT в школе?
Конечно! Нейросеть может помочь вам делать конспекты лекций, придумывать идеи в классе и многое другое! -
В чем отличия от ChatGPT?
otvet5GPT черпает академические источники из собственной базы данных и предназначен специально для студентов. otvet5GPT также адаптируется к вашему стилю письма, предоставляя ряд образовательных инструментов, предназначенных для улучшения обучения.