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

200 INPUT «эмперический коэф-т при обжарке k=»;k
205 Ro=k*R: Rc=(Ro+R)/2: Bio=(ac*Rc)/y
215 f011= .7*(1/12+1/(3*Bio0)-2/ (3*Bi0^2)*LOG (1+.5*Bi0))
216 INPUT “температура продукта в центре при обжарке t3=»; t3
220 f11= ((Bi0+4)/(8*Bi0)) *LOG ((t2-t1) / (t2-t3))+f011-f0
230 t0 = ((f11*(Rc)^2)/a)*60
250 t22 = 1-(Bi0/(Bi0+2)*EXP (-(8*Bi0)-(Bi0+4)*f11))
260 t23 = t1+ (t22*(t2-45))
270 INPUT «скорость движения воды при варке W=»;W
280 INPUT «влагосодержание при варке d=»;d
290 ac=(6.19+3.6 W)*1.1624: al =ac*(1+1.9*d)
295 INPUT «эмпирический коэф-т при варке k=»; k
300 Rb = k*R: R55=(Rb+Rc)/2: bi1 = (al*R55)/y: t55=(t3+t23)/2
320 f021 =.7*(1/12+1/(3*bi1)-2 / (3*bi1^2)*LOG(1+.5*bi1))
325 INPUT «t33=»; t33
330 f21- ((bi1-4) / (8*bi1))*LOG ((85-t55)/(85-t33))+f021
340 t01=(f21*(Rb) ^ 2 / a*60: t00=t01+tt: PRINT «ПОДСУШКА»
351 PRINT «Ac=»;ac
352 PRINT «коэф-т теплоотдачи при подсушке A1=»;al
353 PRINT «критерий Био при подсушке bi=»;bi
254 PRINT «время прохождения при подсушке f01=»;f01
256 PRINT «безмерное значение тем-ры Th=»;th
257 PRINT «безразмерная продолжительность подсушки f0= »; f0
358 PRINT “безразмерное время tt=»;t t
359 PRINT «поправка на продолжительность конденсации tk=»; tk
360 PRINT «продолжительность подсушки tp=»; tp
361 PRINT «ОБЖАРКА»
362 PRINT “________”
364 PRINT “ср. значение радиуса батона при обжарке Rc= ”;Rc
365 PRINT “критерий Био при обжарке Bi0=”;Bi0