Вычисление определенного интеграла методом прямоугольников - VB

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

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

Помогите составить код программы! Вычислить определенный интеграл ∫_a^b ƒ(x)dx ƒ(x)=F = t * (Atn(5 ^ Sqr(x)) / ((x ^ 2) + s * (Sin(x)))) a=0,1 b=1,2 • Значения параметра t могут варьироваться в интервале [0,6;1,8] • Значения параметра s могут варьироваться в интервале [0;0,5]

Решение задачи: «Вычисление определенного интеграла методом прямоугольников»

textual
Листинг программы
Dim t!, s!, f!, a!, b!, i!, su!
t = Val(Text1.Text)
s = Val(Text2.Text)
a = 0.1: b = 1.2
For i = a To b - 0.001 Step 0.001
f = t * (Atn(5 ^ Sqr(i)) / ((i ^ 2) + s * (Sin(i))))
 su = su + Abs(f) * 0.001
Next i
MsgBox su

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


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

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

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