summaryrefslogtreecommitdiff
path: root/2144/CH7/EX7.1/ex7_1.sce
blob: 92f446f37d7d796bfc6bb431c33fc248c2919e52 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
// Exa 7.1
clc;
clear;
close;
// Given data
H1 = 2600;// in kJ/kg
H2 = 1850;// in kJ/kg
g = 9.81;
C1 = 10;// in meter/second
C2 = 20;// in meter/secon
Q = 120;// in kJ/kg
Z1 = 30;// in meter
Z2 = 10;// in meter
W = g*(Z1-Z2)/1000+H1-H2+(C1^2-C2^2)/(2*1000)+Q
disp(W,"The work done in kJ/kg is");