diff options
Diffstat (limited to '2780/CH10/EX10.3')
| -rwxr-xr-x | 2780/CH10/EX10.3/Ex10_3.sce | 11 |
1 files changed, 11 insertions, 0 deletions
diff --git a/2780/CH10/EX10.3/Ex10_3.sce b/2780/CH10/EX10.3/Ex10_3.sce new file mode 100755 index 000000000..9b44c4799 --- /dev/null +++ b/2780/CH10/EX10.3/Ex10_3.sce @@ -0,0 +1,11 @@ +clc
+//to calculate magnetic moment of the rod
+//formula is B=muo*(H+I)
+//where H=ni
+n=500 //number of turns in turns/m
+i=0.5 //current passed through the solenoid in A
+mur=1200 //relative permeability
+I=(mur-1)*n*i //intensity of magnetisation in A/m
+V=10^-3 //volume in m^3
+M=I*V
+disp("the magnetic moment of the rod is M="+string(M)+"A-m^2")
|