切换到宽版
  • 广告投放
  • 稿件投递
  • 繁體中文
    • 7331阅读
    • 3回复

    [分享]机械原理课程设计程序 - 凸轮设计部分 [复制链接]

    上一主题 下一主题
    离线wz82
     
    发帖
    597
    光币
    4707
    光券
    0
    只看楼主 倒序阅读 楼主  发表于: 2007-08-25
    # i nclude<stdio.h> )!N2'Ld  
    # i nclude<stdio.h> EW ~*@H  
    # i nclude<math.h> W"W@WG9X0  
    #define PI 3.1415926 ^Vl^,@  
    void ydgl(); N{ : [/  
    float d,am,ro,e,h,p,dt0,d0,s,ds,r,al; =t@:F  
    int f; '&RZ3@}+  
    main() F<h&3  
    { printf("Determaination the prime circle of cam\n"); Y*`:M(  
      printf("----------------------------\n"); /uC+.B9k  
      printf( "input ro=");scanf("%f",&ro); : [A?A4l  
      printf("input h=");scanf("%f",&h); D_O5k|-V  
      printf("input e=");scanf("%f",&e); WH{cJ7wCL  
      printf("input dt0=");scanf("%f",&dt0); 'wCS6_K  
      am=0;p=PI/180; )W[KD,0+j  
      printf("The initial data:ro=%f\n",ro); 5JQd)[Im  
      printf("h=%f e=%f dt0=%f\n",h,e,dt0); 3Qqnw{*  
      do HT{F$27W  
      {ro=ro+5; ' %bj9{(0  
      for(f=0;f<=dt0;f=f+2) p3V9ikyy  
      {d=PI*f/dt0; UeMnc 5y  
      ydgl(); g|tNa/  
      } +i:  E  
      } )fxo)GS  
      while(am>30*p); M /n[&  
      printf("The intermediate results: am=%f\n",am/p); Hi9 G^Q  
      printf("ro=%f\n",ro); B(S5+Y  
      do k\4g|Lya  
      {ro=ro-1; Ytl:YzXCi  
      if(ro<e) M \ :"~XW  
      break; :GN)7|:  
    &@mvw=d  
      for(f=0;f<=dt0;f=f+2) ^JYF1   
      {d=PI*f/dt0; ,$hQ(yF  
      ydgl(); K?z*3^^X;  
      } k$9Gn9L%  
      } @"q~ AY  
      while((am>30*p)||(am<=29.5*p)); d/0/$Bz}P  
      printf("The final results:max alfa=%f\n",am/p); pKO T  Qf  
      printf(" min ro=%f\n",ro); yC9:sQ'k  
      getch(); X;K8,A7`  
      } R*JOiVAC  
      void ydgl() 2jI4V;H8g  
      {  d0=dt0*p; p[ks} mca@  
      s=0.5*h*(1-cos(d)); t9KH|y  
      ds=0.5*h*PI*sin(d)/d0; 0hH Iz4(  
      r=sqrt(ro*ro-e*e); }0k"Sw X  
      if((s+r)==0) pHI%jHHJ  
      return; "2y7&#l   
      al=atan((ds-e)/(s+r)); Mft0D j/  
          if(al>am) *>}McvtTw  
          am=al; S&4w`hdD>~  
          }
     
    分享到
    离线2iso
    发帖
    260
    光币
    8
    光券
    0
    只看该作者 1楼 发表于: 2008-04-13
    Thanks
    离线lengyuquan
    发帖
    2
    光币
    2
    光券
    0
    只看该作者 2楼 发表于: 2008-05-29
    你好 还有没关于机械原理程序设计的代码啊! 课程设计老师让我们用编程作,帮帮忙!!能发到我邮箱吗?lengyu.nan@163.com
    离线ziqiangbux
    发帖
    16
    光币
    14
    光券
    0
    只看该作者 3楼 发表于: 2009-06-26
    不对吧?????????????????