summaryrefslogtreecommitdiff
path: root/1997/CH11/EX11.12/example12.sce
blob: b2b6dc9d532da4eed9e885f2bf468dc13f29414c (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
//Chapter-11 example 12
//=============================================================================
clc;
clear;
//input data
PRF   =  2000;//pulse repetition frequency per second
PW    =  1*10^-6;//pulse width in sec
Pp    =  500*10^3;//Peak power in watts

//Calculations
Dc    =  PW*PRF;//Duty Cycle
Pav   =  Pp*Dc;//average power in watts
pavdB = 10*log10(Pav);

//Output

mprintf('Average power is %g KW\n Average Power is %g dB',Pav/1000,pavdB);

//=============end of the program==============================================