Найти максимальное значение на Visual Basic - VB
Формулировка задачи:
Дана функция у=2*x^2+5*x+1.37. Найти максимальное y, если х изменяется в интервале [0.12;2] с шагом 0.2.
Решение задачи: «Найти максимальное значение на Visual Basic»
textual
Листинг программы
- Private Sub Command1_Click()
- x = 0.12
- Max = mx(0.12)
- Do While x + 0.2 <= 2
- x = x + 0.2
- If mx(x) > Max Then Max = mx(x)
- Loop
- MsgBox "Max = " & Max
- End Sub
- Function mx(x)
- mx = 2 * x ^ 2 + 5 * x + 1.37
- End Function
ИИ поможет Вам:
- решить любую задачу по программированию
- объяснить код
- расставить комментарии в коде
- и т.д
