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

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

    上一主题 下一主题
    离线wz82
     
    发帖
    597
    光币
    4709
    光券
    0
    只看楼主 倒序阅读 楼主  发表于: 2007-08-25
    # i nclude<stdio.h> ^Nc\D7( l  
    # i nclude<stdio.h> @w|~:>/g  
    # i nclude<math.h> b8`O7@ar  
    #define PI 3.1415926 q&P"  
    void ydgl(); zfxxPL'  
    float d,am,ro,e,h,p,dt0,d0,s,ds,r,al; rN>f"/J |  
    int f; g4~{#P^i  
    main() \s)j0F)  
    { printf("Determaination the prime circle of cam\n"); -aec1+o  
      printf("----------------------------\n"); ,D#~%kq~  
      printf( "input ro=");scanf("%f",&ro); _/PjeEm $p  
      printf("input h=");scanf("%f",&h); q|Ga   
      printf("input e=");scanf("%f",&e); e+&/ Tq'2  
      printf("input dt0=");scanf("%f",&dt0); r?[Zf2&  
      am=0;p=PI/180; XfY]qQP  
      printf("The initial data:ro=%f\n",ro); ]i{-@Ven  
      printf("h=%f e=%f dt0=%f\n",h,e,dt0); $osDw1C  
      do t4 aa5@r  
      {ro=ro+5; , {]>U'-  
      for(f=0;f<=dt0;f=f+2) ="XxS|Mq3  
      {d=PI*f/dt0; ==Y^~ab;K  
      ydgl(); -1U]@s  
      } PY) 74sa  
      } )C <sj   
      while(am>30*p); hL&z"_`  
      printf("The intermediate results: am=%f\n",am/p); [dUW3}APV  
      printf("ro=%f\n",ro); kkh#VGh"  
      do FVHEb\Z  
      {ro=ro-1; )2:d8J\  
      if(ro<e) /J5wwQ (:  
      break; HhIa=,VY  
    g9 g &]  
      for(f=0;f<=dt0;f=f+2) `@eQL[Z9x  
      {d=PI*f/dt0; mGoUF$9 k  
      ydgl(); iao_w'tJ  
      } NO;+:0n  
      } x.}iSE{  
      while((am>30*p)||(am<=29.5*p)); DQwbr\xy\  
      printf("The final results:max alfa=%f\n",am/p); [{'` |  
      printf(" min ro=%f\n",ro); -u8 ma%JW  
      getch(); "-\I?k  
      }  Q L  
      void ydgl() 0urQA_JC  
      {  d0=dt0*p; `43E-'g  
      s=0.5*h*(1-cos(d)); k`xPf\^tf  
      ds=0.5*h*PI*sin(d)/d0; \iO ,y:  
      r=sqrt(ro*ro-e*e); J4=~.&6  
      if((s+r)==0) "y#$| TMB  
      return; 02?y%  
      al=atan((ds-e)/(s+r)); vr2tMD  
          if(al>am) SmC91XO  
          am=al; +.gZILw  
          }
     
    分享到
    离线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
    不对吧?????????????????