周期矩形波、周期锯齿波、周期三角波,C语言程序.doc

周期矩形波、周期锯齿波、周期三角波,C语言程序.doc

ID:51931628

大小:42.00 KB

页数:12页

时间:2020-03-19

周期矩形波、周期锯齿波、周期三角波,C语言程序.doc_第1页
周期矩形波、周期锯齿波、周期三角波,C语言程序.doc_第2页
周期矩形波、周期锯齿波、周期三角波,C语言程序.doc_第3页
周期矩形波、周期锯齿波、周期三角波,C语言程序.doc_第4页
周期矩形波、周期锯齿波、周期三角波,C语言程序.doc_第5页
资源描述:

《周期矩形波、周期锯齿波、周期三角波,C语言程序.doc》由会员上传分享,免费在线阅读,更多相关内容在应用文档-天天文库

1、周期矩形波的C语言代码#include#include#include#include#definepi3.1415926#defineE2#defineT12doublefunction(doublet);doublesum();doubledraw();doublefunction(doublet){doublex,s,w,m;intn,k;w=2*pi/T1;s=0;for(n=1;n<=200;n++){k=pow(-1,n-1);x=cos((2*n-1)*w*t)/(2*n-1)*k;s=x+s;}m

2、=s*2*E/pi;return(m);}voidcheck_initialize(){intdriver,mode;detectgraph(&driver,&mode);initgraph(&driver,&mode,"..\bgi");}doublesum(){doublec,t,m,x[301],s[300];inti,g,y,j;x[0]=0;for(i=1;i<=200;i++){setcolor(5);x[i]=x[i-1]+0.02;c=x[i];s[i]=function(c);line(100*x[i-1]+20,-100*s[i-1]+300,100*x[i]+20

3、,-100*s[i]+300);}return0;}doubledraw(){intl,b[61],c[60];b[0]=200;setcolor(9);line(10,300,600,300);line(20,410,20,30);setcolor(6);line(15,35,20,30);line(25,35,20,30);line(595,295,600,300);line(595,305,600,300);for(l=1;l<=25;l++){b[l]=b[l-1]+4;c[l]=220;putpixel(c[l],b[l],5);}outtextxy(10,25,"Y");ou

4、ttextxy(605,305,"X");outtextxy(220,300,"2");outtextxy(10,200,"1");outtextxy(10,300,"0");return0;}voidmain(){check_initialize();setbkcolor(15);sum();draw();getch();}周期三角波C语言代码#include#include#include#include#definepi3.1415926#defineE2#defineT12doublefunction(d

5、oublet);doublesum();doubledraw();doublefunction(doublet){doublex,s,w,m;intn;w=2*pi/T1;s=0;for(n=1;n<=200;n++){x=cos((2*n-1)*w*t)/((2*n-1)*(2*n-1));s=x+s;}m=s*4*E/(pi*pi)+E/2;return(m);}voidcheck_initialize(){intdriver,mode;detectgraph(&driver,&mode);initgraph(&driver,&mode,"..\bgi");}doublesum()

6、{doublec,t,m,x[301],s[300];inti,g,y,j;x[0]=0;for(i=1;i<=200;i++){setcolor(5);x[i]=x[i-1]+0.02;c=x[i];s[i]=function(c);line(100*x[i-1]+20,-100*s[i-1]+400,100*x[i]+20,-100*s[i]+400);}return0;}doubledraw(){intl,b[61],c[60];b[0]=200;setcolor(9);line(10,400,600,400);line(20,410,20,30);setcolor(6);line

7、(15,35,20,30);line(25,35,20,30);line(595,395,600,400);line(595,405,600,400);for(l=1;l<=50;l++){b[l]=b[l-1]+4;c[l]=220;putpixel(c[l],b[l],5);}outtextxy(10,25,"Y");outtextxy(605,405,"X");outtextxy(220,400,"2");outtextxy(

当前文档最多预览五页,下载文档查看全文

此文档下载收益归作者所有

当前文档最多预览五页,下载文档查看全文
温馨提示:
1. 部分包含数学公式或PPT动画的文件,查看预览时可能会显示错乱或异常,文件下载后无此问题,请放心下载。
2. 本文档由用户上传,版权归属用户,天天文库负责整理代发布。如果您对本文档版权有争议请及时联系客服。
3. 下载前请仔细阅读文档内容,确认文档内容符合您的需求后进行下载,若出现内容与标题不符可向本站投诉处理。
4. 下载文档时可能由于网络波动等原因无法下载或下载错误,付费完成后未能成功下载的用户请联系客服处理。