Const n = 10;
var
temp: array [0..n-1] of shortint;
max, min, i: byte;
sum : integer;
begin
randomize;
writeln ('Температуры ', n, ' дней:');
for i:=0 to n-1 do
begin
temp[i]:=random (41)-20;
write (temp[i], '; ');
if temp[i]>temp[max] then max:=i;
if temp[i]<0 then inc (min);
inc (sum, temp[i]);
end;
writeln ();
writeln ('Средняя температура: ', sum/n);
writeln ('Макс. температура: ', temp[max]);
write ('Кол-во дней с отриц. температурой: ', min);
end.
Знайти цукерки, пакет покласти на стіл, відкрити пакет з цукерками, взяти 1 цукерку , відкрити її , з'їсти цукерку.
Сумма чаевых официанту: Sum = 0.15 * (X1 + X2 + X3);
Если X1 = X2 = X3, то Sum = 0.15 * 3 * X = 0.45 * X
Была произведена серия из 5 подбрасываний монетки. В результате каждого подбрасывания монетка может выпасть орлом или решкой с равной вероятностью. Сколько бит информации будет нести в себе сообщение о том, что в результате второго и четвертого подбрасываний в этой серии монетка упала орлом. Орел во 2 и 4 подбрасывании , 8 комбинаций (01010, 11010, 11110, 11111, 01111, 01011, 01110, 11011)
Имеем log 2 (32 / 8) = log 2 (2^5 / 2^3) = log 2 (2^2) = 2 бит
Ответ 2 бит
при n=
1) * 5 (начало)
2) * 3 (n-2=5-3=2)
3) * 1 (n-2=3-2=1)
4) * -1 (n-2=1-2=-1)
5) * 0 (n div 2 =-1 div 2 =0)
6) * 0 (n div 2 =1 div 2 =0)
7) * 1 (n div 2 =3 div 2=1)
8) * -1 (n-2=1-2=-1) ранее была такая ситуация, далее два 0
9) * 0
10) * 0
11) * 1
12) * -1
13) * 0
14) * 0
---------------------------------------------------
15) * (n=5 div 2 =2)
16) * (n=2-2=0)
17)* (n=2 div 2=1)
18) * (n=1-2=-1)
19) * (n=0)
20) * (n=0)
21) * (n=1)
22) * (n=-1)
23) * (n=0)
24) * (n=0)
-------------------------------------------------------
и ещё раз 10 при второй F(n div 2)
ВСЕГО 34 звёздочки *
