Создайте проект в Visual Basic 6.0 для определения лежит ли в первой четверти точка P с координатами x,y? - VB
Формулировка задачи:
Создайте проект в Visual Basic 6.0 для определения лежит ли в первой четверти точка P с координатами x,y? Здесь координата x вычисляется по формуле:x=3,3d1+d2, а координата y по формуле: y=d2^2-d1, где d1>0, d2.0 (d1-d первое, d2-d второе) желательно со скрином формы. Если можно пошаговая инструкция
все это надо сделать в Visual Basic
Решение задачи: «Создайте проект в Visual Basic 6.0 для определения лежит ли в первой четверти точка P с координатами x,y?»
textual
Листинг программы
Dim d1 As Double, d2 As Double Private Sub Command1_Click() d1 = Text1.Text d2 = Text2.Text x = 3.3 * b1 + d2 y = d2 ^ 2 - d1 Text3.Text = "P(" & x & "," & y & ")" If (x > 0) And (y > 0) Then Text4.Text = "Принадлежит" Else Text4.Text = "Не принадлежит" End If End Sub
ИИ поможет Вам:
- решить любую задачу по программированию
- объяснить код
- расставить комментарии в коде
- и т.д