summaryrefslogtreecommitdiff
path: root/3856/CH5/EX5.5/Ex5_5.sce
blob: 8c1ea453687de60f4401b5cd5e9872a984ba6a47 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
//Calucate the Entopy change for Fusion and Vaporization

//Example 5.5

clc;

clear;

delfusH=6.01;  //Molar Enthalpy of fusion in kJ mol^-1

Tf=273;  //Melting point of ice in K

delfusS=(delfusH*1000)/Tf;  //Entropy change for fusion in J K^-1 mol^-1

printf("Entropy change for Fusion = %.1f J K^-1 mol^-1",delfusS);

delvapH=40.79;  //Molar enthalpy of vaporization in kJ mol^-1

Tb=373;  //Boiling point of water in K

delvapS=(delvapH*1000)/Tb;  //Entropy change for vaporization in J K^-1 mol^-1

printf("\Enentropy change for Vaporization = %.1f J K^-1 mol^-1",delvapS);