1) 5 бит
2) "5 из 64", в 1.5 раза.
Объяснение:
1. В колоде 32 карты, дама пик в ней одна, поэтому шанс вытащить ее равен 1 из 32.
32 = 2⁵, поэтому информация оценивается в 5 бит.
2. В лотерее "4 из 32" шанс угадать первую цифру равен 1 из 32, вторую - 1 из оставшийся 31, третью - 1 из оставшихся 30 и четвертую - 1 из оставшихся 29. Шанс угадать все 4 цифры равен 1 / (32×31×30×29) =
1 / 863040.
Для лотереи "5 из 64" аналогичным рассуждением получаем шанс
1 / (64×63×62×61×60) = 1 / 914941440
По формуле Хартли сообщение о результате лотереи "4 из 32" несет
㏒₂863040 бит ≈ 19.719 бит, о результате лотереи "5 из 64" -
㏒₂914941440 бит ≈ 29.769 бит
В сообщении о результате лотереи "5 из 64" информации больше в 29.769 / 19.719 ≈ 1.5 раза
Begin
var fi_min:=ReadlnReal('fi_min=');
var fi_:=ReadlnReal('fi_=');
var fi_max:=ReadlnReal('fi_max=');
var S_min:=ReadlnReal('S_min=');
var S_max:=ReadlnReal('S_max=');
var L:=ReadlnReal('L=');
var W:=ReadlnReal('W=');
var alpha:=ReadlnReal('alpha=');
var betta:=ReadlnReal('betta=');
var a, b:real;
var x,y:real;
var T_max:real;
var S:real;
y:=(S_max**2-S_min**2)/(cos(alpha+betta+fi_min)-cos(alpha+betta+fi_max));
x:=S_min**2+y*cos(alpha+betta+fi_min);
a:=((x+y)**(1/2)+(x-y)**(1/2))/2;
b:=((x+y)**(1/2)-(x-y)**(1/2))/2;
S:=(a**2+b**2-2*a*b*cos(alpha+betta+fi_))**(1/2);
T_max:=(W*L*S)/(a*b*sin(alpha+betta));
Println(a, b);
Println(T_max);
end.
begin
k:=15-2;
for i:=1 to 25 do
begin
k:=k+2;
s:=s+k;
end;
writeln('Количество кресел = ',s);
end.