diff options
Diffstat (limited to '3137/CH17/EX17.12')
| -rwxr-xr-x | 3137/CH17/EX17.12/Ex17_12.sce | 12 |
1 files changed, 12 insertions, 0 deletions
diff --git a/3137/CH17/EX17.12/Ex17_12.sce b/3137/CH17/EX17.12/Ex17_12.sce new file mode 100755 index 000000000..25483a403 --- /dev/null +++ b/3137/CH17/EX17.12/Ex17_12.sce @@ -0,0 +1,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)
|