summaryrefslogtreecommitdiff
path: root/1760/CH2/EX2.94/EX2_94.sce
blob: 7ea71a652dccd26381f09329421614f0bcf7cfff (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
     //EXAMPLE 2.94    PG NO-139-140
L=0.6;   //LENGTH
a=20*10^-4;   //AREA
MU=(4*%pi*10^-7);
R=L/(MU*a);
N1=1500;
N2=500;
i=250;
M=(N1*N2)/R;
e=M*(i);
disp('R = '+string(R)+' ');
disp('mutual induction is = '+string(M)+' H');
disp('E.M.F INDUCE is = '+string(e)+' V');