7 files changed, 139 insertions, 0 deletions
diff --git a/3863/CH13/EX13.1/Ex13_1.sce b/3863/CH13/EX13.1/Ex13_1.sce
new file mode 100644
index 000000000..97e4f1c41
--- /dev/null
+++ b/3863/CH13/EX13.1/Ex13_1.sce
@@ -0,0 +1,21 @@
+clear
+//
+
+//Given
+//Variable declaration
+L=3*1000           //Length in mm
+W=25*1000          //Point load in N
+I=1e8              //Moment of Inertia in mm^4
+E=2.1e5            //Youngs modulus in N/sq.mm
+
+//Calculation
+//case(i):Slope of the cantilever at the free end
+thetaB=((W*(L**2))/(2*E*I))
+
+//case(ii):Deflection at the free end
+yB=((W*L**3)/(E*I*3))
+
+
+//Result
+printf("\n Slope at the free end = %0.3f  rad",thetaB)
+printf("\n Deflection at the free end = %0.3f  mm",yB)
diff --git a/3863/CH13/EX13.10/Ex13_10.sce b/3863/CH13/EX13.10/Ex13_10.sce
new file mode 100644
index 000000000..441d324ea
--- /dev/null
+++ b/3863/CH13/EX13.10/Ex13_10.sce
@@ -0,0 +1,21 @@
+clear
+//
+
+//Given
+//Variable declaration
+L=4*1000           //Length in mm
+w=50               //load at fixed end in N/mm
+I=1e8              //Moment of Inertia in mm^4
+E=2e5              //Youngs modulus in N/sq.mm
+
+//Calculation
+//case(i):Slope at the free end
+thetaB=(-(w*(L**3))/(24*E*I))
+
+//case(ii):Deflection at the free end
+yB=((w*L**4)/(E*I*30))
+
+
+//Result
+printf("\n Slope at the free end = %0.3f  rad",-thetaB)
+printf("\n Deflection at the free end = %0.3f  mm",yB)
diff --git a/3863/CH13/EX13.2/Ex13_2.sce b/3863/CH13/EX13.2/Ex13_2.sce
new file mode 100644
index 000000000..0102fca2a
--- /dev/null
+++ b/3863/CH13/EX13.2/Ex13_2.sce
@@ -0,0 +1,21 @@
+clear
+//
+
+//Given
+//Variable declaration
+L=3*1000           //Length in mm
+W=50*1000          //Point load in N
+a=2*1000           //Distance between the load and fixed end in mm
+I=1e8              //Moment of Inertia in mm^4
+E=2e5              //Youngs modulus in N/sq.mm
+
+//Calculation
+//case(i):Slope at the free end
+thetaB=(W*(a**2))/(2*E*I)
+//case(ii):Deflection at the free end
+yB=(((W*a**3)/(E*I*3))+((W*(a**2))/(2*E*I)*(L-a)))
+
+
+//Result
+printf("\n Slope at the free end = %0.3f  rad",thetaB)
+printf("\n Deflection at the free end = %0.3f  mm",yB)
diff --git a/3863/CH13/EX13.3/Ex13_3.sce b/3863/CH13/EX13.3/Ex13_3.sce
new file mode 100644
index 000000000..509a35042
--- /dev/null
+++ b/3863/CH13/EX13.3/Ex13_3.sce
@@ -0,0 +1,17 @@
+clear
+//
+
+//Given
+//Variable declaration
+L=2.5*1000           //Length in mm
+w=16.4               //Uniformly distributed load in kN/m
+I=7.95e7             //Moment of Inertia in mm^4
+E=2e5                //Youngs modulus in N/sq.mm
+
+//Calculation
+W=w*L                           //Total load in N
+yB=((W*L**3)/(E*I*8))    //Deflection at the free end in mm
+
+
+//Result
+printf("\n Deflection at the free end = %0.3f  mm",yB)
diff --git a/3863/CH13/EX13.4/Ex13_4.sce b/3863/CH13/EX13.4/Ex13_4.sce
new file mode 100644
index 000000000..cdc581f9d
--- /dev/null
+++ b/3863/CH13/EX13.4/Ex13_4.sce
@@ -0,0 +1,16 @@
+clear
+//Given
+//Variable declaration
+b=120          //Width in mm
+d=200          //Depth in mm
+L_star=2.5     //Length in m
+L=2.5*1000     //Length in mm
+yB=5           //Deflection at free end in mm
+E=2e5          //Youngs modulus in N/sq.mm
+
+//Calculation
+I=(b*d**3)/12                        //Moment of Inertia in mm^4
+w=(yB*8*E*I)/(L**3*L_star)/1e3       //Uniformly distributed load in N/m
+
+//Result
+printf("\n Uniformly distributed load = %0.3f  kN/m",w)
diff --git a/3863/CH13/EX13.5/Ex13_5.sce b/3863/CH13/EX13.5/Ex13_5.sce
new file mode 100644
index 000000000..713bb0da1
--- /dev/null
+++ b/3863/CH13/EX13.5/Ex13_5.sce
@@ -0,0 +1,21 @@
+clear
+//
+
+//Given
+//Variable declaration
+L=3*1000           //Length in mm
+w=10               //Uniformly distributed load in N/mm
+a=2*1000           //Length of Uniformly distributed load from fixed end in mm
+I=1e8              //Moment of Inertia in mm^4
+E=2e5              //Youngs modulus in N/sq.mm
+
+//Calculation
+//case(i):Slope at the free end
+thetaB=(w*(a**3))/(6*E*I)
+//case(ii):Deflection at the free end
+yB=(((w*a**4)/(E*I*8))+((w*(a**3))/(6*E*I)*(L-a)))
+
+
+//Result
+printf("\n Slope at the free end = %0.3f  rad",thetaB)
+printf("\n Deflection at the free end = %0.3f  mm",yB)
diff --git a/3863/CH13/EX13.6/Ex13_6.sce b/3863/CH13/EX13.6/Ex13_6.sce
new file mode 100644
index 000000000..e916e3048
--- /dev/null
+++ b/3863/CH13/EX13.6/Ex13_6.sce
@@ -0,0 +1,22 @@
+clear
+//
+
+//Given
+//Variable declaration
+L=3*1000           //Length in mm
+w=10               //Uniformly distributed load in N/mm
+a=2*1000           //Length of Uniformly distributed load from fixed end in mm
+I=1e8              //Moment of Inertia in mm^4
+E=2e5              //Youngs modulus in N/sq.mm
+
+//Calculation
+//case(i):Slope at the free end
+thetaB=(((w*(L**3))/(6*E*I))-((w*((L-a)**3))/(6*E*I)))
+
+//case(ii):Deflection at the free end
+yB=(((w*L**4)/(E*I*8))-(((w*(L-a)**4)/(8*E*I))+((w*(L-a)**3)/(6*E*I)*a)))
+
+
+//Result
+printf("\n Slope at the free end = %0.3f  rad",thetaB)
+printf("\n Deflection at the free end = %0.3f  mm",yB)