diff options
Diffstat (limited to '1466/CH3/EX3.6/3_6.sce')
-rwxr-xr-x | 1466/CH3/EX3.6/3_6.sce | 22 |
1 files changed, 22 insertions, 0 deletions
diff --git a/1466/CH3/EX3.6/3_6.sce b/1466/CH3/EX3.6/3_6.sce new file mode 100755 index 000000000..ec60d3ff9 --- /dev/null +++ b/1466/CH3/EX3.6/3_6.sce @@ -0,0 +1,22 @@ +
+clc
+//initialisation of variables
+v0=20//ft/sec
+D=12//m
+R=D/2
+t=0.5
+r=1//m
+r1=0.5//m
+k2=34
+g=32.2
+pi=22/7
+//CALCULATIONS
+va=(v0*r*r)/(2*R*t)
+k1=k2+(va*va/(2*g))-(v0*v0/(2*g))
+H=k2+(va*va/(2*g))
+k=(va*va*r1*r1)/(2*g)
+p1=(2*pi*62.4*[(H*(r1^2-(1/(D^2))))/2-(k*log(6))])+(D*r*r*pi)
+p2=14.7*%pi*R*R
+p=p2-p1
+//results
+printf (' net pressure on plate= %.f lb ',p-2)
|