summaryrefslogtreecommitdiff
path: root/1427/CH35/EX35.11/35_11.sce
diff options
context:
space:
mode:
Diffstat (limited to '1427/CH35/EX35.11/35_11.sce')
-rw-r--r--1427/CH35/EX35.11/35_11.sce9
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);