3876/CH13/EX13.2/Ex13_2.sce


1
2
3
4
5
6
7
8
9
10
11
12
13
14
15

//Chapter 13 Thermodynamics Entropy and Free Energy

clc;
clear;

//Initialisation of Variables
m= 9 //gms
H= 79.7 //cal per gram
T= 0 //C

//CALCULATIONS
S= m*H/(273+T)

//RESULTS
mprintf("Entropy change = %.2f E.U",S)