3 files changed, 114 insertions, 0 deletions
diff --git a/3161/CH14/EX14.1/Ex14_1.sce b/3161/CH14/EX14.1/Ex14_1.sce
new file mode 100755
index 000000000..f7784bcdb
--- /dev/null
+++ b/3161/CH14/EX14.1/Ex14_1.sce
@@ -0,0 +1,48 @@
+clc;
+//page 738
+//problem 14.1
+
+//Boltzman constant  k = 1.3806488 × 10-23 m2 kg s-2 K-1
+k = 1.3806488 * 10^-23; 
+
+//Let room temperature be 27 C
+T = 27 + 273; 
+
+//Bandwidth BW = 10 MHz
+BW = 10 * 10 ^6;
+
+//For (a)
+//Let the equivalent resistance be Ra
+Ra = 10 + 10;
+
+//RMS Noise Voltage be Va
+Va = (4*k*T*Ra*BW)^0.5;
+
+disp('The rms voltage at output a is '+string(Va)+' Volt');
+
+//For (b)
+//Let the equivalent resistance be Rb
+Rb = (10 * 10)/(10+10);
+
+//RMS Noise Voltage be Vb
+Vb = (4*k*T*Rb*BW)^0.5;
+
+disp('The rms voltage at output b is '+string(Vb)+' Volt');
+
+//For (c)
+
+Rc = 10;
+C = 1*10^-9;
+
+//In the textbook, the author has forgotten to multiply the result with T, hence has obtained an erroneous result.
+//The given answer is 28.01uV but the correct answer is found out to be 1.2uV
+
+Vc_square = 2*k*integrate('Rc/(1 + (2*%pi*Rc*C*f)^2)','f',-10^7,10^7);
+Vc = Vc_square^0.5;
+
+disp('The rms voltage at output c is '+string(Vc)+' Volt');
+
+
+
+
+
diff --git a/3161/CH14/EX14.2/Ex14_2.sce b/3161/CH14/EX14.2/Ex14_2.sce
new file mode 100755
index 000000000..55272601b
--- /dev/null
+++ b/3161/CH14/EX14.2/Ex14_2.sce
@@ -0,0 +1,27 @@
+clc;
+//page 741
+//problem 14.2
+
+//The Antenna noise temperature is T_ant = 10 K
+T_ant = 10;
+
+//The reciever noise temperature is Te = 140 K
+Te = 140;
+
+//Midband available gain of reciever gao = 10^10
+gao = 10^10;
+
+//Noise bandwidth is BN = 1.5 * 10^5 Hz
+BN = 1.5 * 10^5;
+
+//Boltzman constant  k = 1.3806488 × 10-23 m2 kg s-2 K-1
+k = 1.3806488 * 10^-23; 
+
+//Available noise power at output is pao
+
+pao = gao*k*(T_ant + Te)*BN;
+
+disp('The available output noise power is '+string(pao)+' Watts');
+
+
+
diff --git a/3161/CH14/EX14.3/Ex14_3.sce b/3161/CH14/EX14.3/Ex14_3.sce
new file mode 100755
index 000000000..ce5d545bc
--- /dev/null
+++ b/3161/CH14/EX14.3/Ex14_3.sce
@@ -0,0 +1,39 @@
+clc;
+//page 748
+//problem 14.3
+
+//The distance d = 30 * 1.6 * 10^3 m;
+d = 30 * 1.6 * 10^3;
+
+//Frequency f = 4 * 10^9 Hz
+f = 4 * 10^9;
+
+//Wavelength w = c/f m 
+w = 3*10^8 / f;
+
+//Transmitter gain KT = 40 dB
+KT = 10^4;
+
+//Reciever gain KT = 40 dB
+KR = 10^4;
+
+//Reciever power PR = 10^-6 Watt
+PR = 10^-6;
+
+//Transmitter power PT
+PT = PR*(4*%pi*d/w)^2/ (KT*KR);
+
+disp('The transmitter output is '+string(PT)+' Watt')
+
+
+
+
+
+
+
+
+
+
+
+
+