diff options
Diffstat (limited to '2666/CH18/EX18.2/18_2.sce')
| -rwxr-xr-x | 2666/CH18/EX18.2/18_2.sce | 14 |
1 files changed, 14 insertions, 0 deletions
diff --git a/2666/CH18/EX18.2/18_2.sce b/2666/CH18/EX18.2/18_2.sce new file mode 100755 index 000000000..284affccb --- /dev/null +++ b/2666/CH18/EX18.2/18_2.sce @@ -0,0 +1,14 @@ +clc
+//initialisation of variables
+t1=500//R
+t2=800//R
+p=14.7//psia
+p1=2.182//psia
+p2=11.410//pisa
+h1=96.38//Btu per lb
+h2=23.97//Btu per lb
+//CALCULATION
+P=p*(p2/p1)//psia
+E=h1-h2//Btu per lb of air
+//RESULTS
+printf('the final pressure and the change in enthalpy=% f Btu per lb of air',E)
|