Ln как записать?? - VB
Формулировка задачи:
у меня задачка на Алгоритм поиска корня методом дихотомии, и функция ln(x)=1/x.
Алгоритм я знаю. но не могу написать ln в VB. Вижу только Log и Log10. Подскажите пожалуйста как записать Ln(x). Спасибо!
P.S. нужно произвести такое вот: f(a)*f(b)>0 и там далее другие действия. просто не получается записать свою функцию ln
Решение задачи: «Ln как записать??»
textual
Листинг программы
- Public Class Form1
- Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
- Dim X As Double ,a As Double,b As Double
- a = 1: b = 2
- If (Math.Log(a) - 1 / a) * (Math.Log(b) - 1 / b) <= 0 Then
- Do
- X = (a + b) / 2
- If (Math.Log(a) - 1 / a) * (Math.Log(X) - 1 / X) > 0 Then
- a = X
- Else
- b = X
- End If
- Loop Until Math.Abs(Math.Log(X) - 1 / X) < 2.14
- TextBox3.Text = X
- TextBox4.Text = Math.Log(X) - 1 / X
- Else
- TextBox3.Text = "No roots"
- End If
- End Sub
- End Class
ИИ поможет Вам:
- решить любую задачу по программированию
- объяснить код
- расставить комментарии в коде
- и т.д