diff options
Diffstat (limited to '3710/CH1/EX1.4/Ex1_4.sce')
| -rw-r--r-- | 3710/CH1/EX1.4/Ex1_4.sce | 13 |
1 files changed, 13 insertions, 0 deletions
diff --git a/3710/CH1/EX1.4/Ex1_4.sce b/3710/CH1/EX1.4/Ex1_4.sce new file mode 100644 index 000000000..8abd5be0c --- /dev/null +++ b/3710/CH1/EX1.4/Ex1_4.sce @@ -0,0 +1,13 @@ +//Example 1.4, Page Number 29
+//Total Power Calculation
+
+clc;
+
+em=0.7 //Emissivity Of the Surface
+T=2000 //Temperature in Kelvin
+A=(10**-5) //Area in Meter Square
+S=5.67*(10**-8) //Stefan-Boltzmann Constant in Watt per meter square Kelvin power four
+
+W=em*S*A*(T**4) //W is the total power radiated in Watt
+
+mprintf("The Total Power Radiated from the Source is %.2f W",W);
|