summaryrefslogtreecommitdiff
path: root/1286/CH3/EX3.19/3_19.sce
blob: bdfc3cafbd9dc272275f779d8d156e94f6266c45 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
clc
//initialisation
p16=80//cm
v16=432//cc
t=273//k
po=76//cm
t=16//c
t16=273+t//k
T=273//k
poxy=0.0014
cfe=0.09
t1=15//c
t2=184//c
m1=2//gm
//calculations
v0=(p16*v16*T)/(po*t16)
m=poxy*v0
h=m1*cfe*(t1+t2)
l=h/m
//results
printf(' latent heat= % 1f cal',l)