Untitled

entrada:

k, r, m, d, β, α, Ti, Tf, dt, x(0), y(0), produção, retirada,

definir funções:

x'(t), y'(t)

declarar vetores: t,y,x

x

i=0

i<=Tf

calcular:

x(i+1), y(i+1)

y(i+1)>=numero máximo

y(i+1) = y(i+1) - retirada

produção = produção + retirada

i = i + 1

escrever:

x,y,produção

fim

inicio