Кодировка для задачи.Слон и Пешка.Даны позиции на шахматной доске так,как это принято в шахматной нотации.Определить ,бьёт ли слон пешку
Answers & Comments
Студэнt
//PascalABC.Net 3.2 begin //true - бьет; false - не бьет var s1:=readstring ('Введите позицию пешки: '); var s2:=readstring ('Введите позицию слона: '); write (abs(ord(s1[1])-ord(s2[1]))=abs(ord(s1[2])-ord(s2[2]))); end.
Answers & Comments
begin //true - бьет; false - не бьет
var s1:=readstring ('Введите позицию пешки: ');
var s2:=readstring ('Введите позицию слона: ');
write (abs(ord(s1[1])-ord(s2[1]))=abs(ord(s1[2])-ord(s2[2])));
end.
нач
ввод (позиция слона, позиция пешки)
Если (модуль разности горизонталей позиций)==
(модулю разности вертикалей позиций)
то вывод ("Бьет") иначе вывод ("Не бьет")
кон