v带传动的c语言设计流程.docxVIP

v带传动的c语言设计流程 v带传动的c语言设计流程 题目：V 带传动的c 语言设计 院系：机电工程学院 班级：机自专升本二班 姓名：卢 晓 盟 学号：[1**********] 指导老师：梁 炜 二、V 带设计程序 #include #include #include #define PAI 3.14 int TYPE_TO_NUM(char type); /*将输入的字符（不论大小写）转换为数字方便使用*/ float Select_Ki(float i); /*查表选择Ki 的程序*/ float Select_KA(float H,int GZJ,int YDJ); /*查表选择KA 的程序*/ float Select_KL(float Ld,int TYPE); /*查表选择KL 的程序*/ float Select_M(int TYPE); /*查表选择m 的程序*/ float Select_dd1(int TYPE); /*查表选择小轮基准直径dd1的程序*/ float Select_dd2(int dd1,float i); /*查表选择大轮直径dd2的程序*/ float Compute_P0(float V,int TYPE,float dd1); /*计算P0的程序*/ float Compute_DIFP0(int TYPE,float Ki,int n1); /*计算DIFP0的程序*/ float Compute_VMAX(int TYPE); /*计算VMAX 的程序*/ float Compute_KALF(float ALF1); /*计算KALF 的程序*/ float Compute_B(int TYPE,int z); /*计算带宽B 的程序*/ float* Compute_LAK(float dd1,float dd2,int TYPE); /*计算Ld ，a ，KL 的程序*/ main() { float P,H,i,n1,KA,Ki,dd1,dd2,V ,P0,DIFP0,Pd,VMAX,*LAK,m,Ld,KALF,a,KL,z,F0,ALF1,Q,B; int YDJ,GZJ,TYPE,ANS; char type,ans; printf( V 带传动设计程序\n); printf( 设计者 卢晓盟 [1**********]\n); START: printf(请输入原始参数:\n); printf(传递功率P(KW):); scanf(%f,P); printf(小带轮转速n1(r/min)：); scanf(%f,n1); printf(传动比i:); scanf(%f,i); printf(每天工作时间H(h):); scanf(%f,H); printf(原动机类型(1或2):); scanf(%d,YDJ); printf(工作机载荷类型:\n1,载荷平稳\n2,载荷变动较小\n3,载荷变动较大\n4,载荷变动很大\n); scanf(%d,GZJ); DX: printf(带型:); scanf( %c,type); TYPE=TYPE_TO_NUM(type); KA= Select_KA(H,GZJ,YDJ); Pd=KA*P; VMAX=Compute_VMAX(TYPE); DD1:dd1=Select_dd1(TYPE); V=PAI*dd1*n1/60000; while(VVMAX) { printf(所选小轮基准直径过小! 请重新选择!\n); dd1=Select_dd1(TYPE); V=PAI*dd1*n1/60000; } dd2=Select_dd2(dd1,i); P0=Compute_P0(V,TYPE,dd1); Ki=Select_Ki(i); DIFP0=Compute_DIFP0(TYPE,Ki,n1); LAK=Compute_LAK(dd1,dd2,TYPE); Ld=LAK[0]; a=LAK[1]; KL=LAK[2]; ALF1=180-57.3*(dd2-dd1)/a; KALF=Compute_KALF(ALF1); z=ceil(Pd/(KALF*KL*(P0+DIFP0))); if(z=10) goto DX; m=Select_M(TYPE); F0=500*Pd*(2.5-KALF)/(z*V*KALF)+m*V*V; Q=2*z*F0*sin(ALF1*PAI/360); B= Compute_B(TYPE,z); printf( 计算结果\n); printf(小轮直径:%f mm\n大轮直径:%f mm