Напишите программу (в паскале) для координатной четверти. Тобишь, если, например, x>0 и y>0, то точка будет находится в 1 координатной четверти и т.п. (Для всей координатной плоскости)
var x,y:integer;
Begin
read(x,y);
if (x>0) and (y>0) then writeln("I");
if (x>0) and (y<0) then writeln("IV");
if (x<0) and (y>0) then writeln("II");
if (x<0) and (y<0) then writeln("III");
End.
Copyright © 2024 SCHOLAR.TIPS - All rights reserved.
Answers & Comments
Verified answer
var x,y:integer;
Begin
read(x,y);
if (x>0) and (y>0) then writeln("I");
if (x>0) and (y<0) then writeln("IV");
if (x<0) and (y>0) then writeln("II");
if (x<0) and (y<0) then writeln("III");
End.