diff options
Diffstat (limited to '1388/CH4/EX4.28')
| -rwxr-xr-x | 1388/CH4/EX4.28/4_28.sce | 13 |
1 files changed, 13 insertions, 0 deletions
diff --git a/1388/CH4/EX4.28/4_28.sce b/1388/CH4/EX4.28/4_28.sce new file mode 100755 index 000000000..ae5f9c72f --- /dev/null +++ b/1388/CH4/EX4.28/4_28.sce @@ -0,0 +1,13 @@ +clc
+//initialisation of variables
+H= 9720 //cal mole^-1
+P= 1 //atm
+R= 1.987 //cal /mole K
+T= 100 //C
+T1= 95 //C
+//CALCULATIONS
+r= P*H/(R*(273+T)^2)
+dP= r*(T1-T)
+P1= (P+dP)*626/0.824
+//RESULTS
+printf (' vapour pressure= %.f atm',P1)
|