diff options
Diffstat (limited to '965/CH2/EX2.28')
| -rw-r--r-- | 965/CH2/EX2.28/28.sci | 13 |
1 files changed, 13 insertions, 0 deletions
diff --git a/965/CH2/EX2.28/28.sci b/965/CH2/EX2.28/28.sci new file mode 100644 index 000000000..6e6100f18 --- /dev/null +++ b/965/CH2/EX2.28/28.sci @@ -0,0 +1,13 @@ +clc;
+clear all;
+disp("Heat transfer flux")
+L=0.2;//m
+t1=1350;// degree C
+tcf=40;// degree C
+k=1.35;// W/(m*C)
+//q=(t1-t2)/(L/k)=(t2-tcf)/(1/h)
+//(1350-t2)/(0.2/1.35)=(t2-40)*(7.85+0.08*(t2-40))
+//t2^2+102.5*t2-116231=0
+t2=(-102.5+(102.5^2+4*116231)^0.5)/2;
+q=(t1-t2)/(L/k);
+disp("W/m^2",q,"rate of heat transfer = ")
|