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

wz82 2007-08-25 10:02

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

# i nclude<stdio.h> 5,`U3na,  
# i nclude<stdio.h> %41dVnWB^4  
# i nclude<math.h> d=V4,:=S  
#define PI 3.1415926 jUtrFl  
void ydgl(); .z&V!2zp  
float d,am,ro,e,h,p,dt0,d0,s,ds,r,al; yLCqlK  
int f; 2A|^6#XN'  
main() {6Lkh  
{ printf("Determaination the prime circle of cam\n");  A]R7H1  
  printf("----------------------------\n"); wGa0w*$  
  printf( "input ro=");scanf("%f",&ro); }MP2)6  
  printf("input h=");scanf("%f",&h); (1JZuR<?c  
  printf("input e=");scanf("%f",&e); j[NA3Vj1P  
  printf("input dt0=");scanf("%f",&dt0); ,OWdp<z  
  am=0;p=PI/180; h Vz%{R"  
  printf("The initial data:ro=%f\n",ro); c'OJodpa  
  printf("h=%f e=%f dt0=%f\n",h,e,dt0); b9ysxuUdS  
  do Sxf|gDC  
  {ro=ro+5; qd{o64;|  
  for(f=0;f<=dt0;f=f+2) /]%,C   
  {d=PI*f/dt0; aGVzg$  
  ydgl(); ZiM#g1;  
  } uA=6 HpDB  
  } S+>&O3m  
  while(am>30*p); ~-x8@ /   
  printf("The intermediate results: am=%f\n",am/p); zMs]9o  
  printf("ro=%f\n",ro); C>7Mx{!H  
  do /{YUM~  
  {ro=ro-1; y@]4xLB]  
  if(ro<e) xP*9UXZ4P  
  break; &N1C"Eov?  
d='z^vHK  
  for(f=0;f<=dt0;f=f+2) Gp9 >R~$  
  {d=PI*f/dt0; heoOOP(#  
  ydgl(); 3~6F`G  
  } ^k&zX!W  
  } s([9 /ED  
  while((am>30*p)||(am<=29.5*p)); ^|xj.  
  printf("The final results:max alfa=%f\n",am/p); Dntcv|%u  
  printf(" min ro=%f\n",ro); EA7]o.Nm*{  
  getch(); GJWC}$#T Y  
  } =YF\mhMQ:  
  void ydgl() +5Ir=]=T9  
  {  d0=dt0*p; ^!k^=ST1J  
  s=0.5*h*(1-cos(d)); (ii 5pnq  
  ds=0.5*h*PI*sin(d)/d0; rMxst  
  r=sqrt(ro*ro-e*e); nkHr(tF 7  
  if((s+r)==0) X0b :Oiw  
  return; I@cKiB  
  al=atan((ds-e)/(s+r)); DamLkkoA  
      if(al>am) g*t.g@B<2  
      am=al; Dn$zwksSs  
      }
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 网站统计