3 files changed, 29 insertions, 0 deletions
diff --git a/42/CH14/EX14.1/sadiku_14_1.sce b/42/CH14/EX14.1/sadiku_14_1.sce
new file mode 100755
index 000000000..4b5cc8994
--- /dev/null
+++ b/42/CH14/EX14.1/sadiku_14_1.sce
@@ -0,0 +1,10 @@
+clear;
+clc;
+S11=.85*(cosd(-30)+%i*sind(-30));
+S12=.07*(cosd(56)+%i*sind(56));
+S21=1.68*(cosd(120)+%i*sind(120));
+S22=.85*(cosd(-40)+%i*sind(-40));
+Zl=75,Zo=75;
+Tl=(Zl-Zo)/(Zl+Zo);
+Ti=S11+ (S12*S21*Tl)/(1-S22*Tl);
+disp(Ti,'Input reflection coefficient=')
+\ No newline at end of file
diff --git a/42/CH14/EX14.2/sadiku_14_2.sce b/42/CH14/EX14.2/sadiku_14_2.sce
new file mode 100755
index 000000000..d80bdc0fa
--- /dev/null
+++ b/42/CH14/EX14.2/sadiku_14_2.sce
@@ -0,0 +1,11 @@
+clear;
+clc;
+format('v',6)
+d=80*(10)^-6;
+n1=1.62,NA=.21,L=8*(10)^-7 ;
+P=asind(NA);
+disp(P,'Acceptance angle');
+n2=sqrt(n1^2 - NA^2);
+disp(n2,'Refractive index');
+V=(%pi*d/L)*sqrt(n1^2 - n2^2);
+disp(V,'No of modes');
diff --git a/42/CH14/EX14.3/sadiku_14_3.sce b/42/CH14/EX14.3/sadiku_14_3.sce
new file mode 100755
index 000000000..6b3a9caab
--- /dev/null
+++ b/42/CH14/EX14.3/sadiku_14_3.sce
@@ -0,0 +1,8 @@
+clear;
+clc;
+a=.25;
+P=1-.4;
+l=(10/a)*log10(1/P);
+disp(l,'Distance travelled in Km');
+
+