summaryrefslogtreecommitdiff
path: root/2863/CH2/EX2.17/ex2_17.sce
diff options
context:
space:
mode:
Diffstat (limited to '2863/CH2/EX2.17/ex2_17.sce')
-rwxr-xr-x2863/CH2/EX2.17/ex2_17.sce16
1 files changed, 16 insertions, 0 deletions
diff --git a/2863/CH2/EX2.17/ex2_17.sce b/2863/CH2/EX2.17/ex2_17.sce
new file mode 100755
index 000000000..e6e56cd70
--- /dev/null
+++ b/2863/CH2/EX2.17/ex2_17.sce
@@ -0,0 +1,16 @@
+//chapter 2
+//efficiency=Prad/Pinput
+//efficiency=0.95,Umax=0.5W/sr,D=Umax/[Prad/4*pi];
+//part (i)
+printf("\n");
+Pinput=0.4;
+n=0.95;
+Umax=0.5;
+Prad=n*Pinput;
+printf("the radiated power is %gW",Prad);
+D=0.5/(0.38/(4*(%pi)));
+printf("\nthe directivity is %g",D);
+//part(ii)
+Prad=0.3;
+D=0.5/(0.3/(4*(%pi)));
+printf("\nthe directivity is%g",D);