diff options
Diffstat (limited to '3831/CH8/EX8.6/Ex8_6.sce')
| -rw-r--r-- | 3831/CH8/EX8.6/Ex8_6.sce | 19 |
1 files changed, 19 insertions, 0 deletions
diff --git a/3831/CH8/EX8.6/Ex8_6.sce b/3831/CH8/EX8.6/Ex8_6.sce new file mode 100644 index 000000000..c817f7de0 --- /dev/null +++ b/3831/CH8/EX8.6/Ex8_6.sce @@ -0,0 +1,19 @@ +// Example 8_6
+clc;funcprot(0);
+// Given data
+W=100;// W
+T_b=110.0+273.15;// K
+
+// Calculation
+// (a)
+// Since we are assuming a constant bulb temperature in part a, U=constant and
+U=0;// W
+Q=U-W;// kW
+printf("\n(a)The heat transfer rate of an illuminated 100. W incandescent lightbulb in a room,Q=%3.0f W",Q);
+// (b)
+Q_dot=0;
+Udot=W;// W
+printf("\n(b)The rate of change of its internal energy,Udot=%3.0f W",Udot);
+Sdot=0;// W/K
+S_p=Sdot-(Q/(T_b));// W/K
+printf("\n(c)The value of the entropy production rate,S_p=%0.3f W/K",S_p);
|