summaryrefslogtreecommitdiff
path: root/3845/CH8/EX8.4
diff options
context:
space:
mode:
authorprashantsinalkar2017-10-10 12:27:19 +0530
committerprashantsinalkar2017-10-10 12:27:19 +0530
commit7f60ea012dd2524dae921a2a35adbf7ef21f2bb6 (patch)
treedbb9e3ddb5fc829e7c5c7e6be99b2c4ba356132c /3845/CH8/EX8.4
parentb1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b (diff)
downloadScilab-TBC-Uploads-7f60ea012dd2524dae921a2a35adbf7ef21f2bb6.tar.gz
Scilab-TBC-Uploads-7f60ea012dd2524dae921a2a35adbf7ef21f2bb6.tar.bz2
Scilab-TBC-Uploads-7f60ea012dd2524dae921a2a35adbf7ef21f2bb6.zip
initial commit / add all books
Diffstat (limited to '3845/CH8/EX8.4')
-rw-r--r--3845/CH8/EX8.4/Ex8_4.sce22
1 files changed, 22 insertions, 0 deletions
diff --git a/3845/CH8/EX8.4/Ex8_4.sce b/3845/CH8/EX8.4/Ex8_4.sce
new file mode 100644
index 000000000..7763c7eb7
--- /dev/null
+++ b/3845/CH8/EX8.4/Ex8_4.sce
@@ -0,0 +1,22 @@
+//Example 8.4
+m1=0.500;//Mass of object 1 (kg)
+m2=3.50;//Mass of object 2 (kg)
+v1=4.00;//Initial velocity of object 1 (m/s)
+v2=0;//Initial velocity of object 2 (m/s)
+//Using equations of conservation of momentum and conservation of internal kinetic energy, we can derive a quadratic equation with v1_final as the variable
+//(1/2*m1+1/2*m1^2/m2)v1_final^2-(m1^2/m2*v1)v1_final-(1/2*m1*v1^2-1/2*m1^2/m2*v1^2)
+
+p=[(1/2*m1+1/2*m1^2/m2) -(m1^2/m2*v1) -(1/2*m1*v1^2-1/2*m1^2/m2*v1^2)];//Coefficients of above polynomial
+
+r=roots(p);//Finding the roots of the equation
+if r(1,1)==v1 then
+ v1_final=r(2,1);
+else
+ v1_final=r(1,1);
+end//Assigning a meaningful value to final velocity of object 1 (m/s)
+v2_final=m1/m2*(v1-v1_final);//Final value of object 2 from momentum equation (m/s)
+
+printf('Final velocity of object 1 = %0.2f m/s',v1_final)
+printf('\nFinal velocity of object 2 = %0.2f m/s',v2_final)
+//Openstax - College Physics
+//Download for free at http://cnx.org/content/col11406/latest