哈爾濱工業(yè)大學(xué)機(jī)械設(shè)計(jì)大作業(yè)——帶傳動電算-在線瀏覽
2024-07-27 08:03本頁面
【正文】 輸入P, n1, i輸入各原始數(shù)據(jù)開始減小直徑B查標(biāo)準(zhǔn)長度確定Ld，同時(shí)查取KL，計(jì)算實(shí)際中心距aA計(jì)算小帶輪包角查表確定包角系數(shù)計(jì)算Po，Z10 ?計(jì)算Fo, Q,B ( 取整)輸出結(jié)果計(jì)算下一型號帶 ？結(jié)束計(jì)算下一種帶輪直徑？YYYNNNNB四、V帶設(shè)計(jì)c程序includeincludeincludedefine PAI int TYPE_TO_NUM(char type)。 /*查表選擇Ki的程序*/float Select_KA(float H,int GZJ,int YDJ)。 /*查表選擇KL的程序*/float Select_M(int TYPE)。 /*查表選擇小輪基準(zhǔn)直徑dd1的程序*/float Select_dd2(int dd1,float i)。 /*計(jì)算P0的程序*/float Compute_DIFP0(int TYPE,float Ki,int n1)。 /*計(jì)算VMAX的程序*/float Compute_KALF(float ALF1)。 /*計(jì)算帶寬B的程序*/float* Compute_LAK(float dd1,float dd2,int TYPE)。 int YDJ,GZJ,TYPE,ANS。 printf( V帶傳動設(shè)計(jì)程序\n)。START: printf(請輸入原始參數(shù):\n)。 scanf(%f,amp。 printf(小帶輪轉(zhuǎn)速n1(r/min)：)。n1)。 scanf(%f,amp。 printf(每天工作時(shí)間H(h):)。H)。 scanf(%d,amp。 printf(工作機(jī)載荷類型:\n1,載荷平穩(wěn)\n2,載荷變動較小\n3,載荷變動較大\n4,載荷變動很大\n)。GZJ)。 scanf( %c,amp。 TYPE=TYPE_TO_NUM(type)。 Pd=KA*P。DD1:dd1=Select_dd1(TYPE)。 while(VVMAX) { printf(所選小輪基準(zhǔn)直徑過小!請重新選擇!\n)。 V=PAI*dd1*n1/60000。 P0=Compute_P0(V,TYPE,dd1)。 DIFP0=Compute_DIFP0(TYPE,Ki,n1)。 Ld=LAK[0]。 KL=LAK[2]。 KALF=Compute_KALF(ALF1)。 if(z=10) goto DX。 F0=500*Pd*()/(z*V*KALF)+m*V*V。 B= Compute_B(TYPE,z)。printf(小輪直徑:%f mm\n大輪直徑:%f mm\n中心距:%f mm\n帶長:%f mm\n帶寬:%f mm\n帶的根數(shù):%f\n初拉力:%f N\n軸壓力:%f N\n,dd1,dd2,a,Ld,B,z,F0,Q)。Y39。S39。N39。 scanf( %c,amp。 ANS=TYPE_TO_NUM(ans)。 else if(ANS==7) goto START。 else { printf(輸入錯(cuò)誤，請重新輸入)。 } }float Select_KA(float H,int GZJ,int YDJ){ float ka1[4][3]={{,},{,},{,},{,}}。 float KA。 else if(H16) KA=ka1[GZJ1][2]。 } if(YDJ==2) { if(H10) KA=ka2[G
環(huán)評公示相關(guān)推薦
鄂ICP備17016276號-1