首页 -> 登录 -> 注册 -> 回复主题 -> 发表主题
光行天下 -> 机械设计,制造及其自动化 -> 机械原理课程设计程序 - 凸轮设计部分 [点此返回论坛查看本帖完整版本] [打印本页]

wz82 2007-08-25 10:02

机械原理课程设计程序 - 凸轮设计部分

# i nclude<stdio.h> Mq\=pxC@  
# i nclude<stdio.h> *L^W[o  
# i nclude<math.h> P) vD?)Q  
#define PI 3.1415926 6ld4'oM  
void ydgl(); 3L&:  
float d,am,ro,e,h,p,dt0,d0,s,ds,r,al; COw"6czX/  
int f; 1Dr&BXvf]8  
main() i(.e=  
{ printf("Determaination the prime circle of cam\n"); }5+^  
  printf("----------------------------\n"); 3X gJZ  
  printf( "input ro=");scanf("%f",&ro); Sp\TaUzg  
  printf("input h=");scanf("%f",&h); xSudDhRP  
  printf("input e=");scanf("%f",&e); Wj.t4XG!  
  printf("input dt0=");scanf("%f",&dt0); %5e|  
  am=0;p=PI/180; ^*AI19w!Ys  
  printf("The initial data:ro=%f\n",ro); l|.}>SfL^u  
  printf("h=%f e=%f dt0=%f\n",h,e,dt0); |.)LZP,  
  do S70#_{  
  {ro=ro+5;  ;+~5XLk  
  for(f=0;f<=dt0;f=f+2) >M#@vIo?<6  
  {d=PI*f/dt0; w;,34qbf  
  ydgl(); i)x0 ]XF  
  } f\2IKpF2  
  } 27!F B@k-  
  while(am>30*p); $M}"u [Qq  
  printf("The intermediate results: am=%f\n",am/p); BHr,jC  
  printf("ro=%f\n",ro); 33~MP;  
  do X7$]qE K  
  {ro=ro-1; pB:XNkxL  
  if(ro<e) T f3CyH!k  
  break; 9Jwd*gevV  
3H,x4L5j  
  for(f=0;f<=dt0;f=f+2) Bc8&-eZ ,  
  {d=PI*f/dt0; 7n5gXiI"  
  ydgl(); cM%?Ot,mK"  
  } d`/8Q9tQ  
  } Ll KO(Q{"  
  while((am>30*p)||(am<=29.5*p)); ?;l@yx  
  printf("The final results:max alfa=%f\n",am/p); 8c) eaDu  
  printf(" min ro=%f\n",ro); UV2W~g  
  getch(); ,NGHv?.N  
  } Ae7FtJO  
  void ydgl() tl_3 %$s  
  {  d0=dt0*p; DzR,ou  
  s=0.5*h*(1-cos(d)); e(s0mbJE  
  ds=0.5*h*PI*sin(d)/d0; ?!Y_w2  
  r=sqrt(ro*ro-e*e); Un]wP`  
  if((s+r)==0) jj`#;Y  
  return; #]dm/WzY  
  al=atan((ds-e)/(s+r)); M+:5gMB'  
      if(al>am) u.yR oZ8/!  
      am=al; vhF9|('G  
      }
2iso 2008-04-13 06:19
Thanks
lengyuquan 2008-05-29 11:14
你好 还有没关于机械原理程序设计的代码啊! 课程设计老师让我们用编程作,帮帮忙!!能发到我邮箱吗?lengyu.nan@163.com
ziqiangbux 2009-06-26 10:59
不对吧?????????????????
查看本帖完整版本: [-- 机械原理课程设计程序 - 凸轮设计部分 --] [-- top --]

Copyright © 2005-2025 光行天下 蜀ICP备06003254号-1 网站统计