summaryrefslogtreecommitdiff
path: root/3739/CH6/EX6.17/EX6_17.sce
blob: 7f5e14ad49ab586651b092c64050eef385c383ca (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
//Chapter 6, Example 6.17, page 271
clc


//Initialisation
pt=30                                      //transmitter power in watt
d=15                                      //distance in km
gt=3                                       //transmitter gain
ht=30                                      //transmitter height in m
hr=4                                       //receiver height in m
no=3.77*10**14

//Calculation
gt1=10**(gt*10**-1)
pt1=gt1*pt
e=88*sqrt(pt1)*pt*hr/(2*d**2)                //Field strength
pr1=(e**2)/(2*no)                            //Recieved power

//Results
printf("Field strength = %f V/m",e)
printf("\nRecieved power = %.2f pW",(pr1*10**12))