Как создать приложение, рассчитывающие значение функции y=x^3+3*x - VB
Формулировка задачи:
задача такова, нужно создать приложение рассчитывающие значение функции y=x^3+3*x.
условия такие все значения должны писаться в столбик, а последним значение должно быть именно 150
Решение задачи: «Как создать приложение, рассчитывающие значение функции y=x^3+3*x»
textual
Листинг программы
- Option Explicit
- Dim y As Double
- Dim x As Double
- Dim a() As Double
- Private Sub Command1_Click()
- x = 1
- Do While y < 150
- y = Round(x ^ 3 + 3 * x, 1)
- x = Round(x + 0.005, 3)
- List1.AddItem x & vbTab & y
- Loop
- End Sub
ИИ поможет Вам:
- решить любую задачу по программированию
- объяснить код
- расставить комментарии в коде
- и т.д
