下载此文档

五点差分格式.doc


文档分类:金融/股票/期货 | 页数:约3页 举报非法文档有奖
1/3
下载提示
  • 1.该资料是网友上传的,本站提供全文预览,预览什么样,下载就什么样。
  • 2.下载该文档所得收入归上传者、原创者。
  • 3.下载的文档,不会出现我们的网址水印。
1/3 下载此文档
文档列表 文档介绍
#include<>#include<>#defineN30#(){ intn,m;doubleh; doublef[N][N][N];doublex[N],y[N]; inti,j,k; doublea,b,c,d; printf("请输入X,Y步长h:\n");scanf("%lf",&h); printf("请输入X的端点:\n");scanf("%lf%lf",&a,&b); n=(b-a)/h; printf("请输入Y的端点:\n");scanf("%lf%lf",&c,&d); m=(d-c)/h; for(i=0;i<=n;i++) { x[i]=a+i*h; } for(j=0;j<=m;j++) { y[j]=c+j*h; } for(i=0;i<=n;i++) { f[i][0][0]=sin(pi*x[i]/4); f[i][m][0]=; f[i][-1][0]=; }printf("\n"); for(j=0;j<=m;j++) { f[0][j][0]=y[j]*(3-y[j]); f[n][j][0]=; f[-1][j][0]=; } for(k=1;k<=3;k++) for(i=1;i<=n;i++) for(j=1;j<=m;j++) { f[i][j][k]=(f[i-1][j][k-1]+f[i-1][j-1][k-1]+f[i][j-1][k-1]+f[i][j][k-1])/4;printf("%lf\n",f[i][j][k]); }}/* for(j=0;j<n;j++) for(i=1;i<n;i++) {f[i][j+1]=r*f[i+1][j]+(1-2*r)*f[i][j]+r*f[i-1][j];}printf("\n空间节点为:\n");for(i=0;i<=10;

五点差分格式 来自淘豆网www.taodocs.com转载请标明出处.

相关文档 更多>>
非法内容举报中心
文档信息
  • 页数3
  • 收藏数0 收藏
  • 顶次数0
  • 上传人cjl201702
  • 文件大小70 KB
  • 时间2020-06-30