summaryrefslogtreecommitdiff
path: root/3137/CH17/EX17.12/Ex17_12.sce
blob: 25483a403c814fcbe9c5ee4d76abcafd40b74eb0 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
//Initilization of variables
P=25.6 //lb
w=600 //rpm
a=36 //in
b=12 //in
//Calculations
M=P*(((b/2)+a)/12)  //lb-ft
w_new=(2*%pi*w)/60 //rad/s
Hp=(M*w_new)/550 //hp
//Result
clc
printf('The power being transmitted is %fhp',Hp)