Известны координаты точки,вывести сообщение какой координатной четверти она принадлежит. Рассмотреть случай начала координат и рассмотреть случай,когда она принадлежит оси x.
Answers & Comments
kage1998
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.
Answers & Comments
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.