summaryrefslogtreecommitdiff
path: root/3769/CH11/EX11.2/Ex11_2.sce
diff options
context:
space:
mode:
Diffstat (limited to '3769/CH11/EX11.2/Ex11_2.sce')
-rw-r--r--3769/CH11/EX11.2/Ex11_2.sce19
1 files changed, 19 insertions, 0 deletions
diff --git a/3769/CH11/EX11.2/Ex11_2.sce b/3769/CH11/EX11.2/Ex11_2.sce
new file mode 100644
index 000000000..7cb72eae5
--- /dev/null
+++ b/3769/CH11/EX11.2/Ex11_2.sce
@@ -0,0 +1,19 @@
+clear
+//Given
+E=240
+R=474.0
+r=12.5*10**-2
+N=500
+ur=5000
+
+//Calculation
+//
+I=E/R
+I1=2*%pi*r
+H=(N*I)/I1
+u=4*%pi*10**-7
+B=u*ur*H
+
+//Result
+printf("\n (i) The magnetising force is %0.0f AT/m",H)
+printf("\n (ii) The magnetic flux density is %0.2f Wb/m**2",B)