Есть ответ 👍

При создании изображения использовалось 16 цветов. Сколько бит памяти занимает 1 пиксель? ​

211
365
Посмотреть ответы 1

Ответы на вопрос:


// 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

  • Быстро
    Мгновенный ответ на твой вопрос
  • Точно
    Бот обладает знаниями во всех сферах
  • Бесплатно
    Задай вопрос и получи ответ бесплатно

Популярно: Информатика

Caktus Image

Есть вопросы?

  • Как otvet5GPT работает?

    otvet5GPT использует большую языковую модель вместе с базой данных GPT для обеспечения высококачественных образовательных результатов. otvet5GPT действует как доступный академический ресурс вне класса.
  • Сколько это стоит?

    Проект находиться на стадии тестирования и все услуги бесплатны.
  • Могу ли я использовать otvet5GPT в школе?

    Конечно! Нейросеть может помочь вам делать конспекты лекций, придумывать идеи в классе и многое другое!
  • В чем отличия от ChatGPT?

    otvet5GPT черпает академические источники из собственной базы данных и предназначен специально для студентов. otvet5GPT также адаптируется к вашему стилю письма, предоставляя ряд образовательных инструментов, предназначенных для улучшения обучения.

Подпишись на наш телеграмм канал

GTP TOP NEWS