Определить, в какой четверти находится точка с координатами x, y, и вывести на печать номер четверти. в С++
Var x,y: real; begin write ('x = '); read (x); write ('y = '); readln (y); write ('Номер четверти координатной плоскости: '); if (x > 0) and (y > 0) then writeln ('I') else if (x < 0) and (y > 0) then writeln ('II') else if (x < 0) and (y < 0) then writeln ('III') else if (x > 0) and (y < 0) then writeln ('IV') else writeln ('-. Точка лежит на оси.'); readln end Наверное вот так
Или более короткий вариант:
Function Oktava(x,y : Integer) : Byte; Begin If (x=0) or (y=0) then Oktava:=0 else If x>0 then If y>0 then Oktava:=1 else Oktava:=4 else If y>0 then Oktava:=2 else Oktava:=3; End;