1. Найдите энтропию для числа белых шаров при извлечении двух шаров из урны, содержащей два белых и один черный шар. 2. Найдите энтропию для числа козырных карт при извлечении двух карт из колоды в 36 карт.

3. Какую степень неопределенности содержит опыт угадывания суммы очков на извлеченной кости из полного набора домино?

4. Найдите энтропию для числа тузов при извлечении трех карт из карт с картинками.

5. Найдите дифференциальную энтропию для равномерного распределения.

6. Найдите дифференциальную энтропию для показательного закона распределения, если известно, что случайная величина х принимает значение меньше единицы с вероятностью 0,5.

  друг  жить на любом этаже дома. поэтому, для решения используем уравнение 24=х. но 24=16. следовательно, х=16. в доме 16 этажей.

program p;

vara,b,c,i,j,n : integer;

beginwriteln('введите три числа'); readln(a,b,c);

if a> b then if a> c then writeln(a,c,b) else writeln(c,a,b) else if c> b then writeln(a,b,c) else writeln(b,c,a);  

readln; end. 

телевидение

радиовещание

интернет

газеты и т.д 

program nn;

uses crt;

var a: array [1..20] of real;

t: real;

i,n,min: integer;

begin

    {ввод последовательности, это самостоятельно}

    min : = 1;

    for i : = 1 to 20 do

    begin

          if  a[i] < a[min] then

                min : = i;

    end;

    t : = a[min];

    a[min] : = a[20-n];

    a[20-n] : = t;

end.