blob: 2f0c02db6583257ad55807f8b0cfcc551fa244d8 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
|
clc
//initialisation of variables
R= 53.31
T= 80 //F
P2= 90//psia
P1= 15 //psia
n= 1.4
n1= 1.3
cv= 0.171
//CALCULATIONS
Wk= (n/(n-1))*R*(T+460)*((P2/P1)^((n-1)/n)-1)
Wn= (n1/(n1-1))*R*(T+460)*((P2/P1)^((n1-1)/n1)-1)
Wt= R*(T+460)*log(P2/P1)
Q= cv*0.778*((n-n1)/(1-n1))*(T+460)*((P2/P1)^((n-1)/n)-1)
//RESULTS
printf ('Heat transfered from the airin each case= %.1f Btu/lb',Q)
|
