1 files changed, 10 insertions, 0 deletions
diff --git a/3758/CH1/EX1.15/Ex1_15.sce b/3758/CH1/EX1.15/Ex1_15.sce
new file mode 100644
index 000000000..6b6cadc9a
--- /dev/null
+++ b/3758/CH1/EX1.15/Ex1_15.sce
@@ -0,0 +1,10 @@
+clc;
+dp=840 ;// pressure in kg/cm^2
+w=1025; // specific weight of water in kg/m^3
+k=24*10^3; // bulk modulus of elasticity in kg/cm^2
+v=dp/k; //v =dv/v calculating change in volume
+s=1/w; // calculating specific volume of water at surface of ocean in m^3/kg
+dv=v/w; // calculating change in specific volume between surface and depth in m^3/kg
+v1=s-dv; // calculating specific volume at depth
+w1=1/v1; // calculating specific weight of water at depth
+printf('specific weight of water at depth is %f kg/m^3',w1);