diff options
Diffstat (limited to '1967/CH8/EX8.5/8_5.sce')
-rwxr-xr-x | 1967/CH8/EX8.5/8_5.sce | 13 |
1 files changed, 13 insertions, 0 deletions
diff --git a/1967/CH8/EX8.5/8_5.sce b/1967/CH8/EX8.5/8_5.sce new file mode 100755 index 000000000..031de8274 --- /dev/null +++ b/1967/CH8/EX8.5/8_5.sce @@ -0,0 +1,13 @@ +clc
+//initialisation of variables
+clear
+P= 200 //atm
+Tc= 126 //k
+T= 25 //C
+Pc= 33.5 //atm
+M= 27 //gms
+m= 16 //gms
+//CALCULATIONS
+dC= (1+(M*Tc^3*P/(m*Pc*(273.2+T)^3)))
+//RESULTS
+printf ('Cp-Cv = %.2f *R cal mole^-1 K^-1',dC)
|