summaryrefslogtreecommitdiff
path: root/3137/CH17/EX17.24/Ex17_24.sce
diff options
context:
space:
mode:
authorpriyanka2015-06-24 15:03:17 +0530
committerpriyanka2015-06-24 15:03:17 +0530
commitb1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b (patch)
treeab291cffc65280e58ac82470ba63fbcca7805165 /3137/CH17/EX17.24/Ex17_24.sce
downloadScilab-TBC-Uploads-b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b.tar.gz
Scilab-TBC-Uploads-b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b.tar.bz2
Scilab-TBC-Uploads-b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b.zip
initial commit / add all books
Diffstat (limited to '3137/CH17/EX17.24/Ex17_24.sce')
-rwxr-xr-x3137/CH17/EX17.24/Ex17_24.sce21
1 files changed, 21 insertions, 0 deletions
diff --git a/3137/CH17/EX17.24/Ex17_24.sce b/3137/CH17/EX17.24/Ex17_24.sce
new file mode 100755
index 000000000..03cb1c69b
--- /dev/null
+++ b/3137/CH17/EX17.24/Ex17_24.sce
@@ -0,0 +1,21 @@
+//Initilization of variables
+Wa=161 //lb
+Wb=193.2 //lb
+Wc=322 //lb
+v1=5 //ft/s
+lc=6 //in
+k=6 //lb/ft
+l=4 //ft
+u=0.2 //coefficient of friction
+g=32.2 //ft/s^2
+//Calculations
+Ib=(1/2)*(Wb/g)*(1/2)^2 //Moment of inertia
+w1=v1/0.5 //rad/s
+T1=(0.5*(Wc/g)*v1^2)+(0.5*Ib*w1^2)+(0.5*(Wa/g)*v1^2) //ft-lb
+//Work Done on the system
+//The textbook is ambigious on the calculations hence the result is dispalyed directly
+U=26.4 //ft-lb
+//Velocity Calculations
+v=sqrt((T1+U)/9) //ft/s
+//Result
+printf('The velocity of the block is %f',v)