diff options
Diffstat (limited to '1427/CH35/EX35.11/35_11.sce')
-rw-r--r-- | 1427/CH35/EX35.11/35_11.sce | 9 |
1 files changed, 9 insertions, 0 deletions
diff --git a/1427/CH35/EX35.11/35_11.sce b/1427/CH35/EX35.11/35_11.sce new file mode 100644 index 000000000..09512fcb6 --- /dev/null +++ b/1427/CH35/EX35.11/35_11.sce @@ -0,0 +1,9 @@ +//ques-35.11
+//Calculating force constant of CO molecule
+clc
+f=2140;//fundamental frequency (in /cm)
+C=1.99*10^-26;//atomic mass of C (in kg)
+O=2.66*10^-26;//atomic mass of O (in kg)
+r_m=(C*O)/(C+O);//reduced mass
+k=4*(%pi*3*10^10*f)^2*r_m;
+printf("The force constant of CO molecule is %.0f N/m.",k);
|