1 files changed, 21 insertions, 0 deletions
diff --git a/3788/CH4/EX4.2.1/Ex4_2_1.sce b/3788/CH4/EX4.2.1/Ex4_2_1.sce
new file mode 100644
index 000000000..745fd4be2
--- /dev/null
+++ b/3788/CH4/EX4.2.1/Ex4_2_1.sce
@@ -0,0 +1,21 @@
+
+//example 4.2.1
+//Calculate the Flux Density and Power received 
+
+//Variables
+clc
+clear
+D = 40000
+gain = 17              //gain  is in dB
+Gt = 50
+A = 10                            //effective area of antenna
+Pt = 10                           //transmitted power
+R = 4*(10)^7
+
+//Calculation
+F=(Pt*Gt)/(4*%pi*R^2)             //flux density equation 
+Pr = Pt/A                            //Received Power
+
+//Result
+printf("The flux density is %f Watts per sqm \n",F)
+printf("The power received by antenna is %f Watts",Pr)