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

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

    上一主题 下一主题
    离线wz82
     
    发帖
    595
    光币
    4697
    光券
    0
    只看楼主 倒序阅读 楼主  发表于: 2007-08-25
    # i nclude<stdio.h> @6u/)>rI  
    # i nclude<stdio.h> BZR{}Aj4pa  
    # i nclude<math.h> 20:F$d  
    #define PI 3.1415926 LPk@t^[  
    void ydgl(); FG?Mc'r&  
    float d,am,ro,e,h,p,dt0,d0,s,ds,r,al; kfy!T rf  
    int f; ."Ms7=  
    main() $ Y/9SD  
    { printf("Determaination the prime circle of cam\n"); nl@an!z  
      printf("----------------------------\n"); RObnu*  
      printf( "input ro=");scanf("%f",&ro); tvkdNMyX%9  
      printf("input h=");scanf("%f",&h); O-iE0t  
      printf("input e=");scanf("%f",&e); d2\ !tJm  
      printf("input dt0=");scanf("%f",&dt0); *~rj!N?;  
      am=0;p=PI/180; }Zhe%M=}G  
      printf("The initial data:ro=%f\n",ro); (In{GA7 ;  
      printf("h=%f e=%f dt0=%f\n",h,e,dt0); k,h602(  
      do v.0qE}' |  
      {ro=ro+5; bO~y=Pa \  
      for(f=0;f<=dt0;f=f+2) -,bFGTvYQ  
      {d=PI*f/dt0; [Nyt0l "z  
      ydgl(); ^-o{3Q(w  
      } /l$x}  
      } Na\ZV|;*tu  
      while(am>30*p); i FI74COam  
      printf("The intermediate results: am=%f\n",am/p); XLh)$rZ  
      printf("ro=%f\n",ro); Y&|Z*s+ +}  
      do j,IRUx13f  
      {ro=ro-1; k"wQ9=HP7  
      if(ro<e) $vn6%M[  
      break; pR0[qsQM  
    spK8^sh  
      for(f=0;f<=dt0;f=f+2) A5l Cc b  
      {d=PI*f/dt0; {X{R]  
      ydgl(); st'T._  
      } h my%X`%j  
      } ;vx5 =^7P  
      while((am>30*p)||(am<=29.5*p)); 3m1g"  
      printf("The final results:max alfa=%f\n",am/p); r(,U{bU<  
      printf(" min ro=%f\n",ro); C@M-_Ud>Q  
      getch(); V&Y`?Edc  
      } Ky3mz w|  
      void ydgl()  01kRe  
      {  d0=dt0*p; -V$|t<  
      s=0.5*h*(1-cos(d)); u?').c4  
      ds=0.5*h*PI*sin(d)/d0; =H95?\}T[  
      r=sqrt(ro*ro-e*e); l;8t%JV5  
      if((s+r)==0) )f8>kz(  
      return; u6iW1,#  
      al=atan((ds-e)/(s+r)); bG;fwgAr  
          if(al>am) JsaXI:%1  
          am=al; 5Cf!NNV  
          }
     
    分享到
    离线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
    不对吧?????????????????