1 2 3 4 5 6
T1 = 37+273; T2 = 35+273; m = 1 ; cv = 4.187; S = m*cv*log(T2/T1); // S = S2-S1 disp("KJ/K",S,"Change in the entropy of the water is")