summaryrefslogtreecommitdiff
path: root/2489/CH5/EX5.3/5_3.sce
blob: 22fac484c65ebc31dddb44ea12da8f291d74d9b0 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
clc
//Intitalisation of variables
clear
T= 100 //C
v1= 1674 //cc
v2= 1 //cc
lv= 539.9 //cal g^-1
sp= 13.595 //kg/m63
g= 980 //cm/sec^2
//CALCULATIONS
r= (273.2+T)*(v1-v2)*sp*g/(lv*4.187*10^7)
Tf= T+r
//RESULTS
printf ('Final temperature = %.2f C',Tf)