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

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

    上一主题 下一主题
    离线wz82
     
    发帖
    595
    光币
    4689
    光券
    0
    只看楼主 倒序阅读 楼主  发表于: 2007-08-25
    # i nclude<stdio.h> :Qra9; Y  
    # i nclude<stdio.h> v/lQ5R1  
    # i nclude<math.h> -J=N  
    #define PI 3.1415926 !NFP=m1  
    void ydgl(); u9%)_Q!14  
    float d,am,ro,e,h,p,dt0,d0,s,ds,r,al; VjVL/SO/  
    int f; |F#L{=B  
    main() JmK[7t  
    { printf("Determaination the prime circle of cam\n"); DN;An0 {MK  
      printf("----------------------------\n");  Enj],I  
      printf( "input ro=");scanf("%f",&ro); /?P="j#u  
      printf("input h=");scanf("%f",&h); V|8`]QW@  
      printf("input e=");scanf("%f",&e); GiN\@F!  
      printf("input dt0=");scanf("%f",&dt0); %@Ty,d:;=  
      am=0;p=PI/180; *6e 5T  
      printf("The initial data:ro=%f\n",ro); \;s mH;m  
      printf("h=%f e=%f dt0=%f\n",h,e,dt0); w oSI 2i  
      do  $VCWc#  
      {ro=ro+5; x GHS  
      for(f=0;f<=dt0;f=f+2) WSW,}tFp"  
      {d=PI*f/dt0; #I.Wmfz  
      ydgl(); o!+jPwEU  
      } c);(+b  
      } 7 n=fB#!*3  
      while(am>30*p); "ujt:4 p@  
      printf("The intermediate results: am=%f\n",am/p); <ZM8*bqi  
      printf("ro=%f\n",ro); m mj6YQ0a  
      do ;tF7 GjEp  
      {ro=ro-1; <2a7>\74E0  
      if(ro<e) `<L6Q2Y>j  
      break; iE$/ Rcp  
    tCdgtZm  
      for(f=0;f<=dt0;f=f+2) {s=$.Kg  
      {d=PI*f/dt0; =K)au$BE|  
      ydgl(); 4V`ypFme  
      } 'J`%[,@V  
      } x-_!I>l&  
      while((am>30*p)||(am<=29.5*p)); G*|2qX"o  
      printf("The final results:max alfa=%f\n",am/p); Qx mVImn"  
      printf(" min ro=%f\n",ro); J !:ss  
      getch(); sGCV um}  
      } WJ+<&6W8  
      void ydgl() N(]>(S o  
      {  d0=dt0*p; UUx0#D/U0C  
      s=0.5*h*(1-cos(d)); `q 4%  
      ds=0.5*h*PI*sin(d)/d0; [lsr[`SJ<  
      r=sqrt(ro*ro-e*e); !=.5$/  
      if((s+r)==0) \7}X^]UVx  
      return; shlL(&Py  
      al=atan((ds-e)/(s+r)); 8yH) 8:w  
          if(al>am) +x!V;H(  
          am=al; SZCF db  
          }
     
    分享到
    离线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
    不对吧?????????????????