35 = 2^i
i = 6 бит - 1 символ
10*6 = 60 бит информации
Var
a: array[1..10] of integer;
i, j, temp: integer;
begin
randomize;
for i := 1 to 10 do
begin
a[i] := random(100,999);
write(a[i]:3);
end;
writeln;
for i := 1 to 10 - 1 do
for j := i + 1 to 10 do
if a[i] > a[j] then
begin
temp := a[i];
a[i] := a[j];
a[j] := temp;
end;
for i := 1 to 10 do
write(a[i]:3);
end.
const mmm=5;
var
x:array[1..mmm] of integer;
k, n, bmaks: integer;
begin
for n:=1 to mmm do readln (x[n]);
for n:=1 to mmm-1 do
for k:=1 to mmm-n do
begin
bmaks:=x[k+1];
X[k+1]:=x[k];
x[k]:= bmaks;
end;
for n:=1 to mmm do
writeln(x[n]);
end.
I = K * i (I - объем информации, K - кол-во пикселей, i - вес одного пикселя / глубина цвета)
i = I / K
K = 64 * 64 = 4096 пикселей
I = 2 Kb = 2 * 1024 * 8 бит = 16384 бит
Глубина цвета бит
Кол-во цветов в палитре цветов
Ответ: 16.0