diff options
Diffstat (limited to '3769/CH10/EX10.5/Ex10_5.sce')
| -rw-r--r-- | 3769/CH10/EX10.5/Ex10_5.sce | 13 |
1 files changed, 13 insertions, 0 deletions
diff --git a/3769/CH10/EX10.5/Ex10_5.sce b/3769/CH10/EX10.5/Ex10_5.sce new file mode 100644 index 000000000..a1f0669dc --- /dev/null +++ b/3769/CH10/EX10.5/Ex10_5.sce @@ -0,0 +1,13 @@ +clear +//given +M=8 +d=0.2 +u=4*%pi*10**-7 + +//Calculation +B=u*2*M/(4*%pi*d**3) +Beqa=B/2.0 + +//Result +printf("\n (i) Magnetic induction at axial point %0.3f *10**-4 T", B*10**4) +printf("\n (ii) Magnetic induction at equatorial point is %0.3f *10**-4 T",Beqa*10**4) |