Ln как записать?? - VB

Узнай цену своей работы

Формулировка задачи:

у меня задачка на Алгоритм поиска корня методом дихотомии, и функция ln(x)=1/x. Алгоритм я знаю. но не могу написать ln в VB. Вижу только Log и Log10. Подскажите пожалуйста как записать Ln(x). Спасибо! P.S. нужно произвести такое вот: f(a)*f(b)>0 и там далее другие действия. просто не получается записать свою функцию ln

Решение задачи: «Ln как записать??»

textual
Листинг программы
  1. Public Class Form1
  2.     Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
  3.         Dim X As Double ,a As Double,b As Double
  4.  a = 1: b = 2
  5. If (Math.Log(a) - 1 / a) * (Math.Log(b) - 1 / b) <= 0 Then
  6.     Do
  7.         X = (a + b) / 2
  8.         If (Math.Log(a) - 1 / a) * (Math.Log(X) - 1 / X) > 0 Then
  9.             a = X
  10.         Else
  11.             b = X
  12.         End If
  13.  
  14.     Loop Until Math.Abs(Math.Log(X) - 1 / X) < 2.14
  15.             TextBox3.Text = X
  16.             TextBox4.Text = Math.Log(X) - 1 / X
  17. Else
  18. TextBox3.Text = "No roots"
  19. End If
  20.     End Sub
  21. End Class

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


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

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

5   голосов , оценка 4.6 из 5

Нужна аналогичная работа?

Оформи быстрый заказ и узнай стоимость

Бесплатно
Оформите заказ и авторы начнут откликаться уже через 10 минут
Похожие ответы