summaryrefslogtreecommitdiff
path: root/3772/CH6/EX6.3/Ex6_3.sce
diff options
context:
space:
mode:
authorprashantsinalkar2017-10-10 12:27:19 +0530
committerprashantsinalkar2017-10-10 12:27:19 +0530
commit7f60ea012dd2524dae921a2a35adbf7ef21f2bb6 (patch)
treedbb9e3ddb5fc829e7c5c7e6be99b2c4ba356132c /3772/CH6/EX6.3/Ex6_3.sce
parentb1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b (diff)
downloadScilab-TBC-Uploads-7f60ea012dd2524dae921a2a35adbf7ef21f2bb6.tar.gz
Scilab-TBC-Uploads-7f60ea012dd2524dae921a2a35adbf7ef21f2bb6.tar.bz2
Scilab-TBC-Uploads-7f60ea012dd2524dae921a2a35adbf7ef21f2bb6.zip
initial commit / add all books
Diffstat (limited to '3772/CH6/EX6.3/Ex6_3.sce')
-rw-r--r--3772/CH6/EX6.3/Ex6_3.sce24
1 files changed, 24 insertions, 0 deletions
diff --git a/3772/CH6/EX6.3/Ex6_3.sce b/3772/CH6/EX6.3/Ex6_3.sce
new file mode 100644
index 000000000..865c03e6b
--- /dev/null
+++ b/3772/CH6/EX6.3/Ex6_3.sce
@@ -0,0 +1,24 @@
+// Problem no 6.3,Page No.156
+
+clc;clear;
+close;
+
+L=3 //m //Length of beam
+L_1=1.2 //m //Distance from fixed end
+d=0.25 //m //Depth of beam
+w=15*10**3 //N //U.d.L
+W=40*10**3 //N //Point Load
+E=2*10*10**4 //N/m**2
+I=13500*10**-4 //M.I
+
+//Calculations
+
+y_b=W*L_1**3*(3*E*I)**-1+W*L_1**2*(2*E*I)**-1*(L-L_1)+w*L**4*(8*E*I)**-1 //Deflection at free end
+
+M=W*L_1+w*L*L*2**-1 //Max Bending moment at the fixed end A //Nm
+y=d*2**-1
+sigma_max=M*y*I**-1 //N/cm**2 //Max Bending stress at extreme fibre
+
+//Result
+printf("Deflection at the free end is %.4f cm",y_b)
+printf("\n Max stress due to bending is %.2f N/cm^2",sigma_max)