Question

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

Answer 1

var
 x,y:integer;
begin
 readln(x,y);
 if (x>0) and (y>0) then
  writeln('Принадлежит к первой координатной четверти')
 else
  writeln('Не принадлежит к первой координатной четверти');
end.

Answer 2

БЛАГДАРЮ!!!