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

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

    上一主题 下一主题
    离线wz82
     
    发帖
    595
    光币
    4693
    光券
    0
    只看楼主 倒序阅读 楼主  发表于: 2007-08-25
    # i nclude<stdio.h> S [u <vHy  
    # i nclude<stdio.h> n]o+KT\  
    # i nclude<math.h> `8y &  
    #define PI 3.1415926 N %?o-IY  
    void ydgl(); r+lY9 l  
    float d,am,ro,e,h,p,dt0,d0,s,ds,r,al; ol YSr .Q`  
    int f; A?7%q^;E  
    main() C8t+-p  
    { printf("Determaination the prime circle of cam\n"); 4\$Ze0tv  
      printf("----------------------------\n"); 5#fLGXP  
      printf( "input ro=");scanf("%f",&ro); [p7le8=  
      printf("input h=");scanf("%f",&h); )0GnTB;5Z  
      printf("input e=");scanf("%f",&e); }40/GWp<f  
      printf("input dt0=");scanf("%f",&dt0); C$%QVcf  
      am=0;p=PI/180; +2?0]6EQ  
      printf("The initial data:ro=%f\n",ro); Y3Qq'FN!I  
      printf("h=%f e=%f dt0=%f\n",h,e,dt0); C>03P.s4c  
      do pDKJLa  
      {ro=ro+5; E"" /dC:B  
      for(f=0;f<=dt0;f=f+2) #m M&CscE  
      {d=PI*f/dt0; _*;cwMne-  
      ydgl(); We4 FR4`  
      } q%y_<Fw#E  
      } Ke/P [fo  
      while(am>30*p); &x3"Rq_  
      printf("The intermediate results: am=%f\n",am/p); 57j:Lw~   
      printf("ro=%f\n",ro); '&9 a%  
      do DRzpV6s  
      {ro=ro-1; (dT!u8Oe  
      if(ro<e) KYl^{F  
      break; 3jn@ [ m  
    T4#knSIlh  
      for(f=0;f<=dt0;f=f+2) YVaQ3o|!  
      {d=PI*f/dt0; 05zHLj  
      ydgl(); bF Vd v&  
      } Mb9q<4  
      } iwVra"y  
      while((am>30*p)||(am<=29.5*p)); 7L\GI`y  
      printf("The final results:max alfa=%f\n",am/p); #0P<#S^7  
      printf(" min ro=%f\n",ro); FU[,,a0<<  
      getch(); Mu( Y6  
      } GS$k  
      void ydgl() 8qc %{8  
      {  d0=dt0*p; |l? ALP_g  
      s=0.5*h*(1-cos(d)); >4VU  
      ds=0.5*h*PI*sin(d)/d0; -'N#@Wdr  
      r=sqrt(ro*ro-e*e); A8RT3OiXA  
      if((s+r)==0) 6vjB; uS[  
      return; 5ya3mN E  
      al=atan((ds-e)/(s+r)); N 4v)0  
          if(al>am) !Q3Snu=  
          am=al; -#o+x Jj  
          }
     
    分享到
    离线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
    不对吧?????????????????