summaryrefslogtreecommitdiff
path: root/1898/CH5/EX5.18/Ex5_18.sce
blob: b765bf374d03bd05944245407f9bf57c514a8244 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
clear all; clc;

disp("Scilab Code Ex 5.18 : ")

//Given:
fillet_r = 6; //mm
D = 40/1000; //m
d = 20/1000; //m
T = 30; //Nm
D_d = D/d; 
r_d = fillet_r/d; 
k = 1.3;

//Maximum Shear Stress:
c = D/2;
J = (%pi/2)*(c^4)
max_shear = (k*T*c)/(J*10^6); // tou = K(Tc/J)

//Display:

printf('\n\nThe maximum shear stress in the shaft due to the applied torques    = %1.2f MPa',max_shear);

//----------------------------------------------------------------END------------------------------------------------------------------------