summaryrefslogtreecommitdiff
path: root/3863/CH12/EX12.1/Ex12_1.sce
diff options
context:
space:
mode:
Diffstat (limited to '3863/CH12/EX12.1/Ex12_1.sce')
-rw-r--r--3863/CH12/EX12.1/Ex12_1.sce20
1 files changed, 20 insertions, 0 deletions
diff --git a/3863/CH12/EX12.1/Ex12_1.sce b/3863/CH12/EX12.1/Ex12_1.sce
new file mode 100644
index 000000000..52e25e1a3
--- /dev/null
+++ b/3863/CH12/EX12.1/Ex12_1.sce
@@ -0,0 +1,20 @@
+clear
+//
+
+//Given
+//Variable declaration
+L=6*1000 //Length in mm
+W=50*1000 //Point load in N
+I=78e6 //Moment of Inertia in mm^4
+E=2.1e5 //Young's modulus in N/sq.mm
+
+//Calculation
+yc=((W*L**3)/(48*E*I)) //The deflection at the centre in mm
+
+thetaB=((180/%pi)*((W*L**2)/(16*E*I))) //The slope at the supports
+
+
+//Result
+printf("\n Deflection at the centre = %0.3f mm",yc)
+printf("\n NOTE:The answer given for slope at the support is wrong.The correct answer is,")
+printf("\n Slope at the support = %0.3f degree",thetaB)