diff options
Diffstat (limited to '3543/CH3/EX3.18/Ex3_18.sce')
| -rw-r--r-- | 3543/CH3/EX3.18/Ex3_18.sce | 20 |
1 files changed, 20 insertions, 0 deletions
diff --git a/3543/CH3/EX3.18/Ex3_18.sce b/3543/CH3/EX3.18/Ex3_18.sce new file mode 100644 index 000000000..b684b3d3d --- /dev/null +++ b/3543/CH3/EX3.18/Ex3_18.sce @@ -0,0 +1,20 @@ +// Example 3.18
+// Calculation of total power emitted
+// Page no 485
+
+clc;
+clear;
+close;
+
+//Given data
+r=0.7; // Emissivity
+r0=5.67*10^-8; // Stephen's constant
+A=10^-4; // Surface area
+T=2000; // Temperature
+
+// Total power emitted
+P=r*r0*A*T^4;
+
+//Display result on command window
+printf("\n Total power emitted (Watts)= %0.1f ",P);
+
|