信息工程实验报告3.docVIP

实验18 0)这块具体忘了怎么按题分的了，大家自己研究一下吧 #includexxgc.h #includedos.h #define NUM 20 double func1(double t,double *fs) {return sin(8*atan(1)*50*t/fs[0]+0.3);} main() { int i,n,h,w,key,kv; dcomplex x[20],X[20]; double pi,sumx,sumy,AX[300],AY[300]; double fs=50,dy; char buf[20],sbuf[30]; int decpt,sign; pi=4*atan(1); for(n=0;nNUM;n++){ x[n].r=sin(2*pi*50*n/fs+0.3); x[n].i=0; line2(n*1.0,0.0,n*1.0,x[n].r); } dft_ccc(x,X,NUM,1); getch(); } initgd(); window2(dfgt,-1.0,1.0,(double)NUM,-1.0,t,f,WHITE,BLUE); plotxy2(RED,func1,fs); setcolor(BLUE); getch(); closegraph(); } setviewport(0,h+10,2