Какая формула позволяет рассчитать разрядность двоичного кода

чтобы закодировать любое число от 1 до 4000 нужно i=12 бит (2^i = 4000; i=12 бит). 300 * 12 = 3600 бит = 450 байт.

"солнце" - круг с точкой в центре

"идти" - две ноги

"хлеб" - полукруг

"рот" - сильно вытянутый   полуовал

разбиваем числа на триады (группы по 3 числа в каждой), и смотрим значение по таблице, получается:

1) 6224

2) 64472

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

s,p: real;

begin

  p: =1;

  s: =0;

  for i: = 1 to 9 do

  begin

      read(a[i]);

      s: = s+a[i];

      p: =p*a[i];

  end;

  writeln("summa=",s);

  writeln("srednee arefmeticheskoe=",s/n);

  writeln("proizvedenie=",p);

end.