summaryrefslogtreecommitdiff
path: root/965/CH2/EX2.3/3.sci
blob: c1690409ef4716ff80615ee86e156a574e9aff81 (plain)
1
2
3
4
5
6
7
8
9
clc;
clear all;
disp("Net heat flux")
t1=100;// degree C temperature of one surface of the slab
t2=0;// degree C temperature of another surface of the slab
L=0.25;// m thickness of the wall
k=387.6;// W/(m*K) thermal conductivity of the brick
q = k*(t1-t2)/L ;// = Q/A W/m^2 rate of heat transfer
disp ("W/m^2",q,"the heat transfer rate is = ")