clc,clear
q=1.9, %(卸点的需求)
m=154*10^(-4), %(卡车一次的运输量)
V=28, %(卡车的平均运输速度)
Q=0, %(铲位某石的原始总量)
N=0, %(卡车运输总次数)
T=0, %(卡车运输的总时间)
i=0; %(运算计数器)
[A]=[0.64 1.76 1.27 1.83 2.74 2.60 4.21 3.72 5.05 6.10];%(各铲位距离卸点的路程矩阵)
[B]=[1.25 1.10 1.35 1.05 1.15 1.35 1.05 1.15 1.35 1.25];%(各铲位有的某石(岩石或矿石)的总量)
while Q
[C,I]=min(A); %(选出最短距离的铲位)
Q=B(I)+Q; %(选出铲位的某石总量的累加)
theta=q-Q;
i=i+1;
if theta<=0
if i==1
n=ceil(q/m), %(选出铲位线路运输的次数)
t=((2*A(I)/V)+(3+5)/60)*n; %(选出铲位线路运输的时间)
else
n=ceil(theta/m), %(选出铲位线路运输的次数)
t=((2*A(I)/V)+(3+5)/60)*n; %(选出铲位线路运输的时间)
esle
n=ceil(B(I)/m), %(选出铲位线路运输的次数)
t=((2*A(I)/V)+(3+5)/60)*n; %(选出铲位线路运输的时间)
N=N+n, %(运输次数的累加)
T=T+t, %(运输时间的累加
A(I)=[],B(I)=[]; %(选出铲位的删除)
end;
end;
end;