{* Задача307 *}

REM basic

' Даны действительные числа x1, y1, x2, y2 (x1<0, y1<0). Определить КВАДРАНТЫ плоскости в которых лежит отрезок, концами которого являются точки (x1, y1) и (x2, y2).


CLS
INPUT x1, y1, x2, y2
k = (y2 - y1) / (x2 - x1)
b = y1 - k * x1
 
If b = 0 Then
          If x1 = x2 Then
                PRINT "Прямая лежит на оси ординат."
          Else
                If k > 0 Then PRINT "Прямая в 1 и 3 квадрантах."
                If k < 0 Then PRINT "Прямая во 2 и 4 квадрантах."
                If k = 0 Then PRINT "Прямая лежит на оси абсцисс."
          End If
Else
        If b > 0 Then
             If k > 0 Then PRINT "Прямая в 1, 2 и 3 квадрантах."
             If k < 0 Then PRINT "Прямая в 1, 2 и 4 квадрантах."
             If k = 0 Then PRINT "Прямая в 1 и 2 квадрантах."
        Else
             If k > 0 Then PRINT "Прямая в 1, 3 и 4 квадрантах."
             If k < 0 Then PRINT "Прямая во 2, 3 и 4 квадрантах."
             If k = 0 Then PRINT "Прямая в 3 и 4 квадрантах."
        End If
End If
End