diff options
Diffstat (limited to '3862/CH2/EX2.15/Ex2_15.sce')
-rw-r--r-- | 3862/CH2/EX2.15/Ex2_15.sce | 27 |
1 files changed, 27 insertions, 0 deletions
diff --git a/3862/CH2/EX2.15/Ex2_15.sce b/3862/CH2/EX2.15/Ex2_15.sce new file mode 100644 index 000000000..638f5be2a --- /dev/null +++ b/3862/CH2/EX2.15/Ex2_15.sce @@ -0,0 +1,27 @@ +clear +// + +//variable declaration +P1=500.0 //Loading at inclined to 60.0°,N +P2=1000.0 //vertical loading at 150 distance from O,N +P3=1200.0 //vertical loading at 150 distance from O,N +H=700.0 //Horizontal loading at 300 ditance from O,N +a=150.0 +theta=60.0*%pi/180 +//assume Resulat R at distance x from O, +//sum of vertical Fy & sum of horizontal forces Fx is zero +//Assume direction of Fx is right +//Assume direction of Fy is up +Rx=P1*cos(theta)-H +Ry=-P3-P2-P1*sin(theta) + +R=sqrt((Rx**2)+(Ry**2)) +printf("\n R= %0.2f KN in y-direction",R) + +alpha=atan(Ry/Rx)*180/%pi +printf("\n alpha %0.2f °",alpha) + +//Let the point of application of the resultant be at a distance x from the point O along the horizontal arm. Then, + +x=(P1*sin(theta)*(2*a)+P2*a-P3*a*cos(theta)+H*a*2*sin(theta))/(-Ry) +printf("\n x= %0.3f mm",x) |