Даны координаты двух полей шахматной доски ( в виде двух пар чисел от 1 до 8)Определить может ли шахматной ферзь одним ходом перейти с одного заданного поля на другое ( ход ферзя — по диагонали по вертикали по горизонтали) — QBasic(Бейсик)

disel 
INPUT "vvedite koordinaty ferzya ", x, y
INPUT "vvedite koordinaty polya ", x1, y1
IF ABS(x1 - x) = ABS(y1 - y) OR x = x1 OR y = y1 THEN PRINT "yes" ELSE PRINT "no"

Тестирование выполнено в программе QB64 ( Скачать )

Похожие записи/страницы:

Leave a Comment