нужна решить головомку

(1) цирк  (2) пирк    (3)  пирзприз  (1) волк  (2) солк(3)  солн  слон  (1) стук   (2)  (м) мтук(3) (ь)  мтуьмуть  (1) крот     (2)  (м) мрот(3) (г)  мрогморг

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

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

var

  x: real;

begin

  readln(x);

writeln(x: 0: 0);

end.

uses crt; var a,s: integer; begins: =0; writeln('введите числа'); while a< > 0 do beginreadln(a); if (a> 0) then s: =s+a; end; writeln('s=',s); end.