summaryrefslogtreecommitdiff
path: root/1997/CH11/EX11.12/example12.sce
diff options
context:
space:
mode:
Diffstat (limited to '1997/CH11/EX11.12/example12.sce')
-rwxr-xr-x1997/CH11/EX11.12/example12.sce19
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==============================================