15rbub0.c

来自「常用算法程序集(c语言描述) 第三版.rar」· C语言 代码 · 共 28 行

  #include "stdio.h"
  #include "15rbub.c"
  #include "3rnds.c"
  main()
  { int i,j;
    double p[100],r0,*r,*s;
    r0=5; r=&r0; s=p+30;
    rnds(r,p,100);
    for (i=0; i<=99; i++)
      p[i]=100.0+200.0*p[i];
    printf("\n");
    for (i=0; i<=9; i++)
      { for (j=0; j<=9; j++)
          printf("%7.3f ",p[10*i+j]);
        printf("\n");
      }
    printf("\n");
    rbub(s,50);
    for (i=0; i<=9; i++)
      { for (j=0; j<=9; j++)
          printf("%7.3f ",p[10*i+j]);
        printf("\n");
      }
    printf("\n");
  }