path: root/2863/CH2/EX2.10/ex2_10.sce

//chapter 2
//Rrad=36.5ohm
//Irms=Im/sqrt(2)
printf("\n");
Im=1.22;//on applying Kvl
Pavg=36.5*(1.122/sqrt(2))^2;
printf("the average power is %gW",Pavg);