这个C语言程序 怎末运行不起来呢 一直在迷失
#include<stdio.h>#include<math.h>
Main()
{
Float
h1,h2,p1,q1,i,i1,g,a,b,c,d,e, f,a1,q2,o1, l,s, xc, yc, x4, y4, x5, y5, xx, xi, ex, gg;
float
o,u,c1,q3,q4,k, j,r,z,x,y,e1,x1,y1,p2, x2, y2, p3, x3, y3, m,n, t, k1, k2, x6, y6;
float p4;
scanf(“%f, %f”, &h1, &h2) ; /*输入h1, h2*/
for(p1=0.91;p1<=1.08;p1=p1+0.034) /*设p1,q1, i, i1*/
for(q1=1.31;q1<=1.48;q1=q1+0.034)
for(i=0.45;i<=0.61;i=i+0.032)
for(i1=0.22;i1<0.3;i1=i1+0.02)
(g=h1/ (sin(p1)+i*sin(q1)); /*计算g,a, b, f*/
a= i*g;
b=i1*g;
f=g-b;
e1=g*cos(p1)-a*cos(q1); /计算b1,b2, b3, c点坐标*/
x1=f*cos(p1) ;
y1=h1-f*sin(p1);
q2=0.436;
gg=g*g- (e1+a*cos (q2))*(e1+a*cos (q2)) ;
if (gg<0)
gg=-1. 0*gg;
p2=atan (sqrt (gg)/ (e1+a*cos (q2));
x2= f*cos (p2) ;
y2=b*sin (p2) +a*sin(q2);
p3=3.14/2.0- atan(a/g) -atan (e1/sqrt (g*g+a*a- e1*e1));
q3=3.14/2.0-p3;
x3=f*cos (p3) ;
y3= b*sin (p3) +a*sin(q3) ;
m=x3*x3- x1*x1+y3*y3- y1*y1;
n=x2*x2-x3*x3+y2*y2- y3*y3:
t=2.0*((x3-x1)* (y2-y3)- (y3-y1)*(x2-x3));
xc=(m*(y2-y3)-n*(y3-y1))/t;
yc=(n*(x3-x1)-m*(x2-x3))/t;
c=sqrt((x1-xc)*(x1- xc)+(y1-yc)*(y1-yc)); /*计算c,d, e*/
o=c/a;
if(o<0. 9||o>1.2)
continue;
d=yc;
e=e1-xc;
x4=e1+a*cos(q1); /*计算a1,q2, q1点坐标*/
y4=a*sin(q1) ;
x5=e1;
y5=0. 0;
k1=(y1- yc)/(x1-xc);
c1=atan(k1) ;
k2= (y4-y5)/(x4-x5) ;
x6=(k1*x1-y1-k2*x4+y4)/(k1 -k2);
y6=k1*(x6-x1)+y1:
l=x6; /*计算I, s*/
s=h1-y6:
U=s/l;
if(u>0.16||u<0. 0| d>0. 2*h1|e>h1/4. 5)
continue:
printf(“u=%f,q1=%f,a=%f, b=%f, c=%f, d=%f, e=%fn, f=%f,g=%f,p1=%f, c1=%f, s=
%f, l=%fn”,u,q1,a,b,c,d,e, f,g,p1,c1,s,l);
xx= 0;xi=3000;
for (q4=1.48;q4>=0. 436;q4=q4- 0.0348)
(x1=a*cos (q4);
k=2. 0*e*b+2.0*a*b*cos(q4) ;
j=2. 0*a*b*sin(q4) -2.0*b*d;
r=a*a+b*b+d*d-c*c+e*e+2. 0*a*e*cos (q4) -2.0*a*d*sin(q4) ;
if( (k*k*r*r-(k*k+j*j)*(r*r-j*j))<0. 0)
{ex=xx-xi;printf(“ ex-%fn” ,ex) ;
continue;
}
z= (k*r+sqrt(k*k*r*r-(k*k+ j*j)*(r*r- j*j)))/(k*k+j*j);
p4=acos(z) ;
x=-a*cos (q4) +g*cos (p4) ;
y=a*sin (q4)+g*s in(p4);
if(y>=h1| |y<=h2)
continue;
printf(" x=%f, y=%f, x1=%fn" ,x,y,x1):
if (x>xx)xx=x;
if (x<xi)xi=x;
}
}
}
