Построить график функции Y=\frac{x+3}{x-2} на отрезке [3, 10]
Рисунок 9. Схема алгоритма
Private Sub Command1_Click()
Picture1.Cls
x0 = 2
y0 = 5.5
Picture1.Line (x0, y0)-(x0 + 8, y0)
Picture1.Print "10"
Picture1.Line (x0, y0 - 4)-(x0, y0 + 6)
Picture1.Print "10"
x = 3
y = -(x + 3) / (x - 2) - y0
Picture1.PSet (x, -y - 6)
Picture1.Print "3"
Picture1.PSet (x, -y)
Do While x <= 10
y = -(x + 3) / (x - 2) - y0
Picture1.Line -(x, -y), RGB(30, 100, 200)
x = (x + 0.1)
Loop
End Sub
Private Sub Command2_Click()
End
End Sub
Private Sub Command3_Click()
Task4.Hide
Form1.Show
End Sub
Рисунок 10. Экранная форма программы
Пользователь, раз уж ты добрался до этой строки, ты нашёл тут что-то интересное или полезное для себя. Надеюсь, ты просматривал сайт в браузере Firefox, который один правильно отражает формулы, встречающиеся на страницах. Если тебе понравился контент, помоги сайту материально. Отключи, пожалуйста, блокираторы рекламы и нажми на пару баннеров вверху страницы. Это тебе ничего не будет стоить, увидишь ты только то, что уже искал или ищешь, а сайту ты поможешь оставаться на плаву.