Найти максимальное значение на 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

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


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

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

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