Filichar (b, sizeof (b)false);
for i:=1 to wb div 2 do
for j:=1 to wb div 2 do begin
p:=1; m [р, 1] :=i; m [р, 2] :=j; b[i,j]: =true;
Solution (i, j) :
b[i, j]:= false;
end;
end.

Описание
Неизвестное имя "Fillchar'' ​

Karakulova2004    1   01.03.2021 11:04    0