summaryrefslogtreecommitdiff
path: root/377/CH1/EX1.8/1_8.sce
blob: 4f1288baf7ba15e11e98c8a2a2d556190c5efc5f (plain)
1
2
3
4
5
6
7
8
9
disp("v=(1/(2*pi))*sqrt(k/m0)");
pi=3.14;
k=10;
m0=1*10^-3;
h=6.6;
v=(1/(2*pi))*sqrt(k/m0);
printf('\n The value of v is %f Hz',v);
E0=(h/2)*v;
printf('\n The zero point energy is %f *10^-32 J',E0);