Какаое количество информации получит второй игрок при игре в крестики нолики на поле 8*8 после первого хода первого игрока , играющего крестиками?

игрок мог поставить крестик в любую клетку поля, их 64; по формуле  =n узнаем, какое кол-во информации получил второй игрок:

=64; i=6. ответ: 6 бит

//pascal abc.net v3.1 сборка 1172 const   n=15;   m=10; var   ma: array[1..n,1..m] of integer;   i,j,sum,co: integer; begin   randomize;   writeln('matrix: ');   for i: =1 to n do     begin     for j: =1 to m do       begin       ma[i,j]: =random(10)-3;       write(ma[i,j]: 4);       end;     writeln;     end;   for j: =1 to m do   begin   for i: =1 to n do     if ma[i,j]> 0 then     begin       sum: =sum+ma[i,j];       inc(co);     end;   writeln('sum ',j,': ',sum);   writeln('count ',j,': ',co);   sum: =0;   co: =0;   end; end.

Var   mini, min, n, i: integer; begin   i : = 1; {порядковый номер введенного с клавы числа}   readln(n); {считываем число в клавиатуры}   min : = n; {присваеваем минимуму первое введенное число. если будет введено одно число то оно и есть минимум}   mini : = i; {присваеваем порядковый номер минимума}     repeat{повторяем}       i : = i + 1; {порядковый номер введенного с клавы числа}       readln(n); {считываем число в клавиатуры}       if (n < > 0) and (min > n) then begin {если введенное число меньше минимума, то заменяем минимум}           min : = n; {присваеваем минимуму число}           mini : = i; {присваеваем порядковый номер минимума}       end;   until n = 0; {до тех пор пока n=0}     writeln('index = ', mini); end. что еще не понятно?