summaryrefslogtreecommitdiff
path: root/3161/CH14/EX14.3/Ex14_3.sce
blob: ce5d545bc0d53b7f7dd3f89a5ec3967e1898057d (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
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')