8 files changed, 72 insertions, 0 deletions
diff --git a/995/CH13/EX13.1/Ex13_1.sce b/995/CH13/EX13.1/Ex13_1.sce
new file mode 100755
index 000000000..420dcba78
--- /dev/null
+++ b/995/CH13/EX13.1/Ex13_1.sce
@@ -0,0 +1,8 @@
+//Ex:13.1
+clc;
+clear;
+close;
+c=3*10^8;
+wl=15;
+f=c/wl;
+printf("The frequency =%d Hz",f);
+\ No newline at end of file
diff --git a/995/CH13/EX13.2/Ex13_2.sce b/995/CH13/EX13.2/Ex13_2.sce
new file mode 100755
index 000000000..e60c17cba
--- /dev/null
+++ b/995/CH13/EX13.2/Ex13_2.sce
@@ -0,0 +1,8 @@
+//Ex:13.2
+clc;
+clear;
+close;
+c=3*10^8;
+f=150*10^6;
+wl=c/f;
+printf("The wavelength =%d m",wl);
+\ No newline at end of file
diff --git a/995/CH13/EX13.3/Ex13_3.sce b/995/CH13/EX13.3/Ex13_3.sce
new file mode 100755
index 000000000..ea7196fbb
--- /dev/null
+++ b/995/CH13/EX13.3/Ex13_3.sce
@@ -0,0 +1,8 @@
+//Ex:13.3
+clc;
+clear;
+close;
+wl=8;
+f=30*10^6;
+v=f*wl;
+printf("The veocity of propagation =%d m/s",v);
+\ No newline at end of file
diff --git a/995/CH13/EX13.4/Ex13_4.sce b/995/CH13/EX13.4/Ex13_4.sce
new file mode 100755
index 000000000..e08a1b2ff
--- /dev/null
+++ b/995/CH13/EX13.4/Ex13_4.sce
@@ -0,0 +1,9 @@
+//Ex:13.4
+clc;
+clear;
+close;
+f_rf=162.5;//in kHz
+f_af=1.25;//in kHz
+f_bfo_max=f_rf+f_af;
+f_bfo_min=f_rf-f_af;
+printf("The two possible BFO freq. =%f kHz and %f kHz",f_bfo_max,f_bfo_min);
+\ No newline at end of file
diff --git a/995/CH13/EX13.5/Ex13_5.sce b/995/CH13/EX13.5/Ex13_5.sce
new file mode 100755
index 000000000..fd1610db4
--- /dev/null
+++ b/995/CH13/EX13.5/Ex13_5.sce
@@ -0,0 +1,10 @@
+//Ex:13.5
+clc;
+clear;
+close;
+f_rf_1=88;//in MHz
+f_rf_2=108;//in MHz
+f_if=10.7;//in MHz
+f_lo_1=f_rf_1+f_if;
+f_lo_2=f_rf_2+f_if;
+printf("The range local oscillator be tuned =%f MHz & %f MHz",f_lo_1,f_lo_2);
+\ No newline at end of file
diff --git a/995/CH13/EX13.6/Ex13_6.sce b/995/CH13/EX13.6/Ex13_6.sce
new file mode 100755
index 000000000..36e061031
--- /dev/null
+++ b/995/CH13/EX13.6/Ex13_6.sce
@@ -0,0 +1,10 @@
+//Ex:13.6
+clc;
+clear;
+close;
+f_rf_1=88;//in MHz
+f_rf_2=108;//in MHz
+f_if=10.7;//in MHz
+f_lo_1=f_rf_1+f_if;
+f_lo_2=f_rf_2+f_if;
+printf("The range local oscillator be tuned =%f MHz & %f MHz",f_lo_1,f_lo_2);
+\ No newline at end of file
diff --git a/995/CH13/EX13.7/Ex13_7.sce b/995/CH13/EX13.7/Ex13_7.sce
new file mode 100755
index 000000000..1260729f1
--- /dev/null
+++ b/995/CH13/EX13.7/Ex13_7.sce
@@ -0,0 +1,8 @@
+//Ex:13.7
+clc;
+clear;
+close;
+r=12;//in ohms
+i=0.5;//in amps
+P_r=i*i*r;//in W
+printf("Power radiated = %d W",P_r);
+\ No newline at end of file
diff --git a/995/CH13/EX13.8/Ex13_8.sce b/995/CH13/EX13.8/Ex13_8.sce
new file mode 100755
index 000000000..0657c5115
--- /dev/null
+++ b/995/CH13/EX13.8/Ex13_8.sce
@@ -0,0 +1,11 @@
+//Ex:13.8
+clc;
+clear;
+close;
+r=2;//in ohms
+i=0.5;//in amps
+P_r=4;//in W
+P_loss=i*i*r;
+P_eff=(P_r/(P_r+P_loss))*100;
+printf("The power loss = %f W",P_loss);
+printf("\n The power loss = %f %%",P_eff);
+\ No newline at end of file