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

wz82 2007-08-25 10:02

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

# i nclude<stdio.h> 7A\`  
# i nclude<stdio.h> bI &<L O  
# i nclude<math.h> t`z"=S  
#define PI 3.1415926 d5l42^Z  
void ydgl(); QT,T5Q%JP:  
float d,am,ro,e,h,p,dt0,d0,s,ds,r,al; 4CF;>b f~  
int f; !G-+O#W`  
main() T&_&l;syA  
{ printf("Determaination the prime circle of cam\n"); _li3cXE  
  printf("----------------------------\n"); nZbI}kcm  
  printf( "input ro=");scanf("%f",&ro); 8TFQ%jv  
  printf("input h=");scanf("%f",&h); 9(^UchZZi  
  printf("input e=");scanf("%f",&e); 8X,6U_>#a  
  printf("input dt0=");scanf("%f",&dt0); _/LGGt4&%  
  am=0;p=PI/180; !:|*!  
  printf("The initial data:ro=%f\n",ro); 7<xnE]jdq  
  printf("h=%f e=%f dt0=%f\n",h,e,dt0); %*gf_GeM  
  do X} k;(rb  
  {ro=ro+5; !d N[9}  
  for(f=0;f<=dt0;f=f+2) b]]8Vs)'  
  {d=PI*f/dt0; W<)P@_+-  
  ydgl(); l1 Kv`v\  
  } 77@N79lqO  
  } m=01V5_  
  while(am>30*p); /Sj~lHh  
  printf("The intermediate results: am=%f\n",am/p); "Au4&Fu  
  printf("ro=%f\n",ro); \C3I6Qx  
  do b)I-do+  
  {ro=ro-1; '0D$C},^|8  
  if(ro<e) E%`J =C}  
  break; Bz ;r<Kn  
W'@ |ob  
  for(f=0;f<=dt0;f=f+2) Ocdy;|&  
  {d=PI*f/dt0; zTg\\z;  
  ydgl(); ,0! 2x"Q=  
  } UGPDwgq\v  
  } }Z"iW/?"  
  while((am>30*p)||(am<=29.5*p)); $.jG O!  
  printf("The final results:max alfa=%f\n",am/p); >1s a*Wf  
  printf(" min ro=%f\n",ro); OBAO(Ke  
  getch(); >38>R0k35  
  } (A~7>\r +  
  void ydgl() *C*ZmC5  
  {  d0=dt0*p; zgAU5cw  
  s=0.5*h*(1-cos(d)); @N Yl4N  
  ds=0.5*h*PI*sin(d)/d0; }93kHO{  
  r=sqrt(ro*ro-e*e); 7_\sx7h{3  
  if((s+r)==0) =p@`bx  
  return; :lB*kmg  
  al=atan((ds-e)/(s+r)); { ptd OrN  
      if(al>am) eg;7BZim{  
      am=al; O@Aazc5K  
      }
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-2026 光行天下 蜀ICP备06003254号-1 网站统计