Лабораторная работа: Охлаждение изолированного провода
rewrite(f2);
for i:=1 to n do
begin
write (f2, t[i]:2:2);
write (f2,' ');
end;
writeln(f2);
l:=round (l3/hz1);
vanna (f2, l, alpha3, tv3);
close(f2);
end.
Результаты расчётов
Рис. 4. Распределение температуры по длине охлаждающих ванн
Рис. 5. Распределение температуры по радиусу кабеля
Рис. 6. Зависимость температуры от скорости изолирования жилы
Рис. 7. Распределение температуры по радиусу для различных скоростей изолирования жилы
Рис. 8. Зависимость средней арифметической температуры от скорости изолирования жилы
Рис. 9. Зависимость температуры от коэффициента теплопроводности
Рис. 10. Распределение температуры по радиусу для различных коэффициентов теплопроводности
Рис. 11. Зависимость средней арифметической температуры от коэффициента теплопроводности