Если вагонов 8 = 2³, то сообщение о выборе любого вагона несет 3 бита информации.
Сообщение о том, что не выбран конкретный вагон означает, что выбран любой из семи оставшихся и оно несет информацию в размере ㏒₂(8/7) ≈ 0.193 бит
Задание 7
порядок входов:
B C A
Строка 3
B=1, F=1
Строка 4
B=1, A=1, F=0
Строка 7
B=1, C=1, F=1
Строка 8
B=1, C=1, A=1, F=1
Program pr1;
var
a,i:integer;
p:int64;
begin
p:=1;
readln(a);
for i:=a to 20 do
p:=p*i;
writeln(p);
end.
Наличие необходимого снаряжения: палатки, котелка, консерв, воды, карты, компаса, КЛМН и т.д.
Благоприятная погода на неделю.
Наличие/отсутствие опасностей.
Дальше в зависимости от местности где лес.
//А каким боком это к информатике?
var
m, k, d1: <em>single</em>;
i, t, d: <em>byte</em>;
begin
readln(t);
writeln();
for i := 1 to t do
begin
readln(k);
if (k > 0) then
begin
d1 += k;
d += 1;
end;
end;
writeln(d1 / d);
<span>end.</span>