Question

Даны координаты двух точек на плоскости, требуется определить, лежат ли они в одной координатной четверти или нет.(На Паскале) Входные данные Вводятся 4 числа: координаты первой точки (x1, y1) и координаты второй точки (x2, y2). Выходные данные Программа должна вывести слово YES, если точки находятся в одной координатной четверти, в противном случае вывести слово NO. Примеры Входные данные 3 3 5 1 Выходные данные YES Паскаль

Answer 1

Замечание: предполагается, то точки не лежат на осях координат.
var x1,y1,x2,y2:real;
begin
readln(x1,y1);
readln(x2,y2);
if (x1*x2>0)and(y1*y2>0) then writeln('YES')
else writeln('NO');
end.

Пример:
3 3
5 1
YES

Answer 2

// PascalABC.NET 3.3, сборка 1599 от 17.12.2017
// Внимание! Если программа не работает, обновите версию!

begin
  var (x1,y1):=ReadReal2('Введите координаты 1-й точки:');
  var (x2,y2):=ReadReal2('Введите координаты 2-й точки:');
  if (Sign(x1)=Sign(x2)) and (Sign(y1)=Sign(y2)) then Writeln('YES')
  else Writeln('NO')
end.

Примеры
Введите координаты 1-й точки: 3 3
Введите координаты 2-й точки: 5 1
YES

Введите координаты 1-й точки: -2.6 3.2
Введите координаты 2-й точки: -3 -0.14
NO

Answer 3

Определение координатной четверти

Для определения того, лежат ли две точки на плоскости в одной координатной четверти, необходимо сравнить знаки их координат. Если знаки координат одинаковы для обеих точек, то они лежат в одной координатной четверти. Если знаки разные, то точки находятся в разных координатных четвертях.

Алгоритм решения

1. Введите координаты первой точки `(x1, y1)` и координаты второй точки `(x2, y2)`. 2. Проверьте знаки координат `x1` и `x2`. Если они одинаковы, перейдите к следующему шагу. Если они разные, выведите "NO" и завершите программу. 3. Проверьте знаки координат `y1` и `y2`. Если они одинаковы, выведите "YES". Если они разные, выведите "NO".

Пример решения на языке Паскаль

program QuadrantCheck;
var
  x1, y1, x2, y2: integer;
begin
  readln(x1, y1, x2, y2);
  if (x1 * x2 > 0) and (y1 * y2 > 0) then
    writeln('YES')
  else
    writeln('NO');
end.

Пример работы программы

Входные данные: ``` 3 3 5 1 ```

Выходные данные: ``` YES ```

Объяснение решения

В данном примере, координаты первой точки `(3, 3)` и второй точки `(5, 1)` имеют одинаковый знак по обеим осям. Поэтому они лежат в одной координатной четверти и программа выводит "YES".