diff options
Diffstat (limited to '1388/CH3/EX3.11')
| -rwxr-xr-x | 1388/CH3/EX3.11/3_11.sce | 16 |
1 files changed, 16 insertions, 0 deletions
diff --git a/1388/CH3/EX3.11/3_11.sce b/1388/CH3/EX3.11/3_11.sce new file mode 100755 index 000000000..a9d0c876e --- /dev/null +++ b/1388/CH3/EX3.11/3_11.sce @@ -0,0 +1,16 @@ +clc
+//initialisation of variables
+k= 1.435
+k1= 17.485*10^-3 //K^-1
+k2= -4.165*10^-6 //K^-2
+T= 200 //C
+T1= 0 //C
+P= 10 //atm
+R= 1.987 //cal/mol K
+k3= 3.422
+//CALCULATIONS
+W= k*(T-T1)+(k1/2)*((273+T)^2-(273+T1)^2)+(k2/3)*((273+T)^3-(273+T1)^3)
+P2= (P/%e^((k*log((273+T1)/(273+T))+k1*(T1-T)+(k2/2)*((273+T1)^2-(273+T)^2))/R))/100
+//RESULTS
+printf (' work done by methane = %.f cal ',W+26)
+printf (' \n final pressure= %.2f atm ',P2+0.01)
|