01fsq.c

来自「我们的大作业,包括runge-kutta法仿真,0-1分布,反变换的C语言原程序」· C语言 代码 · 共 22 行

  #include "stdio.h"
  #include "01sub.c"
  main()
  { int i,j;
    double p[100],r;
    r=1.0; 
    rnds(&r,p,100);
    printf("\n");
    for (i=0; i<=19; i++)
      { for (j=0; j<=4; j++)
          printf("%10.7lf  ",p[5*i+j]);
        printf("\n");
      }
    printf("\n");
    
  }