summaryrefslogtreecommitdiff
path: root/3446/CH10/EX10.3/Ex10_3.sce
blob: 09648dbc40976e52650d9ee4d6b74cc4f90c7b9e (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
// Exa 10.3
// To calculate gain of antenna.

clc;
clear all;

Pin=12;  //Input power in watts
Ploss=3;  //resistive losses in Watts
D=5;  //Directivity

//solution
Eff=(Pin-Ploss)/Pin;
G=Eff*D;
printf('Gain of the antenna is %.2f dB = %.2f \n',10*log10(G),G);