Внимание! Разница между конечной длиной холодильника из меди и нержавейки составляет <br> 9% и при расчетах игнорируется.
<br>
<br>

<FORM NAME="cond">

<TABLE BORDER CELLPADDING=1 bgcolor="#dedfe0" width="80%">

<Tr><td colspan=2 align=center>Введите требования к холодильнику</td>
<Tr><td>Температура воды на входе <input type="text" name="coldi" value=" 15" size=3> &deg C </TD>
<Tr><td>Температура воды на выходе<input type="text" name="hoti" value=" 55" size=3> &deg C </TD>
<Tr><td>Диаметр трубки <input type="text" name="diami" value=" 6" size=3> мм</TD>
<Tr><td>Подводимая мощность <input type="text" name="qin" value=" 3000" size=5> Вт <i> 
<br>Например, мощность ТЭНа</TD>
<Tr><td>Температура паров <input type="text" name="dewi" value=" 80" size=3> &deg C </TD>

</table>
<TABLE BORDER CELLPADDING=1 bgcolor="#bddbf9" width="80%">

<TR><td colspan=2 align=center>Выберите тип холодильника или введите коэф. поглощения 
<tr><td><INPUT TYPE="radio" NAME="pack" Value="1" > Кожухотрубный <i>прибл. 850 Вт/м<sup>2</sup>C 
<tr><td><INPUT TYPE="radio" NAME="pack" Value="2" checked> Холодильник Димрота  <i>прибл. 950 Вт/м<sup>2</sup>C
<TR><td colspan=2 align=center>или введите Ваше значение .. <INPUT NAME="htcg" size=5> Вт/м<sup>2</sup>C 
</table>
<TABLE BORDER CELLPADDING=1 width="80%"> 
<tr><TD VALIGN="bottom" ALIGN="center" colspan=2><INPUT TYPE="button" VALUE="Расчет" 
onClick="

if (cond.pack[0].checked) htc = 850; 
if (cond.pack[1].checked) htc = 950; 

if (cond.htcg.value >0) htc = cond.htcg.value;

cpw = 4.184;

heat = cond.qin.value;
cold = cond.coldi.value;
hot = cond.hoti.value;
dew = cond.dewi.value;
diam = cond.diami.value; 

delt = (hot-cold) / (Math.log((dew-cold)/(dew-hot)));
area = heat / (htc * delt) ;

conlon = Math.round(100*area / (diam/1000 * 3.1412))/100;
flow = Math.round(heat / (cpw * (hot-cold)) *60/1000 *100)/100;

cond.longo.value = conlon;
cond.flowo.value = flow; ">

<tr><td>Расчетная длина: <input name="longo" size=5> м. &nbsp 
<tr><td>Расчетный поток воды : <input name="flowo" size=5> Литров/мин

</table>
</form>

Взято с homedistiller.org