summaryrefslogtreecommitdiff
path: root/3683/CH1/EX1.4/Ex1_4.sce
blob: 0866ccd58a400d6ef56ac00f96eb7f73e85e4b6b (plain)
1
2
3
4
5
6
7
8
9
10
b=250//width, in mm
d=500//effective depth, in mm
sigma_cbc=5//in MPa
sigma_st=140//in MPa
m=18.66//modular ratio
//to find critical depth of neutral axis
Xc=d/(1+sigma_st/(m*sigma_cbc))//in mm
z=d-Xc/3//lever arm, in mm
Mr=b*Xc*sigma_cbc*z/2//in N-mm
mprintf("Moment of resistance of the beam = %f kN-m",Mr/10^6)