//Example_a_7_9 page no:277
clc;
Vabmag=100*3/7;
Vabang=0;
Zab=(%i*5)+(((%i*4)*(%i*3))/(%i*7));
Ilmag=42.86/11.71;
Ilang=0-90;
disp(Ilmag,"the magnitude of current passing through 5i ohm impedence is (in A)");
disp(Ilang,"the angle of current passing through 5i ohm impedence is (in degree)");