1 files changed, 10 insertions, 0 deletions
diff --git a/3669/CH7/EX7.5/5.sce b/3669/CH7/EX7.5/5.sce
new file mode 100644
index 000000000..956d31574
--- /dev/null
+++ b/3669/CH7/EX7.5/5.sce
@@ -0,0 +1,10 @@
+
+//Variable declaration
+r=10/2;     //radius(cm)
+i=500*10**-3;    //current(A)
+
+//Calculation
+mew=%pi*(r*10**-2)**2*i;    //magnetic moment(Am**2)
+
+//Result
+printf('magnetic moment is %0.3f  *10**-3 Am**2   \n',(mew*10**3))
+\ No newline at end of file