diff options
Diffstat (limited to '3772/CH6/EX6.16/Ex6_16.sce')
-rw-r--r-- | 3772/CH6/EX6.16/Ex6_16.sce | 27 |
1 files changed, 27 insertions, 0 deletions
diff --git a/3772/CH6/EX6.16/Ex6_16.sce b/3772/CH6/EX6.16/Ex6_16.sce new file mode 100644 index 000000000..d11eb4225 --- /dev/null +++ b/3772/CH6/EX6.16/Ex6_16.sce @@ -0,0 +1,27 @@ +// Problem no 6.16,Page No.171 + +clc;clear; +close; + +E=200*10**9 //Pa +I=2500*10**-8 //m**4 + +//Calculations + +//Taking moment about A we get +R_a=(30*5+30*1)*6**-1 //Reaction at pt A +R_b=60-R_a //Reaction at pt B + +M_c=30*1 //B.M at C +M_d=30*1 //B.M at D +M_a=0 //B.M at a +M_b=0 //B.M at b + +//For conjugate beam taking moment about B_dash +R_a_dash=(30*2**-1*(5+1*3**-1)+30*4*3+30*2*3**-1*2**-1)*6**-1 +R_b_dash=150-R_a_dash + +y_e=1*(E*I)**-1*(R_a_dash*3-30*2*1-2**-1*1*30*(2+1*3**-1))*1000 + +//Result +printf("Deflection at the centre is %.2f",y_e);printf(" m") |