diff options
Diffstat (limited to '3850/CH28/EX28.5')
-rw-r--r-- | 3850/CH28/EX28.5/Ex28_5.sce | 38 | ||||
-rw-r--r-- | 3850/CH28/EX28.5/Ex28_5.txt | 2 |
2 files changed, 40 insertions, 0 deletions
diff --git a/3850/CH28/EX28.5/Ex28_5.sce b/3850/CH28/EX28.5/Ex28_5.sce new file mode 100644 index 000000000..8d08263c6 --- /dev/null +++ b/3850/CH28/EX28.5/Ex28_5.sce @@ -0,0 +1,38 @@ + +//To Calculate the Amount of Time for Cooling
+
+//Example 28.5
+
+clear;
+
+clc;
+
+T1=70;//Initial Temperature in degree Celsius in First Case
+
+T2=60;//Final Temperature in degree Celsius in First Case
+
+Tav=(T1+T2)/2;//Average Temperature in First Case
+
+Ts=30;//Temperature of Surrounding in degree Celsius
+
+Tdif1=Tav-Ts;//Average Temperature Difference from Surrounding in first case
+
+t=5;//Time taken for cooling from 70 deg Celsius to 60 deg Celsius
+
+Rt=(T1-T2)/t;//Rate of fall of Temperature
+
+bA=Rt/Tdif1;//Product of Wein Constannt and Area
+
+T3=60;//Initial Temperature in degree Celsius in second case
+
+T4=50;//Final Temperature in degree Celsius in second case
+
+Tdif2=T3-T4;//Change in Temperature in second case
+
+Tav1=(T3+T4)/2;//Average Temperature in second case
+
+Tdif3=Tav1-Ts;//Average Temperature Difference from Surrounding in second case
+
+t1=Tdif2/(bA*Tdif3);//Time taken by the liquid to cool
+
+printf("Time taken by the liquid to cool=%d min",t1);
diff --git a/3850/CH28/EX28.5/Ex28_5.txt b/3850/CH28/EX28.5/Ex28_5.txt new file mode 100644 index 000000000..a97f9f8a4 --- /dev/null +++ b/3850/CH28/EX28.5/Ex28_5.txt @@ -0,0 +1,2 @@ + + Time taken by the liquid to cool=7 min
\ No newline at end of file |