summaryrefslogtreecommitdiff
path: root/3856/CH15/EX15.1/Ex15_1.sce
diff options
context:
space:
mode:
Diffstat (limited to '3856/CH15/EX15.1/Ex15_1.sce')
-rw-r--r--3856/CH15/EX15.1/Ex15_1.sce19
1 files changed, 19 insertions, 0 deletions
diff --git a/3856/CH15/EX15.1/Ex15_1.sce b/3856/CH15/EX15.1/Ex15_1.sce
new file mode 100644
index 000000000..ccaa6fca6
--- /dev/null
+++ b/3856/CH15/EX15.1/Ex15_1.sce
@@ -0,0 +1,19 @@
+//Calculate the Percent Ionic character of the H-F bond
+
+//Example 15.1
+
+clc;
+
+clear;
+
+mewexp=1.91*3.3356*10^-30; //Experimental dipole moment in C m
+
+Q=1.602*10^-19; //Charge on electron in C
+
+r=92*10^-12; //Distance between the ions in m
+
+mewionic=Q*r; //Dipole moment in C m
+
+I=(mewexp/mewionic)*100; //Percent Ionic character of the H-F bond in percent
+
+printf("Percent Ionic character = %.1f percent ",I);