diff options
Diffstat (limited to '1286/CH14/EX14.4')
-rwxr-xr-x | 1286/CH14/EX14.4/14_4.sce | 13 |
1 files changed, 13 insertions, 0 deletions
diff --git a/1286/CH14/EX14.4/14_4.sce b/1286/CH14/EX14.4/14_4.sce new file mode 100755 index 000000000..6f4b6bcae --- /dev/null +++ b/1286/CH14/EX14.4/14_4.sce @@ -0,0 +1,13 @@ +clc
+//initialisation
+t1=500//k
+t2=300//k
+m=10//kg
+s=100//cal/kg/k
+r=0.07//m
+//CALCULATIONS
+a=4*3.14*r*r
+E=a*((t1*t1*t1*t1)-(t2*t2*t2*t2))
+r=E/(m*s)
+//results
+printf(' \n maximum rate at which temperature will fall= % 1f c/sec',E)
|