3.
clear;
clc;
close all;
nz = [5 5 5 5 5];
za = [100 100 100 100 100];
zb = [100 200 200 220 400];
zc = [100 500 200 220 400];
zd = [100 400 200 220 400];
ze = [100 100 300 220 400];
Za = za(1);
for i = 2:nz(1)
Za = Za*za(i)/(Za+za(i));
end
Zb = zb(1);
for i = 2:nz(2)
Zb = Zb*zb(i)/(Zb+zb(i));
end
Zc = zc(1);
for i = 2:nz(3)
Zc = Zc*zc(i)/(Zc+zc(i));
end
Zd = zd(1);
for i = 2:nz(4)
Zd = Zd*zd(i)/(Zd+zd(i));
end
Ze = ze(1);
for i = 2:nz(5)
Ze = Ze*ze(i)/(Ze+ze(i));
end
E = 1;
syms v1 v2;
eqn1 = (v1-E)/Zd + v1/Zc + (v1-v2)/Ze == 0;
eqn2 = (v2-E)/Za + v2/Zb + (v2-v1)/Ze == 0;
[v1,v2] = solve([eqn1 eqn2]);
I1 = (E-v1)/Zd + (E-v2)/Za;
Rab = E/I1;
fprintf("Equivalent Resistance between a and b = %f ohms
\n",Rab);
Q1/ATV antenna is to be controlled by a 4-phase stepper motor with a step 5 degrees...