summaryrefslogtreecommitdiff
path: root/2863/CH2/EX2.4/ex2_4.sce
blob: 8e096cee705d26c2eb510b19b2c007614742aeff (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
//chapter 2
//Prad=80*(pi)^2*(dl/lambda)*(Irms)^2;
printf("\n");
frequency=100*10^6;
lamda=(3*10^8)/(100*10^6);//lamda=c/f;
printf("the wavelength is %dm",lamda);
Prad=100;
printf("\nthe Radiated power is %dW",Prad);
dl=0.01;
printf("\nthe elemental length is %gm",dl);
Irms2=(3/0.01)^2*100/(80*(%pi)^2);
Irms=sqrt(Irms2);
printf("\nthe Irms current is %gA",Irms)