1)1 байт = 8 бит / 2 = 4 Нибла * 60 = 240 бит
2) 1 Кбайт = 1024 байт => 1024/2 = 512 байт
3) 1/8 = 0.125 Мбайт * 1024 = 128 Кбайт * 1024 = 131072 байт * 8 = 1048576 бит / 64 = 16384 слова
как-то так
Плотоядных 256/4=64
Информационная ёмкость в сообщении о находке плотоядного по формуле Шеннона
i=-log(p)/log(2) = -log(1/4)/log(2) = log(4)/log(2)=2
Сообщение о находке вампира весит в информационном смысле в тра раза больше, или 6 бит. Снова подставим в формулу Шеннона, для определения вероятности находки вампира
6 = -log(p)/log(2)
-6log(2)=log(p)
log(2^-6)=log(p)
p = 1/2^6 = 1/64
А всего вампиров было
256*p = 256/64 = 4
Травоядные - это остаток
256-64-4 = 188
С целью передать информацию.
Var t1,t2:text; s:string; n:integer;
begin
assign(t1,'t1.txt'); reset(t1);
assign(t2,'t2.txt'); rewrite(t2);
n:=0;
while not eof(t1) do begin
readln(t1,s);
n:=n+1;
writeln(t2,n:5,' ',s);
end;
close(t1); close(t2);
<span>end.</span>