diff options
Diffstat (limited to '2465/CH4/EX4.18/Example_18.sce')
| -rw-r--r-- | 2465/CH4/EX4.18/Example_18.sce | 21 |
1 files changed, 21 insertions, 0 deletions
diff --git a/2465/CH4/EX4.18/Example_18.sce b/2465/CH4/EX4.18/Example_18.sce new file mode 100644 index 000000000..2c66dc887 --- /dev/null +++ b/2465/CH4/EX4.18/Example_18.sce @@ -0,0 +1,21 @@ +//Chapter-4,Example 18,Page 97
+clc();
+close();
+
+T1= 300 //temperature in Kelvin
+
+T2= 363 //temperature in Kelvin
+
+P1= 1 //pressure in atm
+
+P2=7 //pressure in atm
+
+Cv=5
+
+R=2 //gas constant
+
+Cp=Cv+R
+
+delta_S= Cp*log(T2/T1)+R*log(P1/P2) //entropy change
+
+printf('the entropy change is %.4f cal/deg ', delta_S)
|