diff options
Diffstat (limited to '1628/CH7/EX7.7/Ex7_7.sce')
-rwxr-xr-x | 1628/CH7/EX7.7/Ex7_7.sce | 20 |
1 files changed, 20 insertions, 0 deletions
diff --git a/1628/CH7/EX7.7/Ex7_7.sce b/1628/CH7/EX7.7/Ex7_7.sce new file mode 100755 index 000000000..1c3ba780b --- /dev/null +++ b/1628/CH7/EX7.7/Ex7_7.sce @@ -0,0 +1,20 @@ + + // Example 7.7 + +k=1; // Constant +N1=2000; // turns of Solenoid +N2=500; // turns of Coil +mo=4*%pi*10^-7; // Permeability of free Space +A=30*10^-4; // Area of aCoil +l=0.7; // Length of Solenoid +z=k*N1*N2*mo*A; // alphabet for simplicity +M=z/l; // Formula of Mutual Inductance +disp('(a) Mutual induction of a Coil = '+string(M)+' H'); +dit=260; // Rate of Chenge of Current +e=M*dit; // Formula of emf (using Mutual induction) +disp('(b) emf induced in a Coil is = '+string(e)+' Volt') + + + + + // p232 7.7 |