23. За круглым столом сидят 4 человека лжецы и правдецы. Лжец всегда
лжет, правдец всегда говорит правду. Каждый из них сказал: «Сосед справа
- лжец». Сколько лжецов собралось за столом?
А) 1
Б) 2
В) 0
г) 4​

ответ б у меня по крайней мере

Объяснение:

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

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

var

a: [1..100] array of integer;

i,n,p: integer;

begin

readln(n);

for i: =1 to n do

begin

readln(a[i]);

p: =2;

while (p*p< =a[i]) do

begin

if p*p=a[i] then writeln (a[i],' полный квадрат')

p: =p+1;

end;

end;

end.