#include #include #include #include #include #include #include #define cities 4
#define carnumber 1//小車數量
#define startnumber 2//物資起點數量
#define lacknumber 2//物資終點數量
#define max 1000//最大迭代次數
#define pc 0.6//交配概率
#define pm 0.1//變異概率
#define num 100//種群大小
#define value 2//定義小車運送能力
using namespace std;
struct car
;file *fp;
struct node
;node group[num],grouptemp[num];
struct initcar
;initcar initcar[carnumber];
struct city
;city city[cities];//城市總數量
int lack[2]=;//第2,3城市是需求地
double sump;
double t;
double calculate(int c,int d,int c1,int d1)
int cmp(node x,node y)
int cmp2(car c,car d)
void initdistance()
else//如果起點城市物資小於小車運量
if (possess[lack[j]]<0)
j--;}}
}void evalute()
} for (i=0;ie)//如果sum還不是很大
group[temp1].car[0].start[i]=point2;
group[temp1].car[0].end[i]=point1;
group[temp1].car[0].size[i]=value;
group[temp1].car[0].times++;//總次數加一
break;
}else//否則換回去}}
for (j=0;je)
group[temp2].car[0].start[i]=point1;
group[temp2].car[0].end[i]=point2;
group[temp2].car[0].size[i]=value;
group[temp2].car[0].times++;//總次數加一
break;
}else//換回去}}
}k++;
kk++;}}
}void bianyi()//變異的方式有三種,小車交換,起點交換,引入新的起點(遺傳交配變異要盡量保證所有情況)
while(te***==group[i].car[temp1].start[temp2]||te***==group[i].car[temp1].end[temp2]);//防止出現頭尾相等的局面
if (s>10)
break;
group[i].car[temp1].start[temp2]=te***;//將原來的起點進行更換
for (j=0;jmax)
}sumdistance/=num;
for (k=0;k
fprintf(fp,"第1輛小車,起點%d,終點%d,運量%d\n",group[t].car[0].start[k]+1,group[t].car[0].end[k]+1,group[t].car[0].size[k]);
fprintf(fp,"最段路徑為:%.4f\n\n",group[t].adapt);
fprintf(fp,"平均路徑為:%.4f\n",sumdistance);
學電腦先學什麼 零基礎學電腦先學什麼後學什麼
1.學習電腦之前,可以先列乙個表,看自己要學習哪些東西 2.滑鼠演練是第一步。拖動,複製 貼上 移動等等。主要是訓練對於滑鼠功能的了解,以及熟練度。4.正式學習文件中打字,畫表 作圖 做幻燈片,這些相對簡單,比較容易學會,新手學電腦時必須要學的。學會這些,你就可以處理文件了。同時學會了解檔案屬性,比...
平板電腦什麼牌子好?618趕緊來擼Ta
平板電腦對於電腦來說,可以脫離電腦桌的束縛,在雙手就可以完成辦公 平板電腦對於手機來說,更大的視野更好的視覺效果,在掌心就可以享受影院級別的觀感。近年來,平板電腦深受消費者喜愛,基本上追求數碼的人群人手必備一款平板電腦。那麼,平板電腦什麼牌子好?哪些平板電腦更適合年輕人呢?今天就帶著大家來看看。榮耀...
釘釘電腦端崩了 顯示「正在重連」無法接收訊息
程式設計客棧 www.cpp月28日 訊息 今日早間,釘釘崩了 一詞登上熱搜。大量程式設計客棧反饋稱,釘釘電腦端無法打卡,同時無法接收訊息,顯示 正在重lmgnlzdcsz連 此外,存在問題還包括 登入不上等等。目前,lmgnlzdcsz釘釘官方暫未回應。資料顯示程式設計客棧,釘釘是阿里巴巴集團專為...