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

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

    上一主题 下一主题
    离线wz82
     
    发帖
    595
    光币
    4693
    光券
    0
    只看楼主 倒序阅读 楼主  发表于: 2007-08-25
    # i nclude<stdio.h> S~YrXQ{_>-  
    # i nclude<stdio.h> @)VJ,Ql$Y  
    # i nclude<math.h> AyNl,Xyc4  
    #define PI 3.1415926 :@_CQc*yB  
    void ydgl(); H|F>BjXn5  
    float d,am,ro,e,h,p,dt0,d0,s,ds,r,al; |\?-k  
    int f; C_O 7  
    main() H) q9.Jg  
    { printf("Determaination the prime circle of cam\n"); $q.8ve0&^  
      printf("----------------------------\n"); j/9FiuK  
      printf( "input ro=");scanf("%f",&ro); E3,Z(dpX!  
      printf("input h=");scanf("%f",&h); aU4'_%Y@  
      printf("input e=");scanf("%f",&e); $g#X9/+<  
      printf("input dt0=");scanf("%f",&dt0); 0plRsZ}  
      am=0;p=PI/180; \C}tK,79  
      printf("The initial data:ro=%f\n",ro); JEY%(UR8  
      printf("h=%f e=%f dt0=%f\n",h,e,dt0); s26s:A3rh  
      do o,bV.O.W  
      {ro=ro+5; '.WYs!  
      for(f=0;f<=dt0;f=f+2) X /5tZ@  
      {d=PI*f/dt0; 3zWY%(8t4?  
      ydgl(); }}t"^ms  
      } .j7|;Ag  
      } uT]_pKm  
      while(am>30*p); 56?U4wj7{  
      printf("The intermediate results: am=%f\n",am/p); b)@D*plS&  
      printf("ro=%f\n",ro); [p4a\Qg0  
      do * I'O_D  
      {ro=ro-1; %<1fj#X8  
      if(ro<e) =*Wl;PI'  
      break; HaB=nLAT  
    EW2e k^  
      for(f=0;f<=dt0;f=f+2) U0jq.]P  
      {d=PI*f/dt0; N@Slc 0  
      ydgl(); )4GfT  
      } 1Lj\"+.  
      } #J2856bzS  
      while((am>30*p)||(am<=29.5*p)); Ks7s2vK^  
      printf("The final results:max alfa=%f\n",am/p); qf24l&}  
      printf(" min ro=%f\n",ro); q;kM eE*  
      getch(); 4 D\_[(P  
      } 4 Iy\   
      void ydgl() T'Jw\u>"R  
      {  d0=dt0*p; wQ.ild  
      s=0.5*h*(1-cos(d)); %5F=!( w  
      ds=0.5*h*PI*sin(d)/d0; Y 3KCIL9  
      r=sqrt(ro*ro-e*e); "]MF =-v  
      if((s+r)==0) K3 ]hUe#  
      return; %K ]u"  
      al=atan((ds-e)/(s+r)); _Seiwk &  
          if(al>am) 3kYUO-qw  
          am=al; Pq7YJ"Z?:  
          }
     
    分享到
    离线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
    不对吧?????????????????