summaryrefslogtreecommitdiff
path: root/3863/CH4/EX4.13/Ex4_13.sce
blob: c4540ae770fac6a43af9bf1b320385cb0bd899e2 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
clear
//
//Given
//Variable declaration
d=12        //Diameter of bar in mm
delL=3      //Increase in length in mm
W=8000      //Steady load in N
P=800       //Falling weight in N
h=8*10      //Vertical distance in mm
E=2e5       //Youngs modulus in N/sq.mm

//Calculation
A=((%pi/4)*d**2)           //Area of bar in sq.mm

L=(E*A*delL/W)                 //Length of the bar in mm

sigma=((P/A)*(1+(sqrt(1+((2*E*A*h)/(P*L))))))

sigma=(sigma)           //Stress produced by the falling weight in N/sq.mm

//Result
printf("\n Stress produced by the falling weight = %0.3f  N/mm^2",sigma)