diff options
Diffstat (limited to '965/CH2/EX2.64/64.sci')
-rw-r--r-- | 965/CH2/EX2.64/64.sci | 16 |
1 files changed, 16 insertions, 0 deletions
diff --git a/965/CH2/EX2.64/64.sci b/965/CH2/EX2.64/64.sci new file mode 100644 index 000000000..44cf1a723 --- /dev/null +++ b/965/CH2/EX2.64/64.sci @@ -0,0 +1,16 @@ +clc;
+clear all;
+disp("Heat transfer rate")
+r1=2/2;//m
+r2=r1+2/100;//m
+r3=r2+5/1000;//m
+t1=300;//degree C
+t2=50;//degree C
+kA=58;// W/(m*C)
+kB=0.116;// W/(m*C)
+Rfilm=0.0023;// K/W
+RthA=(r2-r1)/(4*3.1416*kA*r1*r2)
+RthB=(r3-r2)/(4*3.1416*kB*r3*r2)
+Q=(t1-t2)/(RthA+RthB+Rfilm);
+disp("kW",Q/1000,"Rate of heat in Q =")
+
|