summaryrefslogtreecommitdiff
path: root/2863/CH2/EX2.40/ex2_40.sce
blob: 8d2148d997f42652a2f34be5992ec06de5bd0f2d (plain)
1
2
3
4
5
6
7
//chapter 2
printf("\n");
Rloss=1;
Ra=73;
Im=14.166*10^-3;//on applying kvl
Prad=(Im/sqrt(2))^2*(Rloss+Ra);
printf("the radiated power is %gW",Prad);