Вклассе 32 ученика. сколько битов информации содержиться в сообщении "сегодня дежурит сеня сенечкин"?

Пять бит главная формула информатики 2в степениi=n

Пусть k(n) - количество звездочек, напечатанных при вызове f(n) тогда k(n) = 1 { writeln('*') } + k(n-2) {вызов f(n-2) -> печатается еще k(n-2) звездочек} + k(n div 2) {f(n div 2)} при n > 0 и k(n) = 1 при n < = 0 требуется найти k(7) k(7) = 1 + k(5) + k(3) k(5) = 1 + k(3) + k(2) k(3) = 1 + k(1) + k(1) k(2) = 1 + k(0) + k(1) k(1) = 1 + k(-1) + k(0) k(0) = k(-1) = 1 {0, -1 < = 0} k(1) = 1 + 1 + 1 = 3 k(2) = 1 + 1 + 3 = 5 k(3) = 1 + 3 + 3 = 7 k(5) = 1 + 7 + 5 = 13 k(7) = 1 + 13 + 7 = 21 ответ: 21

//pascalabc.net версия 3.2, сборка 1389 //если программа не запускается, то обновите версию uses system.linq; begin       writeln('iii');       var a : = readarrinteger('документы', readinteger('n=';       writeln;             while a.any() do       begin               write(a[0], ' ');               a.removeat(0);               if not a.any then break;                             write(a.last, ' ');               a.removeat(a.count - 1);               if not a.any then break;                             var n : = 0;               if a.count > 1 then n : = a.count div 2 - 1;               write(a[n], ' ');               a.removeat(n);       end; end.