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

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

    上一主题 下一主题
    离线wz82
     
    发帖
    597
    光币
    4713
    光券
    0
    只看楼主 倒序阅读 楼主  发表于: 2007-08-25
    # i nclude<stdio.h> *4Izy14e  
    # i nclude<stdio.h> -(#iIgmP  
    # i nclude<math.h> F>cv<l =6l  
    #define PI 3.1415926 N?>vd*  
    void ydgl(); iIogx8[  
    float d,am,ro,e,h,p,dt0,d0,s,ds,r,al; _?OG1t!  
    int f; s0_nLbWwO  
    main() qv"$Bd:]r  
    { printf("Determaination the prime circle of cam\n"); f9\X>zzB2|  
      printf("----------------------------\n"); ((I%'   
      printf( "input ro=");scanf("%f",&ro); +]50DxflA  
      printf("input h=");scanf("%f",&h); ,: ->ErP  
      printf("input e=");scanf("%f",&e); r4f~z$QK  
      printf("input dt0=");scanf("%f",&dt0); \G3rX9xG  
      am=0;p=PI/180; "T"h)L<  
      printf("The initial data:ro=%f\n",ro); &w~d_</  
      printf("h=%f e=%f dt0=%f\n",h,e,dt0); -GgA&dh  
      do ; Hd7*`$  
      {ro=ro+5; J'2X&2  
      for(f=0;f<=dt0;f=f+2) ,iq4Iw  
      {d=PI*f/dt0; d:{O\   
      ydgl(); eN~=*Mn(za  
      } O#u=c1 ?:  
      } ^BL"wk  
      while(am>30*p); 6(e>P)  
      printf("The intermediate results: am=%f\n",am/p); _7)n(1h[3b  
      printf("ro=%f\n",ro); C/&-l{7  
      do Ydy9  
      {ro=ro-1; XGMiW0j0B  
      if(ro<e) $2el&I  
      break; t.'!`5G  
    2T TdH)  
      for(f=0;f<=dt0;f=f+2) rc>6.sM %  
      {d=PI*f/dt0;  JSg$wi8  
      ydgl(); i2^>vYCsl  
      } pU7lnS[  
      } Yir [!{  
      while((am>30*p)||(am<=29.5*p)); W8!Qv8rf  
      printf("The final results:max alfa=%f\n",am/p); Lu0x (/  
      printf(" min ro=%f\n",ro); S/I/-Bp~  
      getch(); ^<-+@v*  
      } 3<zp  
      void ydgl() ;]jNk'oa  
      {  d0=dt0*p; lUiL\~Gq  
      s=0.5*h*(1-cos(d)); L z1ME(  
      ds=0.5*h*PI*sin(d)/d0; EUgs6[w 4  
      r=sqrt(ro*ro-e*e); ]]juN  
      if((s+r)==0) 63~ E#Dt4  
      return; ED& `_h7?  
      al=atan((ds-e)/(s+r)); @jlw_ob2g  
          if(al>am) c\V7i#u[d;  
          am=al; uc"P3,M  
          }
     
    分享到
    离线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
    不对吧?????????????????