1)сколько бит информации содержит сообщение, что случайным образом выбрано одно число из диапазона от 10 до 41 включительно? 2) сколько бит информации содержит сообщение, уменьшающее неопределенность в восемь раз? 3)в доме 4 окна. сколько различных сигналов можно подать, зажигая свет в окнах? сколько бит информации содержит каждый такой сигнал? сколько бит информации содержит сообщение, что загорелся свет в 1 из 4 окон? ,

Так как неопределенность знаний уменьшается в 8 раз, следовательно, она была равна 8, т.е. существовало 8 равновероятных событий. сообщение о том, что произошло одно из них, несет 3 бита информации (8 = 2^3). ответ:   3 бита.

python 3.8.1

n = 10

a = []

while n ! = 0:

    b = int(input('enter number 1 - 30: '))

    n -= 1

    if b < = 10:

        a.append(b)

if len(a) == 10:

    c = a[0] + a[1] + a[2] + a[3] + a[4] + a[5] + a[6] + a[7] + a[8] + a[9]

elif len(a) == 9:

    c = a[0] + a[1] + a[2] + a[3] + a[4] + a[5] + a[6] + a[7] + a[8]

elif len(a) == 8:

    c = a[0] + a[1] + a[2] + a[3] + a[4] + a[5] + a[6] + a[7]

elif len(a) == 7:

    c = a[0] + a[1] + a[2] + a[3] + a[4] + a[5] + a[6]

elif len(a) == 6:

    c = a[0] + a[1] + a[2] + a[3] + a[4] + a[5]

elif len(a) == 5:

    c = a[0] + a[1] + a[2] + a[3] + a[4]

elif len(a) == 4:

    c = a[0] + a[1] + a[2] + a[3]

elif len(a) == 3:

    c = a[0] + a[1] + a[2]

elif len(a) == 2:

    c = a[0] + a[1]

elif len(a) == 1:

    c = a[0]

else:

    c = 0

print(c);

q = int(input('enter any number to quit'))

pascalabc.net

1.

begin

  var a : = 2.3;

  var y: real;

  foreach var x in seq(2.5, 3.1, 4.0, 4.85) do

  begin

    if x < 3 then

      y : = a - 3 * ln(x)

    else  

      y : = 5 * sqr(cos(x));

    writeln('x = ', x: 4: 2, ',   y = ', y: 8: 5)

  end

end.

2.

begin

  var (a, b, x) : = (1.1, 0.04, 0.2);

  var y : = sin(x * x + a * a) ** 3 - sqrt(x / b);

  var z : = x * x / a + cos(x + b) ** 3;

  write('y = ', y, ', z = ', z)

end.