刚体转动惯量的c代码.docx
上传人:sy****28 上传时间:2024-09-11 格式:DOCX 页数:2 大小:12KB 金币:16 举报 版权申诉
预览加载中,请您耐心等待几秒...

刚体转动惯量的c代码.docx

刚体转动惯量的c代码.docx

预览

在线预览结束,喜欢就下载吧,查找使用更方便

16 金币

下载此文档

如果您无法下载资料,请参考说明:

1、部分资料下载需要金币,请确保您的账户上有足够的金币

2、已购买过的文档,再次下载不重复扣费

3、资料包下载后请先用软件解压,在使用对应软件打开

#include<stdio.h>intmain(){floatb,T,t,B,c,C,E,d,D,F,q,Q,w,W,r,R,y,Y,u,U,Z,bb,TT,tt,BB,cc,CC,EE,dd,DD,FF,qq,QQ,ww,WW,rr,RR,yy,YY,uu,UU,ZZ,J;doublep,g;p=3.1415926;g=9.8;printf("刚提转动惯量的测量实验,计算转动惯量程序\n分别输入时间\n全系统动力矩作用t1,t2,c1,c2,d1,d2,阻力矩下r,R,y,Y,u,U\n空载系统动力矩作用t1,t2,c1,c2,d1,d2,阻力矩下r,R,y,Y,u,U\n");scanf("%f,%f,%f,%f,%f,%f,%f,%f,%f,%f,%f,%f,%f,%f,%f,%f,%f,%f,%f,%f,%f,%f,%f,%f",&t,&T,&c,&C,&d,&D,&r,&R,&y,&Y,&u,&U,&tt,&TT,&cc,&CC,&dd,&DD,&rr,&RR,&yy,&YY,&uu,&UU);b=(float)(2*(2*p*T-5*p*t)/(t*t*T-T*T*t));B=(float)(2*(2*p*C-5*p*c)/(c*c*C-C*C*c));E=(float)(2*(2*p*D-5*p*d)/(d*d*D-D*D*d));q=(float)(2*(2*p*R-5*p*r)/(r*r*R-R*R*r));Q=(float)(2*(2*p*Y-5*p*y)/(y*y*Y-Y*Y*y));w=(float)(2*(2*p*U-5*p*u)/(u*u*U-U*U*u));F=(float)((B+E+b)/3);W=(float)((q+Q+w)/3);Z=(float)(0.036*g*0.03/(F-W));bb=(float)(2*(2*p*TT-5*p*tt)/(tt*tt*TT-TT*TT*tt));BB=(float)(2*(2*p*CC-5*p*cc)/(cc*cc*CC-CC*CC*cc));EE=(float)(2*(2*p*DD-5*p*dd)/(dd*dd*DD-DD*DD*dd));qq=(float)(2*(2*p*RR-5*p*rr)/(rr*rr*RR-RR*RR*rr));QQ=(float)(2*(2*p*YY-5*p*yy)/(yy*yy*YY-YY*YY*yy));ww=(float)(2*(2*p*UU-5*p*uu)/(uu*uu*UU-UU*UU*uu));FF=(float)((BB+EE+bb)/3);WW=(float)((qq+QQ+ww)/3);ZZ=(float)(0.036*g*0.03/(FF-WW));J=(float)(Z-ZZ);printf("全系统下数据对应的值\n动力矩角加速度b=%f\n",b);printf("动力矩角加速度B=%f\n",B);printf("动力矩角加速度E=%f\n",E);printf("动力矩角平均加速度F=%f\n",F);printf("阻力矩角加速度q=%f\n",q);printf("阻力矩角加速度Q=%f\n",Q);printf("阻力矩角加速度w=%f\n",w);printf("阻力矩角平均加速度W=%f\n",W);printf("总的转动惯量Z=%f\n",Z);printf("空载系统下数据对应的值\n动力矩角加速度bb=%f\n",bb);printf("动力矩角加速度BB=%f\n",BB);printf("动力矩角加速度EE=%f\n",EE);printf("动力矩角平均加速度FF=%f\n",FF);printf("阻力矩角加速度qq=%f\n",qq);printf("阻力矩角加速度QQ=%f\n",QQ);printf("阻力矩角加速度ww=%f\n",ww);printf("阻力矩角平均加速度WW=%f\n",WW);printf("原系统的的转动惯量ZZ=%f\n",ZZ);printf("实验所得的转动惯量的值J=%f\n",J);return0;}