620/CH26/EX26.5/example26_5.sce


1
2
3
4
5
6
7
8
9

v=120;
f=60;
i=5;
p=525;
z=v/i;
r=p/i^2;
x_l=sqrt(z^2-r^2);
l=x_l/(2*%pi*f);
disp("the inductance (in mH) of the coil is"); disp(l*10^3);