`underset((A))(H_(2)O(l, 2 atm, 100^(@)C))to underset((B)) (H_(2)O(g, 1 atm,100^(@) C)) to underset((C))(H_(2) O(g, 2 atm, 100^(@)C))`
`DeltaS_(A to B)=(DeltaH_("vap"))/(T)= (40xx1000)/(373)`
`DeltaS_(B to C) n Rln .(P_(2))/(P_(1))= 1 xx R ln .(1)/(2)`