Var
a, b : array [1..1000] of integer;
n, m, i : integer;
begin
read (n);
for i := 1 to n do read (a[i]);
m := 0;
for i := 1 to n do
if a[i] = 0 then
begin
m := m + 1;
b[m] := i;
end;
for i := 1 to m do write (b[i], ' ');
end. <span>
</span>
16 бит - 2 байта. 2*1240*480=1190400 байт 1190400/1024=1162,5 КБайт
32=2^5
256=2^8 количество бит на цвет уменьшилось на 3, значит в (2^3 = 8) уменьшился объем в оперативке
Обозначения:
К=0
О=1 ( троичная система счисления)
Р=2
список:
№ 3 сс 10сс
1 00000 0
2 00001 1
3 00002 2
4 00010 3
...............................
182 Х 181 (10сс)
181 (10сс)= 20201 (3сс) =РКРКО
Х=РКРКО
ответ РКРКО
Информационный объем изображения I=k*i, где к- количество точек, i- глубина цвета.
Глубина цвета определяется из формулы N=2^i, где N-количество цветов
i=㏒₂N= ㏒₂256= 8 бит
k=25*25= 625
I=625*8= 5000 бит
5000 бит/8= 625 байт
Нужно дрова поставить(драйвера)в настройках подивись чи є,якщо нема то встанови