diff options
| author | priyanka | 2015-06-24 15:03:17 +0530 |
|---|---|---|
| committer | priyanka | 2015-06-24 15:03:17 +0530 |
| commit | b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b (patch) | |
| tree | ab291cffc65280e58ac82470ba63fbcca7805165 /2863/CH2/EX2.41/ex2_41.sce | |
| download | Scilab-TBC-Uploads-b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b.tar.gz Scilab-TBC-Uploads-b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b.tar.bz2 Scilab-TBC-Uploads-b1f5c3f8d6671b4331cef1dcebdf63b7a43a3a2b.zip | |
initial commit / add all books
Diffstat (limited to '2863/CH2/EX2.41/ex2_41.sce')
| -rwxr-xr-x | 2863/CH2/EX2.41/ex2_41.sce | 15 |
1 files changed, 15 insertions, 0 deletions
diff --git a/2863/CH2/EX2.41/ex2_41.sce b/2863/CH2/EX2.41/ex2_41.sce new file mode 100755 index 000000000..d6cb30b59 --- /dev/null +++ b/2863/CH2/EX2.41/ex2_41.sce @@ -0,0 +1,15 @@ +//chapter 2
+//Etheta=n0Im/2pir*cos(pi/2 cos(theta)/sin(theta))
+printf("\n");
+Pin=100;
+n=0.5;
+r=500;
+Prad=n*Pin;
+printf("the radiated power is %gW",Prad);
+Rrad=73;//for half wave dipole
+Im=sqrt((2*Prad)/Rrad);
+n0=120*(%pi);
+Etheta=(cos((%pi/2)*cos(%pi/3))/sin(%pi/3))*n0*(Im/(2*(%pi)*r));
+printf("\nthe electric field is given by %gV/m",Etheta);
+Pavg=(0.5*(Etheta)^2)/(n0);
+printf("\nthe average power is %gW",Pavg);
|