diff options
Diffstat (limited to '1627/CH2')
| -rw-r--r-- | 1627/CH2/EX2.1/Ex2_1.sce | 10 | ||||
| -rw-r--r-- | 1627/CH2/EX2.2/Ex2_2.sce | 20 |
2 files changed, 30 insertions, 0 deletions
diff --git a/1627/CH2/EX2.1/Ex2_1.sce b/1627/CH2/EX2.1/Ex2_1.sce new file mode 100644 index 000000000..759d8165f --- /dev/null +++ b/1627/CH2/EX2.1/Ex2_1.sce @@ -0,0 +1,10 @@ +clc
+//initialisation of variables
+w=3//mm
+s=7.26*10^-2//N/m
+g=9.79*10^3//N/m^3
+d=3*10^-3//m
+//CALCULATIONS
+h=(4*s)/(g*d)//m
+//RESULTS
+printf('The rise of water above the surface is=% f m',h)
diff --git a/1627/CH2/EX2.2/Ex2_2.sce b/1627/CH2/EX2.2/Ex2_2.sce new file mode 100644 index 000000000..ed987ce75 --- /dev/null +++ b/1627/CH2/EX2.2/Ex2_2.sce @@ -0,0 +1,20 @@ +clc
+//initialisation of variables
+sb=7.8
+sg=0.97
+v=75*10^-3//m/s
+r=1.5*10^-3//m
+g=9788.12//N/m^3
+g1=978.81//dyne/cm^3
+r1=1.5*10^-1//cm
+v1=75*10^-1//cm/s
+r2=1.5*32.81*10^-4//ft
+g2=62.31//lbf/ft^3
+v2=75*32.81*10^-4//ft/s
+//CALCULATIONS
+Mu=(2/9)*(r^2*g)*(sb-sg)/(v)//N S/m^2
+Mu1=(2/9)*(r1^2*g1)*(sb-sg)/(v1)//dyne s/cm^2
+Mu2=(2/9)*(r2^2*g2)*(sb-sg)/(v2)//lbf s/ft^2
+M=Mu2*(1/144)//lbf s/in^2
+//RESULTS
+printf('The absolute viscosity of fluid is =% f lbf s/ft^2',M)
|