summaryrefslogtreecommitdiff
path: root/1286/CH12/EX12.3/12_3.sce
blob: 163191ab28c30392c4f1d3cc078ed11e4e8bff0c (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
clc
//initialisation
cu=90
fe=12
t1=200//c
t2=0//c
l=0.3//m
a=5*10^-4//m^2
//CALCULATIONS
t=(t1*cu+fe*t2)/(cu+fe)
dt=t1-t
rh=cu*a*dt/0.15
//results
printf(' \n rate of heat flow= % 1f cal/sec',rh)