鏈接：https://blog.csdn.net/chen_dsir/article/details/71257631? 博主詳細介紹了復合梯形公式，

鏈接：https://wenku.baidu.com/view/b300c53deefdc8d376ee3228.html?詳細介紹了變步長的目的，以及變換的方式

下面求解如下問題：

1、變步長：

? ? ? ? 由于多數(shù)情況下，并不知道步長設置為多少合適，所以我們可以設置一個初始步長，求解一次，再把步長變?yōu)樵瓉淼囊话?#xff0c;依次接下去，直到達到我們所需的精度。

2、代碼：

#include<stdio.h> #include<math.h>#define left 1.0 //左端的值 #define right 3.0 //右端的值 #define precision 0.0001 //定義精度 double f(double x) {double m=100/(x*x)*sin(10/x);return m; }int main() {int i;int step=100; //初始化步數(shù)double stepLength=(right-left)/step; //步長double T=f(left)+f(right); //積分的值 for(i=1;i<=step-1;i++) {double x=left+i*stepLength;T+=2*f(x);}T=stepLength/2*T; //符合梯形公式求解結(jié)果printf("初始步長得到的積分值:%lf 所分的區(qū)間個數(shù)：%d\n",T,step);//下面改變步長，來細化精度double T1=T+100;double T2=T;double H; //減小步長后得到的積分值 while(fabs(T1-T2)>precision/2) {T1=T2;step=step*2;stepLength=(right-left)/step; H=0;for(i=1;i<step;i++){H+=2*f(left+stepLength*i);}H=f(left)+f(right)+H;H=H*stepLength/2; T2=(T1+H)/2; //將上次一的積分結(jié)果和減小步長后的積分結(jié)果求均值 } printf("初始步長得到的積分值:%lf 所分的區(qū)間個數(shù)：%d\n",T2,step);}

3、結(jié)果：

4、驗證：

?

總結(jié)

以上是生活随笔為你收集整理的C语言实现变步长求积分算法的全部內(nèi)容，希望文章能夠幫你解決所遇到的問題。

如果覺得生活随笔網(wǎng)站內(nèi)容還不錯，歡迎將生活随笔推薦給好友。