C语言机械原理编程,连杆运动分析图线
(23页)
本资源提供全文预览,点击全文预览即可全文预览,如果喜欢文档就下载吧,查找使用更方便哦!
14.9 积分
编程大作业基于C语言的机械原理分析图:只有库函数包含头文件:graphics.hconio.h才能观看该程序效果;若已经安装VC++,可以打开文件夹里面的EasyX压缩包,并安装EasyX文件,也可以观看程 序效果;2.9/*3960角度关系图o o3 21X IXo1X1X0000000000019876543210-10-20o o o3 4 59013/m/s0. 350. 300. 250. 200. 150. 100. 05-0. 00-0. 05-0. 10135 180 225 270 315 3600 1/度莫智斌/2014124066?、如度与13与如1的关系;■ 24鬆?角度以及13 b .1° 1*? ?#inelude #inelude vconio.h>#in clude#in clude #define SZ 2#define PI 3.1415926 float c[SZ][SZ]={0};void danwei(){char s[5];int i=0;int k=-5; while(k<=600) sprintf(s, ”%d”, i); outtextxyfk, 5, s);k+=75;i+=45;} outtextxy(280,25/" 0 1/度”);}void danwei2(){char s[10];float i=-0.1;int k=-10;while(k>=-400){ sprintf(s,”%0?2f”,i);outtextxy(610,k,s);k-=40;i+=0.05;}outtextxy伍10,-420, "13/m/s");}void danweil()char s[10];int i=-60;int k=-10;while(k>=-400){ sprintf(s,"%d",i);outtextxy(-30,k,s);k-=20;i+=10;}outtextxy(-85,-420, ”。2、0 3/度”);}int main(){//创建大小为800 * 600的绘图窗口 initgraph(800, 600);//设置原点(0, 0)为屏幕中央(Y轴默认向下为正) setorigin(100, 500);//使川白色填充背景setbkcolor(WHITE);cleardevicef);setlinecolor(RGB(7,190, 234));rectangle(0z-400,600,0);int i,j;〃网格线for(i=0;i<600;i=i+20) line(i,0J,-400);for(j=0;j<400;j=j+20)line(0,-j,600,-j);//输出屏幕提示settextcolor(BLACK);setfont(18,0,"宋体'*);dan wei();dan weil();settextcolor(RED);dan wei2();settextcolor(RGB(201z 62, 0));outtextxy(240,-450, ”角度关系图”);float o3,ol,o2,wl=10;float tempi;float 11=0.100,12=0.040,14=0.200;float l3,m,ml,A,B,C,D;float a[2][2]={0},b[2][l]={0},al[2][2]={0};float ^^10=0^10=-16.2602*40/20-120,m 11=0, tll=(-(16.2602+90))*40/20-120,ml2=0,tl2=-0.22*40/(0.05)-80;float n=0;while) nv=360){ol=n*PI/180;A=ll*sin(ol)-I4;B=ll*cos(ol);C=-I2;D=(A+sqrt(pow(A,2)+pow(B/2)-pow(C,2)))/(B-C); o2=2*atan(D);muo2*180、p_;-3"-l*c0s(01H2*c0s(02))>n(02);Tmjml=n*600、360jtv 罕 40、20,120; setcoor(BLACK)j -ine(mlo、tlo、ml、¥ mlouml'tloHtj kum+90j ml"n*600、360; tF*40、20,129 setco-or(GREEN)- -ine(mll、tll、ml、tr mllumLtllA k"3;mlHn 关 600*360; t£40、(oo5)oogsetco-or(MAGENTA)j -me312、tl2、mljr ml2uml、tl2A n+Ho.lj senextcoor(GREEN)j Outtextxy(160「80、- 0 2=); Outrextxy(160、,180、=L3=r Out(exixy(160、,260、= 0 3=r Outtextxy(5oo、60 ?fcI§M、2014124066=)j getchoj cosegrapho;returnp二、饬速度、vl3与角一的关系;:角速度w2h3,v<3 ? X ■角速度、速度关系图w2&w3/rad/s V13/m/s莫智斌 /2014124066#inelude #include vconio.h>#incl ude#in clude #define SZ 2#define PI 3.1415926 float c[SZ][SZ]={0};void matrixmultiplicationffloat a_2[2][2],float b_2[2][l]/float y[2][l]) {int i,j/k,a_column=2/a_row=2/b_row=l;float temp;for(i=0;i
天天文库所有资源均是用户自行上传分享,仅供网友学习交流,未经上传用户书面授权,请勿作他用。