单叶双曲面（C语言）

huright

单叶双曲面（C语言）源代码

1. 
   
2. #include <graphics.h>
   
3. #include <math.h>
   
4. #include <stdio.h>
   
5. #define pi 3.1415926
   
6. void main()
   
7. {
   
8. int graphdrive=DETECT,graphmode;
   
9. int X[36],Y[36],x[36],y[36],i;
   
10. float angle1,angle2,R1,R2,R,H;
    
11. printf("Please input the radius of the ceil circle=R1(0~160):\n");
    
12. scanf("%f",&R1);
    
13. printf("Please input the radius of the bottom circle=R2(0~160):\n");
    
14. scanf("%f",&R2);
    
15. printf("Please input the radius of tht throat circle=R:\n");
    
16. scanf("%f",&R);
    
17. if(R>R1||R>R2)
    
18. {
    
19. printf("Yous input is ERROR!\n");
    
20. return;
    
21. }
    
22. printf("Please the height of the bin-surface=H:\n");
    
23. scanf("%f",&H);
    
24. initgraph(&graphdrive,&graphmode,"");
    
25. angle2=acos(R/R1)+acos(R/R2);
    
26. cleardevice();
    
27. setbkcolor(9);
    
28. setcolor(15);
    
29. setlinestyle(CENTER_LINE,2,NORM_WIDTH);
    
30. line(160,25,160,500);
    
31. line(25,400,300,400);
    
32. setcolor(4);
    
33. setlinestyle(SOLID_LINE,0,THICK_WIDTH);
    
34. line(160-R1,280,160+R1,280);
    
35. line(160-R2,280-H,160+R2,280-H);
    
36. circle(160,400,R1);
    
37. circle(160,400,R2);
    
38. circle(160,400,R);
    
39. setcolor(2);
    
40. setlinestyle(SOLID_LINE,0,NORM_WIDTH);
    
41. i=1;
    
42. do{
    
43. angle1=pi/18*i;
    
44. x[i]=160+(R1*cos(angle1));
    
45. X[i]=160+(R2*cos(angle1+angle2));
    
46. y[i]=400+(R1*sin(angle1));
    
47. Y[i]=400+(R2*sin(angle1+angle2));
    
48. line(x[i],y[i],X[i],Y[i]);
    
49. line(x[i],280,X[i],280-H);
    
50. i++;
    
51. }
    
52. while(i<=36);
    
53. getch();
    
54. closegraph();
    
55. }
    

复制代码