summaryrefslogtreecommitdiff
path: root/1760/CH5/EX5.6/EX5_6.sce
blob: 90efd2c0a786f286a0f3f41eb92f34c0c2c56311 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
                  //EXAMPLE   5-6    PG NO=299-300
TZ1=54.90+%i*85;
Z1=40+%i*0;
Z2=250-%i*132.625;
Z3=0-%i*132.625;
IR1=[Z1/TZ1]*[Z3/Z2];
disp(' CURRENT is  in polar form = '+string(IR1)+'A');
TZ2=173.64+%i*48.84;
Z4=20+%i*0;
Z5=250+%i*377;
Z6=0+%i*377;
IR2=[Z4/TZ2]*[Z6/Z5];
disp(' CURRENT is  in polar form = '+string(IR2)+'A');
IR=[IR1^2+IR2^2]^0.5;
disp(' CURRENT is  in polar form = '+string(IR)+'A');