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

//Given
//Variable declaration
sigma=125*10**6    //Safe stress in N/sq.m
P=2.1*10**6        //Axial load in N
D=0.30             //External diameter in m

//Calculation

d=(sqrt((D**2)-P*4/(%pi*sigma)))*1e2  //internal diameter in cm


//Result
printf("\n internal diameter = %0.3f  cm",d)