Текст программы

Program raschet;crt; const Pi=3.14;

Qmax=2000; q0=40; q_m=556; Vmax=0.3; D=1.8; h2=0.55;=0.22; Hmin=0.1; Qmin=1.44; A=6; K=1.31; Hp=0.79; U0=23.5; V=0.3;=13.2; p=0.02; Npr=10600;F,dpes,w,w1,w2,h11,wmin,Vmin,Lf,Ltr,T,Woc: real;clrscr;('----------Песколовка--------');

F: =Qmax/ (2*q0);

Writeln ('Площадь в плане одного отделения F=',F: 5: 3);

dpes: =sqrt (4*F/Pi);

Writeln (' Диаметр песколовки dpes=',dpes: 5: 3);

w: =q_m*0.001/ (2*Vmax);

Writeln ('Площадь живого сечения кругового лотка w=',w: 5: 3);

w1: =D*h2/2;: =w-w1;: =w2/D;: =w1+D* (h11- (Hmax-Hmin));

Writeln (' Площадь живого сечения кругового лотка wmin=',wmin: 5: 3);

Vmin: =Qmin*0.001/ (2*wmin);

Writeln (' Скорость протока сточных вод в песколовке Vmin=',Vmin: 5: 3);

Lf: =2*Pi*A/2-D/2;

Writeln (' Длина песколовки по средней линии осадочной части Lf=',Lf: 5: 3);

Ltr: =K*1000*Hp/ (U0*V);

Writeln (' Требуемая длина песколовки Ltr=',Ltr: 5: 3);

T: =L*Pi/V; woc: =p*Np;

Writeln (' Объем задерживаемого песка влажностью 60 % woc=',woc: 5: 3);; end.


Другие статьи

Нормирование вредных веществ
Вопрос о воздействии человека на биосферу находится в центре внимания специалистов и экологов всего мира. И это не случайно, так как крупнейшие глобальные экологические проблемы современности - «парниковый эффект», нарушение озонового слоя, выпадение кислотных дождей, ...

 
 
 

2018 Копирайт : www.ecologyreality.ru