Известны координаты точки,вывести сообщение какой координатной четверти она принадлежит. Рассмотреть случай начала координат и рассмотреть случай,когда она принадлежит оси x.

Program gt;
var x,y:integer;
begin
read(x,y);
if(x>0)and(y>0)then writeln(первая четверт);
if(x<0)and(y>0)then writeln(вторая четверт);
if(x<0)and(y<0)then writeln(третья четверт);
if(x>0)and(y<0)then writeln(четвертая четверть);
if(x=0)and(y=0)then writeln(начала координат);
if(x=0)or(y=0)then writeln(точка находится на начале координат);
end.

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