summaryrefslogtreecommitdiff
path: root/1301/CH10/EX10.14/ex10_14.sce
blob: b6e852393f6dc652888b6b71199b67bf96064805 (plain)
1
2
3
4
5
clc;
k=1.38*10^-23;    //Boltzmann's constant in J/K
tk=273+100;      //absolute temp (in Kelvin)
KE=3/2*(k*tk);   //calculating average Kinetic Energy in Joule using kinetic theory of gases
disp(KE,"Average Kinetic Energy in Joule = ");    //displaying result