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

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

    上一主题 下一主题
    离线wz82
     
    发帖
    597
    光币
    4711
    光券
    0
    只看楼主 倒序阅读 楼主  发表于: 2007-08-25
    # i nclude<stdio.h> N'|zPFk g  
    # i nclude<stdio.h> 8h-6;x^^  
    # i nclude<math.h> Hd6Qy {,*-  
    #define PI 3.1415926 eEupqOF*:W  
    void ydgl(); C %y AMQ  
    float d,am,ro,e,h,p,dt0,d0,s,ds,r,al; 5U%u S^%DP  
    int f; 0=7C-A1(D  
    main() ;nSaZ$`5  
    { printf("Determaination the prime circle of cam\n"); .(nq"&u-*  
      printf("----------------------------\n"); v5 $"v?PT  
      printf( "input ro=");scanf("%f",&ro); L}x"U9'C  
      printf("input h=");scanf("%f",&h); a&4>xZU #  
      printf("input e=");scanf("%f",&e); jb fMTb4  
      printf("input dt0=");scanf("%f",&dt0); =as]>?<  
      am=0;p=PI/180; kLADd"C  
      printf("The initial data:ro=%f\n",ro); L 'H1\' o  
      printf("h=%f e=%f dt0=%f\n",h,e,dt0); ,,b_x@y*  
      do T? _$  
      {ro=ro+5; 3|g'1X}  
      for(f=0;f<=dt0;f=f+2) ^vJ08gu_W  
      {d=PI*f/dt0; WWH T;ST  
      ydgl(); d v"  
      } y7$e7~}/  
      } LYv+Sv  
      while(am>30*p); Y KeOH  
      printf("The intermediate results: am=%f\n",am/p); bWG}>{fj  
      printf("ro=%f\n",ro); 44($a9oa2  
      do `{8Sr)  
      {ro=ro-1; K|E}Ni  
      if(ro<e) h}rrsVj3  
      break; p*n$iroy_{  
    'I*F(4x  
      for(f=0;f<=dt0;f=f+2) ]={:VsnL  
      {d=PI*f/dt0; $Ob]JAf}  
      ydgl(); IiS1ubNtZ  
      } nEyP Nm )  
      } 5|wQeosXxI  
      while((am>30*p)||(am<=29.5*p)); c"77<Db$  
      printf("The final results:max alfa=%f\n",am/p); C&K%Q3V  
      printf(" min ro=%f\n",ro); <iv9Mg}  
      getch(); FL"IPX;S  
      } 1 NLawi6  
      void ydgl() "EQ}xj  
      {  d0=dt0*p; r]" >  
      s=0.5*h*(1-cos(d)); |4x&f!%m  
      ds=0.5*h*PI*sin(d)/d0; 3zMmpeq  
      r=sqrt(ro*ro-e*e); qS+'#Sn  
      if((s+r)==0) fh:=ja?bM3  
      return; L&q~5 9  
      al=atan((ds-e)/(s+r)); ;@ %~eIlu  
          if(al>am) 31<hn+pE &  
          am=al; R qOEQ*k  
          }
     
    分享到
    离线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
    不对吧?????????????????