summaryrefslogtreecommitdiff
path: root/1997/CH11/EX11.5/example5.sce
blob: 1e8d97971b635efb56a98cc6b6a07ae323ca315a (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
//Chapter-11 example 5
//=============================================================================
clc;
clear;
PW  =  2*10^-6//pulse width in sec
PRF =  1000//pulse repetitive frequency 
Pp  = 1*10^6;//peak power in watts

//Calculations
Dc  =  PW*PRF;//duty cycle
AvgTp = Pp*Dc;//average transmitted power in watts

//Output
mprintf('Average Transmitted power is %g KW',AvgTp/1000);

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