summaryrefslogtreecommitdiff
path: root/2141/CH9/EX9.13/Ex9_13.sce
blob: 31b5634653f6fafbe5f6db7eb495c67595ea2897 (plain)
1
2
3
4
5
6
7
8
9
10
11
12

clc
//initialisation of variables
T3=2060//R
Tx=1318 //Btu/lbm
Cp=0.24 //lbm
Wnet=107.2 //Btu/lbm
//CALCULATIONS
qH=Cp*(T3-Tx)//Btu/lbm
Nth=(Wnet/qH)*100//per-cent
//RESULTS
printf('The thermal efficiency of the cycle =% f per-cent',Nth)