I = m*log2(N),
где m - количество символов(букв) в сообщении, N - мощность алфавита, т.е. количество символов (букв) в нем.
1) оценка количества информации в первом символе сообщения
N1=2, так как могут быть только 2 разных символа алфавита племени мульти: А или О, m1=1
I1=m1*log2(N1)=1*log2(2)=1 бит;
2) оценка количества информации в остальных 8-1=7 символах сообщения
N2=32, так как могут быть 32 разных символа всего алфавита племени мульти, m2=7
I2=m2*log2(N2)=7*log2(32)=35 бит;
3) оценка количества символов информации в сообщении
I=I1+I2=1+35=36 бит
uses crt;
var i,s,a,b:integer;
begin
for i:=10 to 99 do
begin
a:=i div 10;
b:=i mod 10;
s:=a+b;
if s*s*s = sqr(i) then writeln(i);
end;
readln;
end.