3630/CH17/EX17.14/Ex17_14.sce


1
2
3
4
5
6
7
8
9
10

clc;
Q=126;
Rw=25;
Rp=(Q^2)*Rw;
XL=3160;
rc=20000;
QL=rc/XL;
disp(' ',ceil(Rp/1000),"Rp=");//The answers vary due to round off error
disp(' ',QL,"QL=");//The answers vary due to round off error