
1、椭圆面积为公式:S=πRr。
2、椭圆周长公式:L=2πR+4(R-r)或L=π(R+r)。
3、四个锥坡平面图形正好组成一个椭圆图形。
二、锥坡体积公式:
1、一个锥坡V1
2、扣除铺砌厚度后锥坡填土体积V2:
3、锥坡铺砌圬工体积V3:
4、基础铺砌体积V4
5、坡面抹灰或勾缝面积S1
需要注意:椭圆的周长及坡面面积没有简单的公式可用,这里使用的均为近似公式,对于土木工程,精度在千分之3以内,完全足够。
相关源代码:
double H, R, r, t1,t2, T, m, n, E, V1, V2, V3, V4,V5, L1,S1; double a, b, S,L6,L7, L8,L9,L11,L12,C,c,s, basewidth,a0,b0,H0; H = Convert.ToDouble(TextBox2.Text)/1000; m = Convert.ToDouble(TextBox5.Text); n = Convert.ToDouble(TextBox3.Text); t1 = Convert.ToDouble(TextBox6.Text)/1000; t2 = Convert.ToDouble(TextBox8.Text)/1000; a = Convert.ToDouble(TextBox9.Text)/1000; b = Convert.ToDouble(TextBox4.Text)/1000; T = Convert.ToDouble(TextBox7.Text)/1000; E = Convert.ToDouble(TextBox1.Text)/1000; R = H*m; r = H*n; S = Math.PI * R * r / 4; V1 = S * H / 3; L6 = Math.Atan(1 / m); L7 = Math.Atan(1 / n); L8 = R - (t1 + t2) / Math.Sin(Math.Atan(1 / m)); L9 = r - (t1 + t2) / Math.Sin(Math.Atan(1 /n)); L11 = Math.Atan(0.5 * R / r)/Math.PI*180;//圆心角1 L12 = 90 - L11;//圆心角2 C = L11 / 180 * Math.PI * 2 * r + L12 / 360 * Math.PI * R; c = L11 / 360 * Math.PI * 4 * L9 + L12 / 360 * Math.PI * R; s = ((t1 + t2) / Math.Sin(L6) + (t1 + t2) / Math.Sin(L7)) / 2 * c; basewidth = (a + b) / 2; a0 = Math.Sqrt(1 + m * m) / m; b0 = Math.Sqrt(1 + n * n) / n; H0 = H - Math.Sqrt(a0 * b0 * (t1 + t2)); V2 = (S - s) * H0 / 3; V3 = (V1 - V2) * t1 / (t1 + t2); V4 = (V1 - V2) * t2 / (t1 + t2); V5 = basewidth * T * C; S1 = Math.PI * m * n * (a0 + Math.Sqrt(a0 * b0) + b0) * H * H/12;
评论0