var a:array [1..100] of real;
i,n:integer;
t:real;
Begin
randomize;
n:=20;
for i:= 1 to n do begin
a[i]:=random(n*10)- 10*n div 2 ;
write(a[i]:4);
if i mod 10=0 then writeln;
end;
t:=a[1]
for i:= 1 to n do begin
a[i]:=a[i]/t ;
write(a[i]:4);
if i mod 10=0 then writeln;
end;
End.
0001Гб 001МБ 2 КБ 13 байт 120 бит 0
Высчитаем количество пикселей в изображении:
128x128 = 16384
Высчитаем количество бит в 2 КБ:
2x1024x8 = 16384
Посчитаем количество бит на пиксель. Для этого поделим количество бит в изображении на количество пикселей:
16384 / 16384 = 1
Посчитаем глубину цвета:
2¹ = 2
Ответ: В изображении может быть максимум 2 цвета.
1) x=x+x и так 2 раза => x= 2*(5+5)=10*2=20
2)y=y*4 => y=5*4=20