Решить в паскаль! дана шахматная доска(8 на8 клеток). король стоит на клетке с координатой (x,y). определить, может ли король за один ход перейти на клетку с координатой ( x1,y1) координаты (x,y) (x1,y1) с клавиатуры
Координаты клеток - целые числа из диапазона от 1 до 8 var x,y,x1,y1:byte; b:boolean; beginwriteln('x, y:');readln(x,y); writeln('x1, y1:');readln(x1,y1); b:=(abs(x1-x)=1)and(y1=y); //на 1 вертикали b:=b or (abs(y1-y)=1)and(x1=x); //на 1 горизонтали b:=b or (abs(x1-x)=1)and(abs(y1-y)=1);//рядом по диагонали if b then writeln('Может') else writeln('Не может'); end.
Великий писатель, драматург, публицист, граф лев николаевич толстой родился 9 сентября (28 августа по старому стилю) 1828 года в имении ясная поляна крапивенского уезда тульской губернии (ныне щекинского района тульской области) в одном из самых знатных дворянских семейств. он был четвертым ребенком в семье. детство будущего писателя прошло в ясной поляне. он рано осиротел, потеряв сначала мать, которая умерла, когда мальчику было два года, а затем и отца. в 1837 году семья переехала из ясной поляны в москву. опекуншей осиротевших детей стала их тетка, сестра отца александра ильинична остен-сакен. в 1841 году, после ее смерти, юный толстой с сестрой и тремя братьями переехал в казань, где жила другая тетка - пелагея ильинична юшкова, ставшая их опекуншей. подробнее - на -
var x,y,x1,y1:byte; b:boolean;
beginwriteln('x, y:');readln(x,y);
writeln('x1, y1:');readln(x1,y1);
b:=(abs(x1-x)=1)and(y1=y); //на 1 вертикали
b:=b or (abs(y1-y)=1)and(x1=x); //на 1 горизонтали
b:=b or (abs(x1-x)=1)and(abs(y1-y)=1);//рядом по диагонали
if b then writeln('Может') else writeln('Не может');
end.