- 1、原创力文档(book118)网站文档一经付费(服务费),不意味着购买了该文档的版权,仅供个人/单位学习、研究之用,不得用于商业用途,未经授权,严禁复制、发行、汇编、翻译或者网络传播等,侵权必究。。
- 2、本站所有内容均由合作方或网友上传,本站不对文档的完整性、权威性及其观点立场正确性做任何保证或承诺!文档内容仅供研究参考,付费前请自行鉴别。如您付费,意味着您自己接受本站规则且自行承担风险,本站不退款、不进行额外附加服务;查看《如何避免下载的几个坑》。如果您已付费下载过本站文档,您可以点击 这里二次下载。
- 3、如文档侵犯商业秘密、侵犯著作权、侵犯人身权等,请点击“版权申诉”(推荐),也可以打举报电话:400-050-0827(电话支持时间:9:00-18:30)。
- 4、该文档为VIP文档,如果想要下载,成为VIP会员后,下载免费。
- 5、成为VIP后,下载本文档将扣除1次下载权益。下载后,不支持退款、换文档。如有疑问请联系我们。
- 6、成为VIP后,您将拥有八大权益,权益包括:VIP文档下载权益、阅读免打扰、文档格式转换、高级专利检索、专属身份标志、高级客服、多端互通、版权登记。
- 7、VIP文档为合作方或网友上传,每下载1次, 网站将根据用户上传文档的质量评分、类型等,对文档贡献者给予高额补贴、流量扶持。如果你也想贡献VIP文档。上传文档
查看更多
作业2:节约算法解TSP问题的C语言实现
1120131233陈鑫交通运输工程
问题描述
节约算法(Saving Algorithm)是解决配送问题的一种常见的构筑算法。其 基本思路是:
首先,所有顾客都肓接从配送中心之间的肓接运输开始;
然后,计算上述每两个直接运输如果改成连续运输后的距离(费用)节约额
Sjj = cQi + cOj - Cjj, i, j为任意两个顾客;
最后,按照任意两个顾客i, j之间连续运输的节约额Sy从大到小顺序来组 织连续运输,知道配送车辆等制约条件不能满足为止。
本程序里不涉及任何吋间窗或其他约束,适合20个点以内
算法实现
#include stdio.hn
#include math.h
void main()
{
longx[21]={0},y[21]={0},d[191]={0},e[191]={0},g[41]={0},s[42]={0);
int i,j,h=l,k,l,o,m,n=0,p,q=3,r=0;
int flag;
double a[21]={0},b[21][21]={0},c[21][21]={0},f[191]={0};
char ch;
printfC* C-W 算法求解 TSP 问题 \n\n\nH);
printfC*请输入坐标(20个以内),坐标之间用空格隔开,按回车键结束输入:
\nH);
re:scanf(H%d,%dH,x[h],y[h]);
ch=getchar();
if(ch!=,\n,)
{ h++;
goto re;
}
for(i=l;ih+l;i++)
a[i]=sqrt(x[i]*x[i]+y[i]*y[i]);
for(i=l;ih;i++)
{
for(j=i+1 ;j vh+1 ;j++)
{ n++;
b[i][j]=sqrt((x[i]-x[j])*(x[i]-x[j])4-(y[i]-y[j])*(y[i]-y|j]));
c[i]Ul=a[i]+a[j]-b[i]U];
d[n]=i;
e[n]=j;
f[n]=c[i]U];
}
}
fbr(i=l;in;i++)
{ flag=0;
for(j=l;jvn+l?i;j++)
if(f[j]fU+l])
{ k=f[j];f[j]=fU+l];f[j+l]=k;
l=d[j];d[j]二 d[j+l];d[j+l]=l;
o=e[j];e[j]=e[j+1 ];e[j+l]=o;
flag 二 1 ;
}
if(flag==O)
break;
}
printf(n\n,r);
printf(”节约值排序:\nn);
for(i=n;i0;i-)
{ if(f[i]!=O) printf(,%lf(%ld,%ld)--(%ld,%ld)\n,\f[i],x[d[i]],y[d[i]],x[e[i]],y[e[i]]);
1
g[l]=d[n];
g[2]=e[n];
for(m= 1 ;mvh;m++)
{
for(j=n-l;j0;j-)
{ P=0;
for(i=l;i41;i++)
{
if(dUl==g[i])
p 二 p+1;
if(e[j]==g[i])
P=P+1;
if(P=l)
{ g[ql=d[j];
g[q+l]=e[j];
if(p==l)
break;
q=q+2;
}
printf(M\n 选出连接点:\nu);
for(i=l ;i41 ;i=i+2)
{ if(g[i]!=O)
{
printf(“(%ld,%ld)??(%ld,%ld)\n“,x[g[i]],y[g[i]],x[g[i+l]],y[g[i+l]]);
r=r+2;
}
}
s[21]=g[l];
s[22]二g ⑵;
for(i=3;ir;i=i+2)
for(j=l;j42;j++)
{
if(g[i]==s[j])
{
if(s[j?l]=O)
s[j?l]=g[i+l];
else
sU+l]=g[i+l];
break;
if(s[j?l]=O) s[j-l]=g[i];
Else
s[j+l]二 g[i]; break;
printf(\n旅彳亍商路线:\nH);
printf(,,(O,O)-H);
for(i=l;i42;i++)
{
if(s[i]!=O)
printf(,,(%ld,%ld)-,,,x[s[i]],y[s[i]]);
}
printf(,,(O,O)n);
getch();
运行截图如下:
■ X:\USERS\ADMINISTRATOR\DESiaOP\hh\DebugV^e^
请谕入坐标(20个以内),坐标之间用空格隔开.按回车键结束输入:
12.23 26.56 89.45 75,66 45.32
[节约值排序:
174.00000
您可能关注的文档
最近下载
- 初中物理教学案例中的信息技术与学科整合论文.docx
- 立柱桩施工方案.docx VIP
- 碧桂园北湖项目营销策略提报 -房地产-2024-.pptx VIP
- [云南]2024年国家税务总局云南省税务局所属事业单位招聘30人 笔试历年典型考题及考点剖析附答案详解.doc
- 09J940 皮带运输机通廊建筑构造.pdf VIP
- BSI MDR Requirement 欧盟MDR要求培训课件.pdf VIP
- 13《精卫填海》课件(共32张PPT).pptx VIP
- 医疗机构药事管理规定(全文).docx VIP
- 职业卫生与职业医学简答题库(含答案).pdf VIP
- YS_T 582-2013电池级碳酸锂.pdf
原创力文档


文档评论(0)