diff options
Diffstat (limited to '965/CH4/EX4.30/30.sci')
| -rw-r--r-- | 965/CH4/EX4.30/30.sci | 25 |
1 files changed, 25 insertions, 0 deletions
diff --git a/965/CH4/EX4.30/30.sci b/965/CH4/EX4.30/30.sci new file mode 100644 index 000000000..a0e36eda3 --- /dev/null +++ b/965/CH4/EX4.30/30.sci @@ -0,0 +1,25 @@ +clc;
+clear all;
+disp("Temperautre and rate")
+R=50/1000;//m
+ti=900;// degree C
+ta=30;//degree C
+h=20;// W/(m^2.C)
+rhos=7800;//kg/m^3
+cs=460;// J/kg.C
+tau=30;//s
+k=40;//W/(m.C)
+
+
+Lc=R/3;//m
+Bi=h*Lc/k;
+As=4*3.1416*R^2;
+V=4/3*3.1416*R^3;
+X=h*As*tau/(rhos*V*cs);
+M=exp(-X);
+t=ta+(ti-ta)*M;
+disp("degree C",t," temperature of ball after 30 sec, t =")
+
+gradT=(ti-ta)*M*(-X/tau);
+disp("C/min",gradT*60," rate of cooling after 30 seconds =")
+
|