diff options
Diffstat (limited to '3683/CH14/EX14.1/Ex14_1.sce')
| -rw-r--r-- | 3683/CH14/EX14.1/Ex14_1.sce | 10 |
1 files changed, 10 insertions, 0 deletions
diff --git a/3683/CH14/EX14.1/Ex14_1.sce b/3683/CH14/EX14.1/Ex14_1.sce new file mode 100644 index 000000000..37602cbc6 --- /dev/null +++ b/3683/CH14/EX14.1/Ex14_1.sce @@ -0,0 +1,10 @@ +b=250//width, in mm
+d=500//effective depth, in mm
+Ast=4*0.785*20^2//four 20 mm dia bars, in sq mm
+fck=15//in MPa
+fy=250//in MPa
+Xu=round(0.87*fy*Ast/0.36/fck/b)//in mm
+Xc=0.531*d//in mm
+//as Xu<Xc, it is under-reinforced section, hence OK
+Mu=0.87*fy*Ast*(d-0.416*Xu)/10^6//in kN-m
+mprintf("Moment of resistance of the beam=%f kN-m", Mu)
|