Особенности работы и конструкций многоамперных электрических аппаратов. Беляев В.Л. - 265 стр.

UptoLike

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

write ('Поверхность радиатора [кв.м]: '); readln (sr);
write ('Коэффициент теплоотдачи с поверхности радиатора
[Вт/(кв.м*град.С)]: '); readln (ar);
write ('Температура окружающего воздуха [град.С]: ');
readln (t0);
write ('Температура нагрева контактов [град.С]: ');
readln (tn);
writeln ('Активное сопротивление подвижного контакта
ножа:');
write (' при температуре окружающего воздуха: ');
readln (rk0);
write (' при температуре нагрева: '); readln (rk1);
write ('Активное сопротивление контактного перехода [Ом]:
'); readln (rk);
write ('Активное сопротивление неподвижного
контакта
[Ом]: '); readln (rnk);
writeln ('Температура воды в радиаторе:');
write (' на входе [град.С]: '); readln (t2);
write (' на выходе [град.С]: '); readln (t1);
writeln ('Характеристики воды:');
write (' теплоемкость [кал/(г*град.С)]: '); readln
(cp);
write (' удельный вес [г/куб.см]: '); readln (g);
write (' теплопроводность [Вт/м*град.С]: '); readln
(lambda);
write ('Контактное нажатие [кг]: '); readln (f);
write ('Высота расположения радиатора над аппаратом [м]:
'); readln (h);
writeln; writeln ('-=* Вычисление... *=-'); writeln;
pnk:=i*i*rnk; pn:=i*i*rk1/16; pk:=i*i*rk/16;
p:=2*pnk+2*pn+8*pk;
s:=pi*dk*dk/4; dt:=t2-t1; p1:=v*s*dt*cp*g/24;
p2:=kto*sd*(tn-t0); pd:=p1-2*pn;
rt:=sqrt(pi*sigm/f)/(2*lamm); dtk:=pd*rt/8;
tg:=(t2-t1)/2+t1; dtau:=tg-t0; k:=(0.1*tg-1.7)*1e10;
a:=sqrt(128e3*p1*lk/(pi*h*g*k))/(dk*dk);
e1:=exp((-1)*ar*sr*a/p1); t20:=t0+a/(1-e1);
t10:=t0+a*e1/(1-e1);
dtn:=exp(4*ln(p1/(0.54*pi*lk))/5)/(exp(3*ln(dk*lambda)/5)*exp
(ln(k)/5));
td:=t2+dtn;
writeln ('-=* Результаты расчетов *=-'); writeln;
writeln ('Тепловые потери:');
writeln ('- одной стороны разъединителя
[Вт]......................', p:6:2);
writeln ('- отводимые водой в радиаторе
[Вт]........................', p1:6:2);