blob: 858ddff0955f0dd1d4b2f67ad08f8a4a14652219 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
|
clc
//initialisation of variables
m=0.001//kg
s=500//cal/kg
li=80000//cal/kg
l1=540000//cal/kg
T1=273//k
T2=263//k
T3=373//k
s1=1000//cal/kg
//CALCULATIONS
d1=m*s*log(T1/T2)
d2=m*li/T1
d3=m*s1*log(T3/T1)
d4=m*l1/T3
d5=d4+d3+d2+d1
//results
printf(' increase in entropy = % 1f cal/k',d5)
|
