diff options
Diffstat (limited to '3850/CH40/EX40.4/Ex40_4.sce')
| -rw-r--r-- | 3850/CH40/EX40.4/Ex40_4.sce | 16 |
1 files changed, 16 insertions, 0 deletions
diff --git a/3850/CH40/EX40.4/Ex40_4.sce b/3850/CH40/EX40.4/Ex40_4.sce new file mode 100644 index 000000000..c111a7184 --- /dev/null +++ b/3850/CH40/EX40.4/Ex40_4.sce @@ -0,0 +1,16 @@ + +//To Find the Intensity of Wave discussed in example 40.3
+
+//Example 40.4
+
+clear;
+
+clc;
+
+Uav=1.1*10^-8;//Average Energy Density in J/m^3
+
+c=3*10^8;//Speed of Light in m/s
+
+I=Uav*c;//Intensity of the Wave in W/m^2
+
+printf("Intensity of the wave = %.1f W/m^2",I);
|