1 files changed, 19 insertions, 0 deletions
diff --git a/3763/CH6/EX6.4/Ex6_4.sce b/3763/CH6/EX6.4/Ex6_4.sce
new file mode 100644
index 000000000..131705bb5
--- /dev/null
+++ b/3763/CH6/EX6.4/Ex6_4.sce
@@ -0,0 +1,19 @@
+clear
+//
+//
+//
+
+//Variable declaration
+A=360*10**-4    //area(m**2)
+V=15    //voltage(V)
+C=6*10**-6     //capacitance(farad)
+epsilonr=8
+epsilon0=8.84*10**-12
+
+//Calculation
+E=V*C/(epsilon0*epsilonr*A)     //field strength(V/m)
+dm=epsilon0*(epsilonr-1)*V*A    //total dipole moment(Cm)
+
+//Result
+printf("\n field strength is %0.3f  *10**7 V/m",E/10**7)
+printf("\n total dipole moment is %0.1f  *10**-12 Cm",dm*10**12)