summaryrefslogtreecommitdiff
path: root/3819/CH3/EX3.16/Ex3_16.sce
blob: 46ba36ca06ae226146106c39913db1e31719aa1e (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
// A Textbook of Fluid Mecahnics and Hydraulic Machines - By R K Bansal
// Chapter 3-Hydrostatic Forces on surfaces
// Problem 3.16

//Data given in the Problem
d=3
A=%pi/4*3*3
DC=1
BC=3
BE=2
CG=1.5
g=9.81
dens=1000

//Calculations
//1)
sin_theta=(BE-DC)/BC
h=DC+CG*sin_theta
F=dens*g*A*h
mprintf("The total pressure is %f N \n",F)
//2)
IG=%pi/64*d^4
H=IG*sin_theta^2/(A*h)+h
mprintf("The Centre of pressure is %f m",H)