diff options
Diffstat (limited to '623/CH27/EX5.5.10/U5_C5_10.sce')
| -rwxr-xr-x | 623/CH27/EX5.5.10/U5_C5_10.sce | 11 |
1 files changed, 11 insertions, 0 deletions
diff --git a/623/CH27/EX5.5.10/U5_C5_10.sce b/623/CH27/EX5.5.10/U5_C5_10.sce new file mode 100755 index 000000000..373af0166 --- /dev/null +++ b/623/CH27/EX5.5.10/U5_C5_10.sce @@ -0,0 +1,11 @@ +//variable initialization
+h=6.6*10^-34; //Plank's constant (joule second)
+mu=1.62*10^-27; //reduced mass of HCl molecule (kg)
+c=3*10^8; //speed of light (m/s)
+v=2.886*10^5; //wave no. of absorption line in infrared spectrum (m-1)
+
+//calculation of amplitude of vibration
+k=4*(%pi*c*v)^2*mu; //force constant of HCl molecule (N/m)
+amp=sqrt((h*c*v)/k)*10^10; //amplitude of vibration in the ground state (Å)
+
+printf("\namplitude of vibration = %.2f Å",amp);
|