summaryrefslogtreecommitdiff
path: root/1364/CH7/EX7.2.2/7_2_2.sce
blob: 22e5e08f8cec6164ad938faf095545e521412c63 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
clc
//initialisation of variables
d= 4 //ft
w= 240 //rev/min
v1= 120 //ft/sec
n= 25
a= 30 //degrees
g= 32.2 //ft/sec^2
//CALCULATIONS
v= d*w*2*%pi/(2*60)
dv= v1-v
vr= dv*(1-(n/100))
F= (dv+vr/32.2)
kh= v1^2/(2*g)
n= 164*100/kh
//RESULTS
printf (' efficiency = %.1f percent',n)