Курсовая работа: Основные межвидовые взаимодействия, эволюция

a1=0.2;

a2=0.24;

b11=0.004;

b22=0.0035;

b12=0.0033;

b21=0.0029;

k2=b12*a2/(a1*b22);

k1=a1*b21/(b11*a2);

N0=500;

M0=1500;

[t X]=ode45('sistb',[0 10],[N0 M0]);

N=X(:,1);

M=X(:,2);

figure

hold on

grid on

plot(t,N,'b')

plot(t,M,'g')

xlabel('Время');

ylabel('Численности популяций');

legend('1ая популяция','2ая популяция')

hold off

if(k2>1)

if(k1<1)

disp('Конкурентную борьбу выигрывает второй вид')

end

end

if(k2<1)

if(k1>1)

К-во Просмотров: 454
Бесплатно скачать Курсовая работа: Основные межвидовые взаимодействия, эволюция