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

wz82 2007-08-25 10:02

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

# i nclude<stdio.h> +g[B &A!d+  
# i nclude<stdio.h> P(;c`   
# i nclude<math.h> C"{on%  
#define PI 3.1415926 g2]-Q.  
void ydgl(); 1sJN^BvuG  
float d,am,ro,e,h,p,dt0,d0,s,ds,r,al; NZuFxJ-`  
int f; Y<+4>Eh  
main() ~}AP@t*  
{ printf("Determaination the prime circle of cam\n"); \2,18E  
  printf("----------------------------\n"); :I('xVNPz  
  printf( "input ro=");scanf("%f",&ro); Uk9g^\H<D  
  printf("input h=");scanf("%f",&h); h"ylpv+  
  printf("input e=");scanf("%f",&e); w-$w  
  printf("input dt0=");scanf("%f",&dt0); ^4[[+r  
  am=0;p=PI/180; m{ fQL  
  printf("The initial data:ro=%f\n",ro); Uz|]}t5V  
  printf("h=%f e=%f dt0=%f\n",h,e,dt0); "BRE0Ir:  
  do cZ>W8{G  
  {ro=ro+5; >B  
  for(f=0;f<=dt0;f=f+2) OpLSjr  
  {d=PI*f/dt0; H~i],WD  
  ydgl(); obq}#  
  } j%;)CV G"  
  } zf~zYZSr  
  while(am>30*p); 5KR|p Fq  
  printf("The intermediate results: am=%f\n",am/p); O:)IRB3  
  printf("ro=%f\n",ro); &*aU2{,s,;  
  do >G2-kL_  
  {ro=ro-1; P{eRDQ=  
  if(ro<e) PNgMLQI6  
  break; l`&6W?C  
z-5#bOABW  
  for(f=0;f<=dt0;f=f+2) 6sl<Z=E#  
  {d=PI*f/dt0; )y W_O:  
  ydgl(); ]F;]<_  
  } 2H[a Y%1T  
  } Z!reX6  
  while((am>30*p)||(am<=29.5*p)); --`LP[ll  
  printf("The final results:max alfa=%f\n",am/p); %}X MhWn{  
  printf(" min ro=%f\n",ro); i(;-n_:, `  
  getch(); ; ZV^e  
  } HDyZzjgG  
  void ydgl() *hs<Ez.cC  
  {  d0=dt0*p; gc3 U/ jM  
  s=0.5*h*(1-cos(d)); f+Medc~  
  ds=0.5*h*PI*sin(d)/d0; R"gm]SQ/  
  r=sqrt(ro*ro-e*e); tQ JH'YV  
  if((s+r)==0) Z(mn U;9{v  
  return; .oj"ru  
  al=atan((ds-e)/(s+r)); KHz838C]  
      if(al>am) Xl6ZV,1=n7  
      am=al; Z4ov  
      }
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 网站统计