Вдетской магнитной азбуке 32 буквы. какое количество информации содержит сообщение о том, что из них было собрано слово "муравей"?

Чтобы закодировать 32 буквы необходимо 2^5(два в пятой) бит, а значит каждая буква будет состоять и пяти разных последовательностей единиц и нулей(например 10010). в слове "муравей" - 7 букв, каждая по 5 бит =35 бит

Var     i,j,pr: integer;     a: array[1..5,1..5] of integer; begin randomize; pr: =1; write('исходный массив: '); for i: =1 to 5 do     begin     writeln;     for j: =1 to 5 do       begin       a[i,j]: =random(4)+1;       write(a[i,j]: 2);       if i< j then pr: =pr*a[i,j]       end     end; writeln; writeln('произведение ',pr) end.

Pascalabc: var a: array of real;             k,i,n: integer;             x: real; begin write('задайте размер массива = '); readln(n); setlength(a,n); for i: =0 to n-1 do begin readln(a[i]); if (i> 0) and (k=0) and (x> a[i]) then k: =1; x: =a[i]; end; if k=1 then writeln('элементы массива не являются возрастающей последовательностью') else writeln('элементы массива являются возрастающей последовательностью'); end.