Шахматы: определить, бьёт ли ферзь коня, конь ферзя или фигуры не угрожают друг другу

16.10.2010, 21:07. **Показов** 2393. **Ответов** 1

Author24 — интернет-сервис помощи студентам

Доброго времени суток. Помогите с задачей. Надо написать программу, которая будет определять бьёт ли ферзь коня, конь ферзя или фигуры не угрожают друг другу. Уже 3-й день не могу разобраться. С ферзём я справился, и то программа работает с ошибками(по диагоналям коня не находит)

@Puporev · 16.10.2010, 23:02

Pascal

var gf,wf,gk,wk:1..8;
.......................
if(gf=gk)or(wf=wk)or(abs(qf-gk)=abs(wf-wk)) then write('Ферзь бьет коня')
else write('Ферзь не бьет коня');
if((abs(gf-gk)=2)and(abs(wf-wk)=1)) or((abs(gf-gk)=1)and(abs(wf-wk)=2))then 
write('Конь бьет ферзя')
else write('Конь не  бьет ферзя');

SIDER2012
		1
	Шахматы: определить, бьёт ли ферзь коня, конь ферзя или фигуры не угрожают друг другу 16.10.2010, 21:07. Показов 2393. Ответов 1 Метки нет (Все метки) Доброго времени суток. Помогите с задачей. Надо написать программу, которая будет определять бьёт ли ферзь коня, конь ферзя или фигуры не угрожают друг другу. Уже 3-й день не могу разобраться. С ферзём я справился, и то программа работает с ошибками(по диагоналям коня не находит)

	16.10.2010, 23:02

Шахматы: определить, бьёт ли ферзь коня, конь ферзя или фигуры не угрожают друг другу

Решение