2 files changed, 19 insertions, 0 deletions
diff --git a/24/CH10/EX10.4/Example10_4.sce b/24/CH10/EX10.4/Example10_4.sce
new file mode 100755
index 000000000..aacb42edb
--- /dev/null
+++ b/24/CH10/EX10.4/Example10_4.sce
@@ -0,0 +1,17 @@
+exec('collision.sci', -1)
+
+//Given that
+m1 = 30*10^-3  //in kg
+h1 = 8*10^-2  //in m
+m2 = 75*10^-3  //in kg
+g = 9.8  //in m/s^2
+e = 1
+
+//Sample Problem 10-4
+printf("**Sample Problem 10-4**\n")
+//velocity just before collision
+Vi = zeros(1,2)
+Vi(1) = sqrt(2*g*h1)
+Vi(2) = 0
+Vf= fsolve([0,0], collision)
+printf("The velocity of m1 after collision is %fm/s", abs(Vf(1)))
+\ No newline at end of file
diff --git a/24/CH10/EX10.4/Example10_4_result.txt b/24/CH10/EX10.4/Example10_4_result.txt
new file mode 100755
index 000000000..0e64a930c
--- /dev/null
+++ b/24/CH10/EX10.4/Example10_4_result.txt
@@ -0,0 +1,2 @@
+**Sample Problem 10-4**
+The velocity of m1 after collision is 0.536656m/s 
+\ No newline at end of file