//Chapter-4,Example 12,Page 96 clc; close; q_rev= 19.14 //latent heat n= 18 //mols T= 273 //temperature in Kelvin dS= q_rev*n/T printf('the change of molar entropy is %.2f J/mol',dS)