summaryrefslogtreecommitdiff
path: root/1709/CH7/EX7.3/7_3.sce
blob: 267e1addb250711a3ceabddb332869209796bc36 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
clc
//Initialization of variables
T1=540 //R
T2=960 //R
disp("From gas tables,")
h2=231.06 //B/lbm
h1=129.06 //B/lbm
cp=0.24
//calculations
W=h2-h1
dh=cp*(T2-T1)
//results
printf("Change in enthalpy = %.1f B/lbm",dh)