Напишите программу вычисления площадь треугольника S если известны основание a и высота h используя алгоритмический программирования​

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.