Определите, может ли ферзь попасть с первой клетки на вторую одним ходом

@Varitan · Регистрация: 25.01.2016

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

Шахматный ферзь ходит по диагонали, горизонтали или вертикали. Даны две различные клетки шахматной доски, определите, может ли ферзь попасть с первой клетки на вторую одним ходом.

Входные данные
Программа получает на вход четыре числа от 1 до 8 каждое, задающие номер столбца и номер строки сначала для первой клетки, потом для второй клетки.

Выходные данные
Программа должна вывести YES, если из первой клетки ходом ферзя можно попасть во вторую или NO в противном случае.

Примеры
входные данные
1
1
2
2

выходные данные
YES
входные данные
1
1
2
3
выходные данные
NO

@Constantin Cat · 22.02.2016, 17:15

Pascal

var
  a,b,c,d:integer;
begin
  repeat
    write('Enter x1:');
    readln(a)
  until a in[1..8];
  repeat
    write('Enter y1:');
    readln(b)
  until b in[1..8];
  repeat
    write('Enter x2:');
    readln(c)
  until c in[1..8];
  repeat
    write('Enter y2:');
    readln(d)
  until d in[1..8];
  write('Result:',((a-c)=0)or((b-d)=0)or(abs(a-c)=abs(b-d)));
end.

Код выводит истина(YES)/ложь(NO).

Добавлено через 12 минут
Исправил ошибку.

ФедосеевПавел · 22.02.2016, 17:19

А ещё одна диагональ?
(a+b)=(c+d)
(a-b)=(c-d)

Только проверка без abs

@Constantin Cat · 22.02.2016, 17:27

ФедосеевПавел,
с abs обе диагонали проверяются.

ФедосеевПавел · 22.02.2016, 19:05

Точно, как я не сообразил! Проверяется |Δx| = |Δy|

@bormant · 26.02.2016, 09:56

В сухом остатке:

Pascal

const NoYes: array [Boolean] of String[3] = ('NO','YES');
var a, b, c, d: Integer;
begin
  Read(a,b,c,d);
  WriteLn(NoYes[(a-c=0) or (b-d=0) or (abs(a-c)=abs(b-d))]);
end.

Определите, может ли ферзь попасть с первой клетки на вторую одним ходом

Решение

Решение

Решение

Решение

@Varitan 1 / 1 / 0 Регистрация: 25.01.2016 Сообщений: 107
		1
	Определите, может ли ферзь попасть с первой клетки на вторую одним ходом 22.02.2016, 16:33. Показов 6333. Ответов 5 Метки нет (Все метки) Шахматный ферзь ходит по диагонали, горизонтали или вертикали. Даны две различные клетки шахматной доски, определите, может ли ферзь попасть с первой клетки на вторую одним ходом. Входные данные Программа получает на вход четыре числа от 1 до 8 каждое, задающие номер столбца и номер строки сначала для первой клетки, потом для второй клетки. Выходные данные Программа должна вывести YES, если из первой клетки ходом ферзя можно попасть во вторую или NO в противном случае. Примеры входные данные 1 1 2 2 выходные данные YES входные данные 1 1 2 3 выходные данные NO 0

ФедосеевПавел Модератор 8340 / 4234 / 1605 Регистрация: 01.02.2015 Сообщений: 13,185 Записей в блоге: 5
	22.02.2016, 17:19	3
	Сообщение было отмечено Varitan как решение Решение А ещё одна диагональ? (a+b)=(c+d) (a-b)=(c-d) Только проверка без abs 1

@Constantin Cat 3405 / 1824 / 489 Регистрация: 28.02.2015 Сообщений: 3,697
	22.02.2016, 17:27	4
	Сообщение было отмечено Varitan как решение Решение ФедосеевПавел, с abs обе диагонали проверяются. 2

ФедосеевПавел Модератор 8340 / 4234 / 1605 Регистрация: 01.02.2015 Сообщений: 13,185 Записей в блоге: 5
	22.02.2016, 19:05	5
	Сообщение было отмечено Varitan как решение Решение Точно, как я не сообразил! Проверяется \|Δx\| = \|Δy\| 1

Опции темы