diff options
Diffstat (limited to '3840/CH4/EX4.1/Ex4_1.sce')
| -rw-r--r-- | 3840/CH4/EX4.1/Ex4_1.sce | 18 |
1 files changed, 18 insertions, 0 deletions
diff --git a/3840/CH4/EX4.1/Ex4_1.sce b/3840/CH4/EX4.1/Ex4_1.sce new file mode 100644 index 000000000..43e2382b3 --- /dev/null +++ b/3840/CH4/EX4.1/Ex4_1.sce @@ -0,0 +1,18 @@ +clear +// +// +// + +//Variable declaration +new=5.6*10**12 //frequency(Hz) +h=6.625*10**-34 //plank constant +kB=1.38*10**-23 //boltzmann constant +T=330 //temperature(K) + +//Calculation +x=h*new/(kB*T) +E=h*new/(exp(x)-1) //average energy of oscillator(joule) + +//Result +printf("\n average energy of oscillator is %0.3f *10**-21 joule",E*10**21) +printf("\n answer given in the book varies due to rounding off errors") |