Реферат: Оптимизация режимов движения судов с использованием MATLAB 5.0

f1=[0 80 100 110 120 180 210 230 260];

f2=[0 60 90 110 130 150 190 230 250];

f3=[0 30 40 70 110 180 200 240 250];

f4=[0 40 60 80 130 160 180 210 240];

f5=[0 50 70 90 110 150 170 200 220];

f6=[0 70 80 110 140 160 200 250 270];

F=[f1;f2;f3;f4;f5;f6];

plot(x,F),grid

%Решение

FF=[];

J=1;

for XR=1:9;

I=1:XR;

L=F(J,I)+F(J+1,XR-I+1);

[Lopt,I]=max(L);

x1=I*400-400;

x2=(XR-I)*400;

Pacn=[Lopt;x1;x2;x1+x2];

FF=[FF Pacn];

end

D=FF(1,:);

PP=[];

RRR=[];

for J=2:5;

DD=[];

RR=[];

for XR=1:9;

I=1:XR;

L=D(I)+F(J+1,XR-I+1);