summaryrefslogtreecommitdiff
path: root/3750/CH2/EX2.1/Ex2_1.sce
blob: eacfabe9898a056d3449c89d930231449d8d7b92 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
//Strength Of Material By G.H.Ryder
//Chapter 2
//Example 1
//To Calculate diameter of Bolts

clc();

//Initialization of Variables
P=250; //Power transmitted by coupling, Unit in KW
N=1000;  //Rotations ,Unit in rpm
n=6;  //number fo bolts
PCD=14;  //Pitch circle diameter, Unit in cm
ShearStress=75;  //Allowable mean shear stress, Unit in N/mm^2

//Computations
Torque=(P*60*1000)/(%pi*2*N);  //torque to be transmitted, Unit in N-m
//Torque Equation: Torque=StearStress*(%pi*d^2/4)*n*PCD/(2*100)
d=sqrt(Torque*4*100*2/(ShearStress*%pi*n*PCD));  //Diameter of Rod , Unit in mm
d=ceil(d); //Rounding off d to upper value

//Result
printf("Diameter of the Bolts = %.fmm\n",d)