1 files changed, 21 insertions, 0 deletions
diff --git a/3772/CH6/EX6.8/Ex6_8.sce b/3772/CH6/EX6.8/Ex6_8.sce
new file mode 100644
index 000000000..337ee732e
--- /dev/null
+++ b/3772/CH6/EX6.8/Ex6_8.sce
@@ -0,0 +1,21 @@
+// Problem no 6.8,Page No.159
+
+clc;clear;
+close;
+
+L=6 //m //Length of beam
+d=0.15 //m //diameter
+y_max=1.035*10**-2 //m //Deflection
+E=210*10**9 
+
+//Calculations
+
+I=%pi*64**-1*d**4 //M.I of Beam
+W=y_max*48*E*(L**3)**-1 //Point Load
+theta_A=3*y_max*L**-1
+theta_B=-theta_A
+
+//Result
+printf("The Heaviest central Point Load placed is %.2f N",W)
+printf("\n Slope at supports are:theta_A = %.5f radian",theta_A)
+printf("\n                      :theta_B = %.5f radian",theta_B)