1 files changed, 24 insertions, 0 deletions
diff --git a/3281/CH2/EX2.17/ex2_17.sce b/3281/CH2/EX2.17/ex2_17.sce
new file mode 100755
index 000000000..7727189d8
--- /dev/null
+++ b/3281/CH2/EX2.17/ex2_17.sce
@@ -0,0 +1,24 @@
+//Page Number: 103
+//Example 2.17
+clc;
+//Given
+a=2; //cm
+a1=1/100; //m
+b=1; //cm
+b1=b/100; //m
+p=10D-3; //W
+c=3D+8; //m/s
+f0=10D+9; //Hz
+
+//Peak value of electric field
+fc=c/(2*a);
+E02=(4*p*377)/(a1*b1*sqrt(1-(fc/f0)^2));
+E0=sqrt(E02);
+disp('V/m',E0,'Peak value of electric field:');
+
+//Maximum power transmitted
+Ed=3D+6; //V/m
+Pt=2.6D+13*(Ed/f0)^2;
+disp('kW',Pt/1000,'Maximum power transmitted:');
+
+//Answer is given as 2300kW but it is 2340kW