Создайте проект в 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

ИИ поможет Вам:


  • решить любую задачу по программированию
  • объяснить код
  • расставить комментарии в коде
  • и т.д
Попробуйте бесплатно

Оцени полезность:

6   голосов , оценка 4 из 5
Похожие ответы