summaryrefslogtreecommitdiff
path: root/3863/CH1/EX1.16/Ex1_16.sce
blob: deb4a461007670b8d7cfc28a002ebf956eb2a967 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
clear
//

//Given
//Variable declaration
D1=30          //Larger diameter in mm
D2=15          //Smaller diameter in mm
L=350          //Length of rod in mm
P=5.5*10**3    //Axial load in N
dL=0.025       //Extension in mm

//Calculation
E=int((4*P*L)/(%pi*D1*D2*dL))   //Modulus of elasticity in N/sq.mm

//Result
printf("\n Modulus of elasticity,E = %.5eN/mm^2",E)