diff options
Diffstat (limited to '1967/CH4/EX4.4/4_4.sce')
-rwxr-xr-x | 1967/CH4/EX4.4/4_4.sce | 12 |
1 files changed, 12 insertions, 0 deletions
diff --git a/1967/CH4/EX4.4/4_4.sce b/1967/CH4/EX4.4/4_4.sce new file mode 100755 index 000000000..26d8bf253 --- /dev/null +++ b/1967/CH4/EX4.4/4_4.sce @@ -0,0 +1,12 @@ +clc
+//initialisation of variables
+clear
+Cv= 5*4.18*10^7 //ergs deg^-1 mole^-1
+T1= 25 //C
+P2= 5 //atm
+P1= 1 //atm
+n= 2/7
+//CALCULATIONS
+W= Cv*(273+T1)*(1-(P2/P1)^n)
+//RESULTS
+printf ('Work of expansion = %.2e ergs mole^-1',W)
|