Расчеты реакционной аппаратуры химических производств. Иванов Г.Н - 23 стр.

UptoLike

ВУЗ: 

ТПУ | Томск

Составители: 

Рубрика: 

22
Var Tx, A0, A1, A2, C1, x, tau : real;
n : integer;
dev : text;
begin
ClrScr;
x:=0;
tau:=0;
n:=0;
assign(dev, 'reak.out');
rewrite(dev);
A0:=293.16;
A1:=dH*dx*Fi/Cp;
writeln(dev,'A1 = ',A1:7:3);
A2:=Kt*S/(F0*Cp);
writeln(dev,'A2 = ',A2:7:3);
repeat
x:=x+dx;
n:=n+1;
C1:=dx/(k0*exp(-10000/T0)*(1-x));
writeln(dev,'C1 = ',C1);
writeln(dev,'tx = ',C1/60);
tau:=tau+C1/60;
Tx:=(A0+A1+A2*C1*Tn)/(1+A2*C1);
writeln(dev,'n = ',n,' ','x = ',x:4:2,' ','Tx = ',Tx:7:2,' ','=',tau);
A0:=Tx;
until Tx>=Tk;
close(dev);
end.
3.2. Реальные реакторы
3.2.1. Трубчатая конструкция. Модель диффузионная
В общем виде аналитическая форма теплового баланса представляется
выражением
2
2
1
( ) 0
Pe
i T H H
T P
T T H
r K T T
c
, (6)
в котором Pe
P
T
l c
– критерий Пекле (тепловой), – эффективная теп-
лопроводность среды.
Nitro PDF Trial
www.nitropdf.com

Страницы