С2 кто шарит в этом: 1.)заполнить массив по следующему принципу: 31 32 33 34 35 36 25 26 27 28 29 30 19 20 21 22 23 24 13 14 15 16 17 18 7 8 9 10 11 12 1 2 3 4 5 6 2.)заполнить массив по следующему принципу: 6 7 18 19 30 31 5 8 17 20 29 32 4 9 16 21 28 33 3 10 15 22 27 34 2 11 14 23 26 35 1 12 13 24 25 36

ответ:

обьект "ракета"                                                                                   1)program raketa;

uses graphabc;   //подключение модуля graphabc

begin

setwindowsize(500,500); //установка размеров графического   окна

setpencolor(clblack); // цвет пера -  

line(50,100,150,150);

line(150,150,350,150);

line(350,150,400,200);

line(400,200,350,250);

line(350,250,150,250);

line(150,250,50,300);

line(50,300,50,100);

 

setpencolor(clred);

line(50,200,150,200);

setpencolor(clblack);

setbrushcolor(clskyblue );

circle(200,200,20);

circle(250,200,20);

circle(300,200,20);

  движение "ракеты"                                                                                   2)uses graphabc;

procedure raketa(x: integer);

begin

line(x,100,x+100,150);

line(x+100,150,x+300,150);

line(x+300,150,x+350,200);

line(x+350,200,x+300,250);

line(x+300,250,x+100,250);

line(x+100,250,x,300);

line(x,300,x,100);

setpencolor(clred);

line(x,200,x+100,200);

setpencolor(clblack);

setbrushcolor(clskyblue );

circle(x+150,200,20);

circle(x+200,200,20);

circle(x+250,200,20);

end;

var x: integer;

begin

x: =5;

lockdrawing;

repeat

clearwindow;

x: =x+5;

raketa(x);

sleep(50);

redraw

until x> windowwidth

 

end.

 

end.

объяснение:

!

я не обещаю что ответ будет правильным

ответ:

объяснение:

    используем формулу нахождения объема:

    i = m x n * i

    подсчитаем каждый сомножитель в формуле, стараясь числа к степеням двойки:

    m x n:

    160 * 160 = 20 * 2³ *   20 * 2³ = 400 * 26 =

    = 25 * 24 * 26

    нахождение глубины кодирования i:

    256 = 28

    т.е. 8 бит на пиксель   (из формулы кол-во цветов = 2i)

    находим объем:

    i = 25 * 24 * 26 * 23 = 25 * 213 - всего бит на всё изображение

    переводим в кбайты:

    (25 * 213) / 213 = 25 кбайт