diff options
Diffstat (limited to '1997/CH11/EX11.12/example12.sce')
-rwxr-xr-x | 1997/CH11/EX11.12/example12.sce | 19 |
1 files changed, 19 insertions, 0 deletions
diff --git a/1997/CH11/EX11.12/example12.sce b/1997/CH11/EX11.12/example12.sce new file mode 100755 index 000000000..b2b6dc9d5 --- /dev/null +++ b/1997/CH11/EX11.12/example12.sce @@ -0,0 +1,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==============================================
|