//Example_a_7_18 page no:285 clc; Vimag=10; Viang=0; Iscmag=9; Iscang=90; Vocmag=9*Vimag; Vocang=Viang; Zthmag=Vocmag/Iscmag; Zthang=Vocang-Iscang; Imag=Vocmag/8; Iang=Vocang-(-90); disp(Imag,"the magnitude of current passing through 2i ohm resistor is (in A)"); disp(Iang,"the angle of current passing through 2i ohm resistor is (in degree)");