13kfwt0.c

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

  #include "stdio.h"
  #include "13kfwt.c"
  main()
  { int i;
    double p[8],x[8];
    for (i=0; i<=7; i++) p[i]=i+1;
    kfwt(p,8,3,x);
    printf("\n");
    for (i=0; i<=7; i++)
      printf("x(%2d)=%e\n",i,x[i]);
    printf("\n");
  }