summaryrefslogtreecommitdiff
path: root/1367/CH3/EX3.5/3_5.sce
blob: 46d28c1a806526e8ff553767afd79372c8778421 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
//Find Dipole moment and  Percentage ionic character
//Ex:3.5
clc;
clear;
close;
d=0.9178;//molecular distance in angstorm
d1=d*10^-10;//in m
e=1.602*10^-19;//in C
dm=e*d1;//dipole moment in fully ionic state in Cm
disp(dm,"Dipole moment of HF in fully ionic state (in Cm) = ");
dm_m=6.375*10^-30;//meaured dipole moment in Cm
p=(dm_m*100)/dm;//Percentage ionic character
disp(p,"Percentage ionic character");