diff options
Diffstat (limited to '3886/CH15/EX15.6')
-rw-r--r-- | 3886/CH15/EX15.6/15_6.sce | 20 | ||||
-rw-r--r-- | 3886/CH15/EX15.6/15_6.txt | 6 |
2 files changed, 26 insertions, 0 deletions
diff --git a/3886/CH15/EX15.6/15_6.sce b/3886/CH15/EX15.6/15_6.sce new file mode 100644 index 000000000..8cdc10100 --- /dev/null +++ b/3886/CH15/EX15.6/15_6.sce @@ -0,0 +1,20 @@ +//Body on an inclined plane
+//Refer fig. 15.8 (a),(b) and (c)
+//Consider 1200 N block
+//applying equilibrium condition
+N=1200*cosd(12) //N
+mu=0.2
+//From Law of friction
+F=mu*N
+//applying equilibrium condition
+a=(800-484.25)/(122.32+((800)/(9.81))) //m/sec^2
+//solving for T
+T=800-((800*1.549)/(9.81)) //N
+//initial velocity=0
+t=3 //sec
+//distance moved in 3 sec
+s=0*3+((1.549*3^2)/(2)) //m
+printf("\na=%.3f m/sec^2\nT=%.2f N\ns=%.3f m",a,T,s)
+
+
+
diff --git a/3886/CH15/EX15.6/15_6.txt b/3886/CH15/EX15.6/15_6.txt new file mode 100644 index 000000000..1c8d54c21 --- /dev/null +++ b/3886/CH15/EX15.6/15_6.txt @@ -0,0 +1,6 @@ +
+--> exec('E:\My program EM\15. DAlemberts principle\15.6.sce', -1)
+
+a=1.549 m/sec^2
+T=673.68 N
+s=6.970 m
\ No newline at end of file |