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
ИИ поможет Вам:
- решить любую задачу по программированию
- объяснить код
- расставить комментарии в коде
- и т.д