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