В какую таблицу? я не вижу таблицы
Uses crt;
var m:array[1..4,1..5] of integer;
b:array[1..4] of integer;
min,i,j:integer;
begin
clrscr;
for i:=1 to 4 do
begin
for j:=1 to 5 do
begin
m[i,j]:=random(35)-30;
end;
<span>end;
for i:=1 to 4 do
begin
for j:=1 to 5 do
write(m[i,j]:3,' ' );
writeln;
end;
min:=m[1,1];
for i:=1 to 4 do
begin
for j:=1 to 5 do
begin
if min>m[i,j] then min:=m[i,j];
end;
b[i]:=min;
min:=m[i+1,1];
end;
for i:=1 to 4 do
writeln(i,') ',b[i]);
readkey;
end.
</span>
I = K*i, где K-кол-во символов, i- размер алфавита
<span> Значит i = 8</span>
<span> бит</span>
Так как нам нужно в байтах, то (в 1 байте 8 бит) делим на 8 ()
<span> байт</span>
Подсчитываем и в итоге получаем ответ:
<span> байт</span>
<span>Ответ: 30720 байт. вот решение </span>
14C (HEX) = 332 (DEC) = 514(OCT)...
0 значащих нулей.