diff options
Diffstat (limited to '3673/CH7')
23 files changed, 391 insertions, 0 deletions
diff --git a/3673/CH7/EX7.1/Ex7_1.sce b/3673/CH7/EX7.1/Ex7_1.sce new file mode 100644 index 000000000..a4efdda2e --- /dev/null +++ b/3673/CH7/EX7.1/Ex7_1.sce @@ -0,0 +1,20 @@ +//Example 7_1 page no:253
+clc
+function [r,th]=rect2pol(x,y)
+//rectangle to polar coordinate conversion
+r=sqrt(x^2+y^2);
+th=atan(y,x)*180/3.14;
+endfunction
+mat=[6+(%i*4),-6;-6,8+(%i*3)]
+val=[5,0]
+I=inv(mat)'*val'
+I1=I(1,1)
+I2=I(2,1)
+disp("the current in loop 1 is ")
+[mag,theta]=rect2pol(real(I1),imag(I1))
+disp(mag,"Magnitude of current is (in A)")
+disp(-theta,"Phase angle of current is (in degree)")
+disp("the current in loop 2 is ")
+[mag,theta]=rect2pol(real(I2),imag(I2))
+disp(mag,"Magnitude of current is (in A)")
+disp(-theta,"Phase angle of current is (in degree)")
diff --git a/3673/CH7/EX7.3/Ex7_3.sce b/3673/CH7/EX7.3/Ex7_3.sce new file mode 100644 index 000000000..91a72f18a --- /dev/null +++ b/3673/CH7/EX7.3/Ex7_3.sce @@ -0,0 +1,17 @@ +//Example 7_3 page no:257
+clc
+mag1=1.67//magnitude for current
+mag2=-1.25
+ang1=-90//angle for current
+ang2=90
+mag=mag1/mag2
+ang=ang1-ang2
+disp(mag,"magnitude for Vb is(in volt)")
+disp(ang,"degree for Vb is (in degree)")
+mag1=1.67//magnitude for current
+mag2=0.33
+ang1=-90-14.5//angle for current
+mag=mag1/mag2
+disp(mag,"magnitude for Va is(in volt)")
+disp(ang1,"degree for Va is (in degree)")
+//Va value is calculated wrongly in text book
diff --git a/3673/CH7/EX7.5/Ex7_5.sce b/3673/CH7/EX7.5/Ex7_5.sce new file mode 100644 index 000000000..0600011c2 --- /dev/null +++ b/3673/CH7/EX7.5/Ex7_5.sce @@ -0,0 +1,24 @@ +//Example 7_5 page no:263
+clc;
+Vmag=50;
+Vang=0;
+Rmag=9.22;
+Rang=77.47;
+Imag=Vmag/Rmag;
+Iang=Vang-Rang;
+V1mag=5.42*5.38;//voltage across (2+j5)ohm
+V1ang=-77.47+68.19;
+I2mag=(20*4)/9.22;
+I2ang=120-77.47;
+V2mag=I2mag*5.38;//voltage across (2+j5)ohm due to current I2 is
+V2ang=42.53+68.19;
+V1rel=V1mag*(cosd(V1ang));
+V1img=V1mag*(sind(V1ang));
+V2rel=V2mag*(cosd(V2ang));
+V2img=V2mag*(sind(V2ang));
+Vrel=V1rel+V2rel;
+Vimg=V1img+V2img;
+Vfmag=sqrt((Vrel*Vrel)+(Vimg*Vimg));
+Vfang=atand(Vimg/Vrel);
+disp(Vfmag,"magnitude of voltage across(2+5j)ohm is(in V)");
+disp(Vfang,"angle of voltage across (2+5j)ohm is(in degree)");
diff --git a/3673/CH7/EX7.6/Ex7_6.sce b/3673/CH7/EX7.6/Ex7_6.sce new file mode 100644 index 000000000..82f1b8238 --- /dev/null +++ b/3673/CH7/EX7.6/Ex7_6.sce @@ -0,0 +1,12 @@ +//Example 7_6 page no:265
+clc;
+Vmag=(50*7.21)/7.28;//Voltage across(4+j6)ohm
+Vang=0+56.3-15.95;
+Zrel=4.83;
+Zimg=1-1.095;
+Zmag=sqrt((Zrel*Zrel)+(Zimg*Zimg));
+Zang=atand(Zimg/Zrel);
+disp(Vmag,"magnitude of thevenin voltage is(in V)");
+disp(Vang,"angle of thevenin voltage is(in degree)");
+disp(Zmag,"magnitude of thevenin impedence is(in ohm)");
+disp(Zang,"angle of thevenin impedence is(in degree)");
diff --git a/3673/CH7/EX7.7/Ex7_7.sce b/3673/CH7/EX7.7/Ex7_7.sce new file mode 100644 index 000000000..469e24d41 --- /dev/null +++ b/3673/CH7/EX7.7/Ex7_7.sce @@ -0,0 +1,10 @@ +//Example 7_7 page no:267
+clc;
+Inmag=25/5;//norton current
+Inang=0-53.13;
+Znmag=(5*6.4)/7.04;//norton impedence
+Znang=(53.13-51.34+8.13);
+disp(Inmag,"magnitude of norton current is(in A)");
+disp(Inang,"angle of norton current is(in degree)");
+disp(Znmag,"magnitude of norton impedence is (in ohm)");
+disp(Znang,"angle of norton impedence is (in degree)");
diff --git a/3673/CH7/EX7.8/Ex7_8.sce b/3673/CH7/EX7.8/Ex7_8.sce new file mode 100644 index 000000000..23d4c96ea --- /dev/null +++ b/3673/CH7/EX7.8/Ex7_8.sce @@ -0,0 +1,8 @@ +//Example 7_8 page no:268
+clc;
+Zrel=15;
+Zimg=-20;
+Imag=50/30;
+Iang=0-0;
+P=(Imag*Imag)*Zrel//maximum power delivered
+disp(P,"the maximum power delivered to the load is (in W)");//Imag^2 val is rounded in text book so answer vary by 0.333
diff --git a/3673/CH7/EX7.a.1/Example_a_7_1.sce b/3673/CH7/EX7.a.1/Example_a_7_1.sce new file mode 100644 index 000000000..6baf8504d --- /dev/null +++ b/3673/CH7/EX7.a.1/Example_a_7_1.sce @@ -0,0 +1,17 @@ +//Example_a_7_1 page no:269
+clc;
+R=2;
+C=-2*%i;
+L1=8*%i;
+L2=6*%i;
+V=5/(0.5+(1/L1)+(1/(4*%i)));
+Vmag=sqrt(real(V)^2+imag(V)^2);
+Vang=atand(imag(V)/real(V));
+Vabmag=Vmag*6/4;
+Vabang=Vang;
+disp(Vabmag,"the magnitude of voltage across AB is (in V)");
+disp(Vabang,"the angle of voltage across AB is (in degree)");
+Iamag=Vmag/2;
+Iaang=Vang-(-90);
+disp(Iamag,"the magnitude of short circuited current through terminals AB is (in A)");
+disp(Iaang,"the angle of short circuited current through terminals AB is (in degree)");
diff --git a/3673/CH7/EX7.a.10/Example_a_7_10.sce b/3673/CH7/EX7.a.10/Example_a_7_10.sce new file mode 100644 index 000000000..b3aaed5b4 --- /dev/null +++ b/3673/CH7/EX7.a.10/Example_a_7_10.sce @@ -0,0 +1,26 @@ +//Example_a_7_10 page no:278
+clc;
+V_j4mag=20/2.83;
+V_j4ang=0-45;
+V10mag=10;
+V10ang=0;
+V5mag=5;
+V5ang=90;
+V_j4real=V_j4mag*cosd(V_j4ang);
+V_j4imag=V_j4mag*sind(V_j4ang);
+V_j4=V_j4real+(%i*V_j4imag);
+V10real=V10mag*cosd(V10ang);
+V10imag=V10mag*sind(V10ang);
+V10=V10real+(%i*V10imag);
+V5real=V5mag*cosd(V5ang);
+V5imag=V5mag*sind(V5ang);
+V5=V5real+(%i*V5imag);
+Vab=-V10+V5-V_j4;
+Vabmag=sqrt(real(Vab)^2+imag(Vab)^2);
+Vabang=atand(imag(Vab)/real(Vab));
+Vabang=180+Vabang;
+disp(Vabmag,"the magnitude of thevenin voltage is (in V)");
+disp(Vabang,"the angle of thevenin voltage is (in degree)");
+Zab=4+((2+(%i*6))*(-%i*4)/(2+(%i*2)));
+disp(Zab,"the thevenin impedance is (in ohm)");
+//imaginary part of Zab varies slightly with text book hece textbook uses a rounded off value
diff --git a/3673/CH7/EX7.a.11/Example_a_7_11.sce b/3673/CH7/EX7.a.11/Example_a_7_11.sce new file mode 100644 index 000000000..48ed2268c --- /dev/null +++ b/3673/CH7/EX7.a.11/Example_a_7_11.sce @@ -0,0 +1,10 @@ +//Example_a_7_11 page no:278
+clc;
+Zab=((%i*3)*(%i*-2))/((%i*3)-(%i*2));
+In=((10/3*%i)+(5*%i/-2*%i));
+Il=-(In*Zab)/(5-6*%i);
+Ilmag=sqrt(real(Il)^2+imag(Il)^2);
+Ilang=atand(imag(Il)/real(Il));
+Ilang=Ilang-180;//converting the angle to negative hence value does not change
+disp(Ilmag,"the magnitude of load current is (in A)");
+disp(Ilang,"the angle of load current is (in degree)");
diff --git a/3673/CH7/EX7.a.12/Example_a_7_12.sce b/3673/CH7/EX7.a.12/Example_a_7_12.sce new file mode 100644 index 000000000..6184d5e56 --- /dev/null +++ b/3673/CH7/EX7.a.12/Example_a_7_12.sce @@ -0,0 +1,12 @@ +//Example_a_7_12 page no:279
+clc;
+I_mag=30;
+I_ang=30;
+R1=5;
+X1=(6*%i);
+In_mag=I_mag;
+In_ang=I_ang;
+Zn=R1+X1;
+disp(In_mag,"the magnitude of norton current is (in A)");
+disp(In_ang,"the angle of norton current is (in degree)");
+disp(Zn,"the norton impedence is (in ohm)");
diff --git a/3673/CH7/EX7.a.13/Example_a_7_13.sce b/3673/CH7/EX7.a.13/Example_a_7_13.sce new file mode 100644 index 000000000..4df712d54 --- /dev/null +++ b/3673/CH7/EX7.a.13/Example_a_7_13.sce @@ -0,0 +1,20 @@ +//Example_a_7_13 page no:280
+clc;
+V_abmag=20;
+V_abang=0;
+V_abreal=20;
+V_abimag=0;
+V__abmag=5*5;
+V__abang=0+53.13;
+V__abreal=15;
+V__abimag=19.99;
+V___abmag=0;
+V___abang=0;
+//calculating the voltage across AB
+Vab=V_abreal+V__abreal+(V_abimag+V__abimag)*%i;
+Vabmag=sqrt(real(Vab)^2+imag(Vab)^2)
+Vabang=atand(imag(Vab)/real(Vab));
+Zth=3+4*%i;
+disp(Vabmag,"the magnitude of voltage across AB is (in V)");
+disp(Vabang,"the angle of voltage across AB is (in degree)");
+disp(Zth,"the impedance across terminals AB is (in ohm)");
diff --git a/3673/CH7/EX7.a.14/Example_a_7_14.sce b/3673/CH7/EX7.a.14/Example_a_7_14.sce new file mode 100644 index 000000000..e4dd3d85c --- /dev/null +++ b/3673/CH7/EX7.a.14/Example_a_7_14.sce @@ -0,0 +1,23 @@ +//Example_a_7_14 page no:281
+clc;
+Zab=((5*(%i*10))/(5+(%i*10)))+((7*(-%i*20))/(7-(%i*20)));
+I1=100/(5+(%i*10));
+I2=100/(7-(%i*20));
+Vamag=8.94*10;
+Vaang=-63.43+90;
+Vbmag=4.72*20;
+Vbang=70.7-90;
+Vareal=Vamag*cosd(Vaang);
+Vaimag=Vamag*sind(Vaang);
+Va=Vareal+(%i*Vaimag);
+Vbreal=Vbmag*cosd(Vbang);
+Vbimag=Vbmag*sind(Vbang);
+Vb=Vbreal+(%i*Vbimag);
+Vab=Va-Vb;
+Vth=Vab;
+Z=10.22+0.19*%i;
+I=Vth/(Zab+Z);
+Imag=sqrt(real(I)^2+imag(I)^2);
+P=Imag^2*real(Z);
+disp(P,"the maximum power delivered to the load is (in W)");
+//power varies slightly due to values are rounded off in text book
diff --git a/3673/CH7/EX7.a.15/Example_a_7_15.sce b/3673/CH7/EX7.a.15/Example_a_7_15.sce new file mode 100644 index 000000000..001ff6637 --- /dev/null +++ b/3673/CH7/EX7.a.15/Example_a_7_15.sce @@ -0,0 +1,11 @@ +//Example_a_7_15 page no:282
+clc;
+Rs=2;
+Rl=20;
+Zt=Rs-%i*5+Rl;
+Vs=50;
+I=Vs/Zt;
+Imag=sqrt(real(I)^2+imag(I)^2);
+P=Imag^2*Rl;
+disp(P,"the maximum power transferred is (in W)");
+//power varies slightly due to values are rounded off in text book
diff --git a/3673/CH7/EX7.a.16/Example_a_7_16.sce b/3673/CH7/EX7.a.16/Example_a_7_16.sce new file mode 100644 index 000000000..8521c5c15 --- /dev/null +++ b/3673/CH7/EX7.a.16/Example_a_7_16.sce @@ -0,0 +1,7 @@ +//Example_a_7_16 page no:283
+clc;
+I2=0;
+Vmag=30*5/14.14;
+Vang=90-45;
+disp(Vmag,"the magnitude of voltage is (in V)");
+disp(Vang,"the angle of voltage is (in degree)");
diff --git a/3673/CH7/EX7.a.18/Example_a_7_18.sce b/3673/CH7/EX7.a.18/Example_a_7_18.sce new file mode 100644 index 000000000..0c4834b8a --- /dev/null +++ b/3673/CH7/EX7.a.18/Example_a_7_18.sce @@ -0,0 +1,14 @@ +//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)");
diff --git a/3673/CH7/EX7.a.19/Example_a_7_19.sce b/3673/CH7/EX7.a.19/Example_a_7_19.sce new file mode 100644 index 000000000..798fb7b1a --- /dev/null +++ b/3673/CH7/EX7.a.19/Example_a_7_19.sce @@ -0,0 +1,13 @@ +//Example_a_7_19 page no:285
+clc;
+i=((100/(4+%i*10))-((5*4*%i)/(4+%i*10)));
+Voc=100-(4*(3.55-1.48*%i));
+Isc=25+50*%i;
+Zth=Voc/Isc;
+Z=conj(Zth);
+disp(Z,"the value of load that will receive maximum power is (in ohm)");
+I=Voc/(Zth+Z);
+Imag=sqrt(real(I)^2+imag(I)^2);
+P=Imag^2*real(Z);
+disp(P,"the maximum power delivered to the load is (in W)");
+//power values varies with textbook hence textbook uses rounded off values
diff --git a/3673/CH7/EX7.a.2/Example_a_7_2.sce b/3673/CH7/EX7.a.2/Example_a_7_2.sce new file mode 100644 index 000000000..4fde979a0 --- /dev/null +++ b/3673/CH7/EX7.a.2/Example_a_7_2.sce @@ -0,0 +1,32 @@ +//Example_a_7_2 page no:270
+clc;
+Rab=3+(4*%i);
+Rabmag=sqrt(real(Rab)^2+imag(Rab)^2);
+Rabang=atand(imag(Rab)/real(Rab));
+Rbc=%i*4;
+Vmag=100;
+Vang=-45;
+Vreal=Vmag*cosd(Vang);
+Vimag=Vmag*sind(Vang);
+V=Vreal+(%i*Vimag);
+A=[(3+(%i*8)),(-%i*4)
+ (-%i*4),(%i*2)];
+B=[V,
+ 0];
+X=inv(A)*B;
+X1mag=sqrt(real(X(1))^2+imag(X(1))^2);
+X1ang=-atand(imag(X(1))/real(X(1)));
+X2mag=sqrt(real(X(2))^2+imag(X(2))^2);
+X2ang=atand(imag(X(2))/real(X(2)));
+//calculating the voltages across ab
+Vabmag=Rabmag*X1mag;
+Vabang=Rabang+X1ang;
+disp(Vabmag,"the magnitude of voltage across ab is (in V)");
+disp(Vabang,"the angle of voltage across ab is (in degree)");
+//calculating the voltages across bc
+Vbc=(X(2)-X(1))*Rbc;
+Vbcmag=sqrt(real(Vbc)^2+imag(Vbc)^2);
+Vbcang=atand(imag(Vbc)/real(-Vbc));
+disp(Vbcmag,"the magnitude of voltage across bc is (in V)");
+disp(Vbcang,"the angle of voltage across bc is (in degree)");
+
diff --git a/3673/CH7/EX7.a.3/Example_a_7_3.sce b/3673/CH7/EX7.a.3/Example_a_7_3.sce new file mode 100644 index 000000000..680fb3ec2 --- /dev/null +++ b/3673/CH7/EX7.a.3/Example_a_7_3.sce @@ -0,0 +1,21 @@ +//Example_a_7_3 page no:271
+clc;
+Vmag=10;
+Vang=0;
+R1=-%i*5;
+R2=4-(%i*5);
+R1mag=sqrt(real(R1)^2+imag(R1)^2);
+R2mag=sqrt(real(R2)^2+imag(R2)^2);
+R2ang=atand(imag(R2)/real(R2));
+Ztmag=6.24;
+Ztang=29.26;
+Itmag=Vmag/Ztmag;
+Itang=Vang-Ztang;
+Inmag=Itmag*R1mag/R2mag;
+In=0.466-(%i*1.149);
+Zn=4+((3+(%i*5))*(-%i*5)/3);
+I2ohm=In*(12.33-(%i*5))/(12.33+2-(%i*5)+(%i*5));
+I2ohm_mag=sqrt(real(I2ohm)^2+imag(I2ohm)^2);//current is calculated for calculating power
+I2ohm_ang=atand(imag(I2ohm)/real(I2ohm));
+P=I2ohm_mag^2*2;
+disp(P,"the power in the 2+5j ohm impedence is (in W)");
diff --git a/3673/CH7/EX7.a.4/Example_a_7_4.sce b/3673/CH7/EX7.a.4/Example_a_7_4.sce new file mode 100644 index 000000000..a5264c484 --- /dev/null +++ b/3673/CH7/EX7.a.4/Example_a_7_4.sce @@ -0,0 +1,41 @@ +//Example_a_7_4 page no:272
+clc;
+V_1mag=100;
+V_1ang=0;
+Z_1mag=14.28;
+Z_1ang=4.64;
+Ztmag=8.46;
+Ztang=-19.6;
+I_1mag=V_1mag/Z_1mag;
+I_1ang=V_1ang-Z_1ang;
+I_1real=I_1mag*cosd(I_1ang);
+I_1imag=I_1mag*sind(I_1ang);
+I_1=I_1real+(I_1imag*%i);
+I_2=((I_1)*(5-(%i*5)))/(5-(5*%i)+3+(%i*4));
+I_3=((I_1)*(3+(%i*4)))/(8-(%i*1));
+Ztreal=Ztmag*cosd(Ztang);
+Ztimag=Ztang*sind(Ztang);
+Zt=Ztreal+(Ztimag*%i);
+I__3mag=50/8.46;
+I__3ang=30-(Ztang);
+I__3real=I__3mag*cosd(I__3ang);
+I__3imag=I__3mag*sind(I__3ang);
+I__3=I__3real+(%i*I__3imag);
+I__2=I__3*(10)/(10+3+(%i*4));
+I__1=I__3*(3+(%i*4))/(10+3+(%i*4));
+I1=I_1-I__1;
+I2=I_2+I__2;
+I3=I__3-I_3;
+I1mag=sqrt(real(I1)^2+imag(I1)^2);
+I2mag=sqrt(real(I2)^2+imag(I2)^2);
+I3mag=sqrt(real(I3)^2+imag(I3)^2);
+I1ang=atand(imag(I1)/real(I1));
+I2ang=atand(imag(I2)/real(I2));
+I3ang=atand(imag(I3)/real(I3));
+disp(I1mag,"the magnitude of current passing through 10 ohm resistor is (in A)");
+disp(I1ang,"the angle of current passing through 10 ohm resistor is (in degree)");
+disp(I2mag,"the magnitude of current passing through 3+4i ohm resistor is (in A)");
+disp(I2ang,"the angle of current passing through 3+4i ohm resistor is (in degree)");
+disp(I3mag,"the magnitude of current passing through 5-5i ohm resistor is (in A)");
+disp(I3ang,"the angle of current passing through 5-5i ohm resistor is (in degree)");
+//I3 magnitude and angle vary little hence values are rounded off in text book
diff --git a/3673/CH7/EX7.a.5/Example_a_7_5.sce b/3673/CH7/EX7.a.5/Example_a_7_5.sce new file mode 100644 index 000000000..c5f2a915d --- /dev/null +++ b/3673/CH7/EX7.a.5/Example_a_7_5.sce @@ -0,0 +1,11 @@ +//Example_a_7_5 page no:274
+clc;
+Rl=4;
+I=(50*(-%i*10))/((5-(%i*6)+3+(%i*4)-(10*%i)))
+V=I*(3+(3.99*%i));
+Zab=4+(%i*3.5);
+Vmag=sqrt(real(V)^2+imag(V)^2);
+I2=Vmag/8;
+P=I2^2*Rl;
+disp(P,"the maximum power delivered to the load is (in W)");
+//the power varies slightly in text book the value of V is rounded off so the result varies slightly
diff --git a/3673/CH7/EX7.a.6/Example_a_7_6.sce b/3673/CH7/EX7.a.6/Example_a_7_6.sce new file mode 100644 index 000000000..e0d350300 --- /dev/null +++ b/3673/CH7/EX7.a.6/Example_a_7_6.sce @@ -0,0 +1,15 @@ +//Example_a_7_6 page no:275
+clc;
+V=20;
+Vamag=16.27;
+Vaang=18.91;
+I2mag=Vamag/5.38;
+I2ang=Vaang-68.19;
+P2=I2mag^2*2;
+disp(P2,"the power dissipated at 2 ohm resistor is (in W)");
+I3=-0.65-(%i*1.58);
+I3mag=sqrt(real(I3)^2+imag(I3)^2);
+P3=I3mag^2*3;
+disp(P3,"the power dissipated in the 3 ohm resistor is (in W)");
+P=-V*I3mag*cosd(142);
+disp(P,"the power delivered by the source is (in W)");
diff --git a/3673/CH7/EX7.a.8/Example_a_7_8.sce b/3673/CH7/EX7.a.8/Example_a_7_8.sce new file mode 100644 index 000000000..4aed6b514 --- /dev/null +++ b/3673/CH7/EX7.a.8/Example_a_7_8.sce @@ -0,0 +1,18 @@ +//Example_a_7_8 page no:276
+clc;
+I1mag=50/6.7;
+I1ang=0-26.56;
+I2mag=80/6.7;
+I2ang=90-26.56;
+I1real=I1mag*cosd(I1ang);
+I1imag=I1mag*sind(I1ang);
+I1=I1real+(%i*I1imag);
+I2real=I2mag*cosd(I2ang);
+I2imag=I2mag*sind(I2ang);
+I2=I2real+(%i*I2imag);
+I=I1+I2;
+//calculating the required current values
+Imag=sqrt(real(I)^2+imag(I)^2);
+Iang=atand(imag(I)/real(I));
+disp(Imag,"the magnitude of current passing through 2+3i ohm impedence is (in A)");
+disp(Iang,"the angle of current passing through 2+3i ohm impedence is (in degree)");
diff --git a/3673/CH7/EX7.a.9/Example_a_7_9.sce b/3673/CH7/EX7.a.9/Example_a_7_9.sce new file mode 100644 index 000000000..659ef9fc3 --- /dev/null +++ b/3673/CH7/EX7.a.9/Example_a_7_9.sce @@ -0,0 +1,9 @@ +//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)");
|