1460/CH5/EX5.1/5_1.sce


1
2
3
4
5
6
7
8
9
10

clc
//Initialization of variables
Tr=540 //R
Te=2000 //R
m=200 //B/lbm
//calculations
eta=1-(Tr/Te)
Qr=m*(1-eta)
//results
printf("Heat rejected = %d B/lbm",Qr)