1 files changed, 22 insertions, 0 deletions
diff --git a/3819/CH3/EX3.9/Ex3_9.sce b/3819/CH3/EX3.9/Ex3_9.sce
new file mode 100644
index 000000000..94d494349
--- /dev/null
+++ b/3819/CH3/EX3.9/Ex3_9.sce
@@ -0,0 +1,22 @@
+// A Textbook of Fluid Mecahnics and Hydraulic Machines - By R K Bansal
+// Chapter 3-Hydrostatic Forces on surfaces
+// Problem 3.9
+
+//Data given in the Problem
+a=2
+b=4
+d=1
+g=9.81
+dens=1000
+
+//calculations
+//1)Total Presusre
+A=(a+b)/2*d             //Area of trapezoid
+h=((2*a+b)/(a+b))*(d/3)    //distance od CG from AD surface     
+F=dens*g*A*h
+mprintf("The total pressure is %f N\n",F)
+
+//2)
+IG=(a^2+4*a*b+b^2)/(36*(a+b))*d^3
+H=IG/(A*h)+h        //H is the COP position
+mprintf("The centre of pressure if at %f m \n",H)