Вывести на экран номер четверти, которой принадлежит точка - VB
Формулировка задачи:
3. Вывести на экран номер четверти, которой принадлежит точка с координатами (x,y), при условии, что (x<>0) и (y<>0).
Решение задачи: «Вывести на экран номер четверти, которой принадлежит точка»
textual
Листинг программы
- Option Explicit
- Private Sub Form_Load()
- Scale (-1, 1)-(1, -1)
- End Sub
- Private Sub Form_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single)
- Line (0, -1)-(0, 1)
- Line (-1, 0)-(1, 0)
- Me.Caption = Abs((X > 0) + (Y < 0) * 3 + 1) + 1
- End Sub
ИИ поможет Вам:
- решить любую задачу по программированию
- объяснить код
- расставить комментарии в коде
- и т.д
