Вычислить функцию f(u, v) - Visual Basic .NET

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

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

Необходимо вычислить функцию f(u, v) и округлить до 0,001 y = f(u, v), где u = u(x), v = v(x), вводя различные значения аргумента x из интервала (0;10). f(u, v)=cos3u+2sin7v; u(x)=2arctg3+lg7x; v(x)=ctg3-3x. Я попытался написать, но у меня ничего толком не вышло.

Решение задачи: «Вычислить функцию f(u, v)»

textual
Листинг программы
  1. Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
  2.         TextBox2.Text = Math.Round(f(Val(TextBox1.Text)), 3)
  3.     End Sub
  4.     Private Function f(ByVal x As Double) As Double
  5.         Return Math.Cos(3 * u(x)) + 2 * Math.Sin(7 * v(x))
  6.     End Function
  7.     Private Function u(ByVal x As Double) As Double
  8.         Return 2 / Math.Atan(3) + Math.Log10(7 * x)
  9.     End Function
  10.     Private Function v(ByVal x As Double) As Double
  11.         Return 1 / Math.Tan(3) - 3 * x
  12.     End Function

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


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

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

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

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

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

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