Нужно написать в паскале ABC нужна помощь
{если точка лежит на оси координат, то считается, что она находится в правой/верхней полуплоскости}
var a,b,c,d:integer;
begin
read(a,b,c,d);
if ((a<0) = (c<0)) and ((b<0) = (d<0))
then write(YES) else write(NO)
end.
Оцени ответ
