Const n=30;
var a:array[1..n] of integer;
i,min:integer;
begin
min:=1000;
for i:=1 to n do
begin
readln(a[i]);
if (a[i] div 100>=1) and(a[i]<min) then min:=a[i];
end;
if (min=1000) then writeln('Такого числа нет')
else writeln('Минимальное 3-значное число равняется ',min);
<span>end.</span>
32 = 2^5 это значит что один символ кодируется 5 битами получаем 70*5=350бит или 350/8=43.75 байта
Количество информации вычисляется по формуле I = log(2)1/p,
где p - вероятность наступления некоторого события.
Для зайца: p = 4/16 = 1/4; I = log(2)[1 / 1/4] = log(2)4 = 2 бита
Для медведя: p = 2/16 = 1/8; I = log(2)[1 / 1/8] = log(2)8 = 3 бита
4 Кбайт = 4*1024 байт = 4*1024*8 бит
Объем одного пикселя = 4*1024*8 / (175*175) ≈ 1,07 бит ≈ 1 бит
Число цветов = 2^1 = 2