Формула:
N=2^I
Мощность-кол-во информации,необходимое для кодирования 1 символа.
11 Кбайт=92274688 бит
92274688 бит:11264 символа=8192 бита необходимо,чтобы закодировать 1 символ. Ответ:N=1Кб
Если на паскале, то как-то так:
function ToNine(number : integer) : integer;
const
sist = 9;
var
res, umn : integer;
begin
res := 0;
umn := 1;
while number > 0 do
begin
res := (number mod sist) * umn + res;
number := number div sist;
umn := umn * 10;
end;
ToNine := res;
end;
var
i : integer;
begin
for i := 1 to 8 do
writeln(i, ' + ', i, ' = ', ToNine(i + i));
for i := 1 to 8 do
writeln(i, ' * ', i, ' = ', ToNine(i * i));
<span>end.</span>
64 символа = 6 битная кодировка
6*5=30 бит
Если одномерный массив, то:
program min;
var a:array[1..10] of integer;
i,min,k:integer;
begin
writeln('Введите элементы массива');
for i:=1 to 10 do
readln(a[i]);
min:=a{1];
for i:=1 to 10 do
if a{i]<min
then min:=a{i};
for i:=1 to 10 do
if a{i]=min
then k:=k+1;
writeln('Всего элементов с минимальным значением =',k);
end.
По иерархическому принципу - сначала домены высшего уровня, далее - низшего