diff options
Diffstat (limited to '2165/CH1/EX1.9/1_9.sce')
-rwxr-xr-x | 2165/CH1/EX1.9/1_9.sce | 14 |
1 files changed, 14 insertions, 0 deletions
diff --git a/2165/CH1/EX1.9/1_9.sce b/2165/CH1/EX1.9/1_9.sce new file mode 100755 index 000000000..6e41d2ad7 --- /dev/null +++ b/2165/CH1/EX1.9/1_9.sce @@ -0,0 +1,14 @@ +clc
+//initialisation of variables
+v=10//ft^3
+p=100//lb/in^2
+p1=18//lb/in^2
+v1=50//ft^3
+n=log(p/p1)/log(5)
+gama=1.4//air
+//CALCULATIONS
+W=[144*(p*v-p1*v1)]/(n-1)//ft lb
+H=(gama-n)/(gama-1)*W//ft lb
+E=W-H//ft lb
+//RESULTS
+printf('The heat supplied and the change of internal energy=% f ft lb',E)
|