diff options
Diffstat (limited to '3875/CH10/EX10.2/Ex10_2.sce')
| -rw-r--r-- | 3875/CH10/EX10.2/Ex10_2.sce | 12 |
1 files changed, 12 insertions, 0 deletions
diff --git a/3875/CH10/EX10.2/Ex10_2.sce b/3875/CH10/EX10.2/Ex10_2.sce new file mode 100644 index 000000000..4ce6773f5 --- /dev/null +++ b/3875/CH10/EX10.2/Ex10_2.sce @@ -0,0 +1,12 @@ +clc;
+clear;
+e=0.85 //emissivity
+T=2000 //Temperature in K
+A=5*10^-5 //surface area in m^2
+t=60 //time in s
+sigma=5.7*10^-8 //Stefan-Boltzmann Constant in J/m^2sK^4
+
+//calculation
+Q=e*sigma*T^4*A*t
+mprintf("The energy radiated per unit area per sec is = %d Joules.",Q)
+//The answer varies due to round off error.
|