123, 132, 213, 231, 321, 312,
723, 732, 273, 237, 327, 372,
173, 137, 713, 731, 371, 317
127, 172, 217, 271, 721, 712
итого 24 числа
T=I/c*i c=11000Гц i=8бит (низкое качество)
t=1200*1024*8/(11000*8)=131 c
PascalABC.NET 3.4
begin var (x,y):=ReadReal2('Координаты слона (х y):');
if not x.Between(1,8) or not y.Between(1,8) then begin
Writeln('Координата должна быть в пределах 1..8');
Exit
end;
var (x1,y1):=ReadReal2('Координаты фигуры (х y):');
if not x1.Between(1,8) or not y1.Between(1,8) then begin
Writeln('Координата должна быть в пределах 1..8');
Exit
end;
if Abs(x-x1)=Abs(y-y1) then Writeln('Можно убить')
else Writeln('Нельзя убить')
end.
Ответы на фотографии, удачи :)