Моделирование технологических процессов. Колесникова Н.В - 22 стр.

ПРИМЕР №3
Определить продолжительность тепловой обработки замороженных колбас-
полуфабрикатов «Хиимэ» из субпродуктов с помощью ЭВМ.
                         Полученные данные:
Коэф-т теплоотдачи при варке А1=36.4428
Среднеобъемная температура th=.4565217
Rb=.01672
Ср. значение радиуса батона в процессе варки R55=.016476
Критерий Био для режима варки bi1=1.291251
F021=9.9611831E-02
Продолжительность варки f21=.7006887
Размерное время варки t01=22.36112
Температура поверхности батона к моменту окончания варки
t30=.9001012Температура поверхности батона в конце варки t31=74.80931
      Программа расчета продолжительности тепловой обработки
                          мясопродуктов на ЭВМ
10 INPUT «введите скорость движения воды W1=»; W1
20 ac =(5.3+3.6*W1)*1.1163
35 INPUT «влагосодержание d=»; d: al=ac*(1+1.9*d)
50 INPUT «коэф-т теплопроводности y=»: y
51 PRINT « радиус батона R=»: INPUT R
55 bi=(al/y)*R
60 f01=7*(1/12+1/(3*bi)-2/(3bi^2)*LOG(1+.5*bi))
65 PRINT «температура поверхности t»: INPUT t
66 PRINT «температура продкта t1»: INPUT t1
67 PRINT “температура среды t2»: INPUT t2
70 th=(t-ABS(t1))/(t2-ABS(t1))
80 f0=((bi+4)/(8*bi))*LOG(2/((bi+2)*(1-th)))+f01
90 INPUT «коэф-т температуропроводности a-«; a
100 tt=(f0*R^2/a)*60:tk=(2-.46*bi)*21*th-8)
110 tp=tt+tk