10adms0.c

来自「常用算法的C程序。主要内容包括多项式的计算、复数运算、随机数的产生、矩阵运算、矩」· C语言 代码 · 共 31 行

  #include "stdio.h"
  #include "10adms.c"
  main()
  { int i,j;
    void  admsf(double,double [],int,double []);
    double t,h,eps;
    double y[3],z[3][11];
    y[0]=0.0; y[1]=1.0; y[2]=1.0;
    t=0.0; h=0.05; eps=0.0001;
    adms(t,h,3,y,eps,11,z,admsf);
    printf("\n");
    for (i=0; i<=10; i++)
      { t=i*h;
        printf("t=%7.3f\n",t);
        for (j=0; j<=2; j++)
          printf("y(%d)=%e  ",j,z[j][i]);
        printf("\n");
      }
    printf("\n");
  }

  void admsf(t,y,n,d)
  int n;
  double t,y[],d[];
  { t=t; n=n;
    d[0]=y[1]; d[1]=-y[0]; d[2]=-y[2];
    return;
  }