diff options
Diffstat (limited to '1466/CH13/EX13.4/13_4.sce')
| -rwxr-xr-x | 1466/CH13/EX13.4/13_4.sce | 13 |
1 files changed, 13 insertions, 0 deletions
diff --git a/1466/CH13/EX13.4/13_4.sce b/1466/CH13/EX13.4/13_4.sce new file mode 100755 index 000000000..64feb4b1f --- /dev/null +++ b/1466/CH13/EX13.4/13_4.sce @@ -0,0 +1,13 @@ +
+clc
+//initialisation of variables
+T=520//F
+R=53.3
+h2=10000//ft
+p1=14.7//lb/in^2
+//CALCULATIONS
+p2=p1*(0.6974)
+p2a=p1*0.6832//taking antilogs
+//RESULTS
+printf (' pressure assuming isothermal change= %.2f lb/in^2',p2)
+printf (' \npressure assuming adiabatic change= %.2f lb/in^2',p2a)
|