551/CH4/EX4.38/38.sce


1
2
3
4
5
6
7
8
9
10
11
12

clc
h1=800; //kJ/kg
C1=5; //m/s
h2=2520; //kJ/kg
C2=50; //m/s
dZ=4; //m
g=9.81; //m/s^2
Q=2180; //kJ/kg
W=h1-h2+(C1^2 - C2^2)/2/1000 +dZ*g/1000+Q;
disp("Power developed = ")
disp(W)
disp("kW")