1 files changed, 14 insertions, 0 deletions
diff --git a/2741/CH5/EX5.14/Chapter5_Example14.sce b/2741/CH5/EX5.14/Chapter5_Example14.sce
new file mode 100755
index 000000000..2c8ee6c02
--- /dev/null
+++ b/2741/CH5/EX5.14/Chapter5_Example14.sce
@@ -0,0 +1,14 @@
+clc
+clear
+//Input data 
+R=8.32;//Universal gas constant in joules/mole-K 
+t=727;//The given temperature in degree centigrade 
+N=6.06*10^23;//The Avogadro number
+
+//Calculations 
+T=273+t;//The given temperature in K 
+k=R/N;//Boltzmann constant in joules/mol-K 
+E=(3/2)*k*T;//Mean translational kinetic energy per molecule in joules 
+
+//Output
+printf('The mean translational kinetic energy per molecule is K.E = %3.4g joule ',E)