- UID
- 40521
- 好友
注册时间2009-9-24
威望值 点
最后登录1970-1-1
激情值 点
积分1460
认证分 分
齿轮币 枚
回帖0
|
本帖最后由 gghbb 于 2009-11-5 16:43 编辑
用turbo c编的计算挂轮的下程序/*GUALUN*/
#include<math.h>
#include<stdio.h>
main()
{
int A[55]={23,24,25,26,30,32,33,34,35,36,37,38,40,
41,43,45,46,47,48,50,51,53,55,56,57,58,
59,60,61,62,64,65,66,67,69,70,71,72,73,
74,75,76,79,80,83,84,85,89,90,91,92,95,
97,98,100};
double Mn,B,E,K,I,H,D;
int c1,c2,c3,c4,A1,A2,A3,A4;
int X=0;
printf("JI CHUANG DING SHU D=");
scanf("%lf",&D);
printf("CHI LUN MO SHU Mn=");
scanf("%lf",&Mn);
printf("FEN DU YUAN LUO XUAN JIAO B=");
scanf("%lf",&B);
printf("JIA GONG JING DU E=");
scanf("%lf",&E);
printf("GUN DAO TOU SHU K=");
scanf("%lf",&K);
I=(D*sin(3.1415926*B/180.0))/(Mn*K);
printf("CHUAN DONG BI :%lf\n",I);
for(c1=0;c1<=54;c1++)
{
A1=A[c1];
for(c2=0;c2<=54;c2++)
{
A2=A[c2];
for(c3=0;c3<=54;c3++)
{
A3=A[c3];
for(c4=0;c4<=54;c4++)
{
A4=A[c4];
if(I>1) H=1/I;
else H=I;
if(fabs((double)(A1*A3)/(double)(A2*A4)-H)<=E)
{
if((A1+A2-A3)>=15)
{
if((A3+A4-A2)>=15){
if(A1<A3)
{
if(A2<A4)
{
if(I<1)
printf("%d,%d,%d,%d ",A1,A2,A3,A4);
else
printf("%d,%d,%d,%d ",A2,A1,A4,A3);
X++;
if((X>=2)&&(X%2)==0)
{
printf("\n");
}
}}}}}}}}}
getch();
return 0;
} |
|