Даны координаты двух точек на плоскости, требуется определить, лежат ли они в одной координатной четверти или нет.(На Паскале)
Входные данные
Вводятся 4 числа: координаты первой точки (x1, y1) и координаты второй точки (x2, y2).
Выходные данные
Программа должна вывести слово YES, если точки находятся в одной координатной четверти, в противном случае вывести слово NO.
Примеры
Входные данные
3
3
5
1
Выходные данные
YES
Паскаль
Входные данные
Вводятся 4 числа: координаты первой точки (x1, y1) и координаты второй точки (x2, y2).
Выходные данные
Программа должна вывести слово YES, если точки находятся в одной координатной четверти, в противном случае вывести слово NO.
Примеры
Входные данные
3
3
5
1
Выходные данные
YES
Паскаль
Answers & Comments
Verified answer
Замечание: предполагается, то точки не лежат на осях координат.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