diff options
Diffstat (limited to '3886/CH8/EX8.13/8_13.sce')
| -rw-r--r-- | 3886/CH8/EX8.13/8_13.sce | 14 |
1 files changed, 14 insertions, 0 deletions
diff --git a/3886/CH8/EX8.13/8_13.sce b/3886/CH8/EX8.13/8_13.sce new file mode 100644 index 000000000..de1cbf0aa --- /dev/null +++ b/3886/CH8/EX8.13/8_13.sce @@ -0,0 +1,14 @@ +//Force P to make motion impending to the left
+//Refer fig.8.17
+N1=250
+N2=1000*cosd(45)
+N3=500
+F1=0.25*N1 //N
+F2=0.25*N2 //N
+F3=0.25*N3 //N
+//let us give virtual displacement towards left
+//Applying virtual work principle
+//(P-F1-1000*sind(45)-F2-F3)*delta(s)=0
+P=F1+1000*sind(45)+F2+F3 //N
+printf("The required force is P=%.2f N",P)
+
|