summaryrefslogtreecommitdiff
path: root/1388/CH10/EX10.16/10_16.sce
blob: 4e5bc99af3f9e517f9e3fb76e197cbbe9d4c0a3e (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
  clc
//initialisation of variables
H= 41300
R= 1.987 //atm lit/mol K
T= 595 //K
M= 128 //gm
R1= 8.314*10^7 //atm lit/mol K
N= 6.02*10^23 //moleccules
k= 3.95*10^-6 //sec^-1
//CALCULATIONS
s= sqrt((k*10^3/(4*N))*(128/(%pi*R1*T))^0.5*%e^(H/(R*T)))
//RESULTS
printf (' collision diameter= %.3e cm',s)