summaryrefslogtreecommitdiff
path: root/1286/CH14/EX14.4/14_4.sce
blob: 6f4b6bcae99ff3583588318d9be971330a0afcde (plain)
1
2
3
4
5
6
7
8
9
10
11
12
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)