Resolução da questão do wattímetro

No SCILAB:

--> j = %i
 j  = 

   0. + i  

--> ZL = j*10
 ZL  = 

   0. + 10.i

--> ZR2 = 10
 ZR2  = 

   10.

--> Z1 = ZL + ZR2
 Z1  = 

   10. + 10.i

--> ZR1 =  5
 ZR1  = 

   5.

--> Z2 = (Z1 *ZR1)/(Z1 + ZR1)
 Z2  = 

   3.8461538 + 0.7692308i

--> ZC = -j*5
 ZC  = 

   0. - 5.i

--> Z3 = Z2 + ZC
 Z3  = 

   3.8461538 - 4.2307692i

--> I = (12.99 + j*7.5)/Z3
 I  = 

   0.5576471 + 2.5634118i

--> [Im,Ia]=toPolar(I)
 Im  = 

   2.6233662
 Ia  = 

   77.727039

--> P = 15*2.6233662*cosd(30 - 77.73)
 P  = 

   26.468131

A potência também pode ser calculada como R.I²

--> P = 3.8461*Im*Im
 P  = 

   26.469053