Составить программу на языке Turbo Pascal 7.0 вычисления значения интеграла на интервале [a, b] для функции, заданной графически. Значение интеграла вычислить приближённо по итерационной формуле левых прямоугольников:
http://cs412816.vk.me/v412816242/5d7c/nWrDNMk4X5U.jpg
где h=(b-a)/n - величина шага между двумя соседними точками разбиения интервала интегрирования; fi = f(xi) - значение функции в точке xi = a+h(i-1); i = 1,2,...n.
Вычисления закончить при выполнении условия |In-I2n| < e, где e>0 - достаточно малое значение, задаваемое пользователем (точность вычислений). Здесь In, I2n - значения интеграла, вычисленные по (1) при количестве интервалов разбиения n и 2n соответственно.
Численные значения всех величин, участвующих в вычислениях, считать параметрами программы, и определить их путём ввода.
Вот график:
http://cs412816.vk.me/v412816242/5d83/SkEwROaxjwg.jpg
http://cs412816.vk.me/v412816242/5d7c/nWrDNMk4X5U.jpg
где h=(b-a)/n - величина шага между двумя соседними точками разбиения интервала интегрирования; fi = f(xi) - значение функции в точке xi = a+h(i-1); i = 1,2,...n.
Вычисления закончить при выполнении условия |In-I2n| < e, где e>0 - достаточно малое значение, задаваемое пользователем (точность вычислений). Здесь In, I2n - значения интеграла, вычисленные по (1) при количестве интервалов разбиения n и 2n соответственно.
Численные значения всех величин, участвующих в вычислениях, считать параметрами программы, и определить их путём ввода.
Вот график:
http://cs412816.vk.me/v412816242/5d83/SkEwROaxjwg.jpg