summaryrefslogtreecommitdiff
path: root/1967/CH8/EX8.5/8_5.sce
blob: 031de82744ec8e7a8d78d954c5a7ff758d6a2b31 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
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)