diff options
Diffstat (limited to '3863/CH7')
-rw-r--r-- | 3863/CH7/EX7.1/Ex7_1.sce | 18 | ||||
-rw-r--r-- | 3863/CH7/EX7.8/Ex7_8.sce | 29 |
2 files changed, 47 insertions, 0 deletions
diff --git a/3863/CH7/EX7.1/Ex7_1.sce b/3863/CH7/EX7.1/Ex7_1.sce new file mode 100644 index 000000000..38268b64a --- /dev/null +++ b/3863/CH7/EX7.1/Ex7_1.sce @@ -0,0 +1,18 @@ +clear +//Given +//Variable declaration +b=120 //Width of plate in mm +t=20 //Thickness of plate in mm +R=10*10**3 //Radius of curvature in mm +E=2e5 //Youngs modulus in N/sq.mm + +//Calculation +I=b*t**3/12 //Moment of inertia in mm^4 +y_max=t/2 //Maximum distance in mm +sigma_max=int((E/R)*y_max) //Maximum stress in N/sq.mm +M=((E/R*I)*(10**-6)) //Bending moment in kNm + + +//Result +printf("\n Maximum stress = %0.3f N/mm^2",sigma_max) +printf("\n Bending moment = %0.3f kNm",M) diff --git a/3863/CH7/EX7.8/Ex7_8.sce b/3863/CH7/EX7.8/Ex7_8.sce new file mode 100644 index 000000000..97695e9bd --- /dev/null +++ b/3863/CH7/EX7.8/Ex7_8.sce @@ -0,0 +1,29 @@ +clear +// +// + +//Given +//Variable declaration +W=20*1000 //Total load in N +L=3.6 //Span in m +sigma_max=7 //Maximum stress in N/sq.mm + +//Calculation +M1=W*L/8*1e3 //Maximum Bending moment in Nmm +b1=((M1*3/(sigma_max*2))**(1/3)) //Breadth of the beam in mm + +d1=int((2*b1)) //depth of the beam in mm + +M2=W*L/4*1e3 //Maximum Bending moment in Nmm +b2=(((M2*3/(sigma_max*2))**(1/3))) //Breadth of the beam in mm + +d2=2*b2 //depth of the beam in mm + +//Result +printf("\n Dimensions of the cross-section:") +printf("\n Breadth of beam = %0.3f mm",b1) +printf("\n Depth of beam %0.3f mm",d1) + +printf("\n Dimensions of the cross-section when the beam carries a point load at the centre:") +printf("\n Breadth of beam = %0.3f mm",b2) +printf("\n Depth of beam %0.3f mm",d2) |