summaryrefslogtreecommitdiff
path: root/620/CH20/EX20.8/example20_8.sce
blob: 0792239d47c87f60cf9a6c61b945556e429ce661 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
l1=4;
l2=8;
v=120;
f=60;
disp("Part a");
x_l1=2*%pi*f*l1;
x_l2=2*%pi*f*l2;
x_l=x_l1+x_l2;
disp("he total inductive inductance (in kΩ) is"); disp(x_l*10^(-3));
disp("Part b");
i=v/x_l;
disp("the reading of ammeter (in mA) is"); disp(i*10^3);
disp("Part c");
v1=i*x_l1;
v2=i*x_l2;
disp("the voltage drop (in V) across 4 H coil is"); disp(v1);
disp("the voltage drop (in V) across 8 H coil is"); disp(v2);