最短路的三种方法——Dijkstra、Floyd、Bellman

以 OJ 2143 题目为例

图结构练习——最短路径

#include <iostream>
#include <bits/stdc++.h>
#define inf 0x3f3f3f3f

using namespace std;

struct node       //用于Bellman的结构体
{
    int u,v,w;
}s[5000010];
int head[105];

int Map[105][105];
int dis[3000010],vis[105];
int n,m,cnt;

struct nd        //用于SPFA的链式前向星
{
    int ver,weight;
    int next;
}edge[20010];

void Floyd(int n)
{
    int i,j,k;
    for(k=1;k<=n;k++)
        for(i=1;i<=n;i++)
            for(j=1;j<=n;j++)
            {
                if(Map[i][j]>(Map[i][k]+Map[k][j]))
                    Map[i][j]=Map[i][k]+Map[k][j];
            }
}

void Floyd_main()
{
    int i;
    int a,b,c;
    while(cin>>n>>m)
    {
        memset(Map,inf,sizeof(Map));
        for(i=1;i<=n;i++)
            Map[i][i]=0;
        for(i=0;i<m;i++)
        {
            cin>>a>>b>>c;
            if(Map[a][b]>c)         //防止出现环?
                Map[a][b]=Map[b][a]=c;
        }
        Floyd(n);
        cout<<Map[1][n]<<endl;
    }
}

void Dijkstra(int n)
{
    int i,j,v,u,min_;
    for(i=1;i<n;i++)    //进行n-1次最小值查找
    {
        min_=inf;
        for(j=1;j<=n;j++)
        {
            if(vis[j]==0&&dis[j]<min_)  //判断最小值是否确定
            {
                min_=dis[j];
                u=j;
            }
        }
        vis[u]=1;
        for(v=1;v<=n;v++)
        {
            if(dis[v]>dis[u]+Map[u][v])
                dis[v]=dis[u]+Map[u][v];
        }
    }
    cout<<dis[n]<<endl;
}

void Dijkstra_main()
{
    int a,b,c,i;
    while(cin>>n>>m)
    {
        memset(Map,inf,sizeof(Map));
        memset(vis,0,sizeof(vis));
        vis[1]=1;
        for(i=1;i<=n;i++)
            Map[i][i]=0;
        for(i=0;i<m;i++)
        {
            cin>>a>>b>>c;
            if(Map[a][b]>c)
                Map[a][b]=Map[b][a]=c;
        }
        for(i=1;i<=n;i++)
            dis[i]=Map[1][i];
        Dijkstra(n);
    }
}

void Bellman_add(int u,int v,int w)
{
    s[cnt].u=u;
    s[cnt].v=v;
    s[cnt].w=w;
    cnt++;
}

void Bellman(int x,int y)
{
    int i,j,check;
    memset(dis,inf,sizeof(dis));
    dis[x]=0;
    for(i=1;i<n;i++)
    {
        check=0;
        for(j=1;j<cnt;j++)
        {
            if(dis[s[j].v]>dis[s[j].u]+s[j].w)
            {
                dis[s[j].v]=dis[s[j].u]+s[j].w;
                check=1;
            }
        }
        if(check==0)
            break;
    }
    cout<<dis[y]<<endl;
}

void Bellman_main()
{
    int a,b,c;
    while(cin>>n>>m)
    {
        cnt=1;
        for(int i=1;i<=m;i++)
        {
            cin>>a>>b>>c;
            Bellman_add(a,b,c);
            Bellman_add(b,a,c);
        }
        Bellman(1,n);
    }
}

void add_edge(int u,int v,int w)
{
    edge[cnt].ver=v;
    edge[cnt].weight=w;
    edge[cnt].next=head[u];
    head[u]=cnt++;
}

void SPFA()
{
    queue<int>Q;
    int x;
    memset(dis,0x3f,sizeof(dis));
    memset(vis,0,sizeof(vis));
    dis[1]=0; Q.push(1); vis[1]=1;
    while(!Q.empty())
    {
        x=Q.front();
        Q.pop();
        vis[x]=0;
        for(int i=head[x];i!=-1;i=edge[i].next)
        {
            if(dis[edge[i].ver]>dis[x]+edge[i].weight)
            {
                dis[edge[i].ver]=dis[x]+edge[i].weight;
                if(!vis[edge[i].ver])
                {
                    Q.push(edge[i].ver);
                    vis[edge[i].ver]=1;
                }
            }
        }
    }
}

void SPFA_main()
{
    int i,a,b,c;
    while(cin>>n>>m)
    {
        memset(head,-1,sizeof(head));
        cnt=0;
        for(i=0;i<m;i++)
        {
            cin>>a>>b>>c;
            add_edge(a,b,c);
            add_edge(b,a,c);
        }
        SPFA();
        cout<<dis[n]<<endl;
    }
}

int main()
{
    //Floyd_main();       //多源最短路
    //Dijkstra_main();    //单源最短路
    //Bellman_main();     //dis数组比较大
    SPFA_main();
    return 0;
}

  • 0
    点赞
  • 0
    收藏
    觉得还不错? 一键收藏
  • 0
    评论
vb+mapinfo 实现最短路 'NoNode1 起始点编码 'NoNode2 结束点编码 'nNode 为网中最大的节点数 'NoNode(i) 节点编码 'LinkN(i) 与i点相连Line个数 'LinkNi(i) 与i点相连Line端点存放序号 'iLL=LinkNi(LL) - i + 1 'LinkNo(iLL) 与i点相连Line端点顺序编号 'LinkList(iLL) 与i点相连Line端点距离 'nNodeShortPath 最短路径节点数 'NodeShortPath 最短路径节点序号 Public Sub ShortPathSearch(NoNode1 As Integer, NoNode2 As Integer, nNode As Integer, NoNode() As Integer, LinkN() As Integer, LinkNi() As Integer, LinkNo() As Integer, LinkDis() As Double, nNodeShortPath As Integer, NodeShortPath() As Integer, ShortPath As Double) Dim II As Integer, I As Integer, J As Integer, LL As Integer, iLL As Integer Dim iNode As Integer Dim S As Single, MinS As Single, MinPoint As Integer Dim NodeCheck() As Boolean '标记已经查过的点 Dim NodeUse() As Boolean '标记已经作为结果点使用过的点 Dim RS() As Single '假设从起点到任一点的距离都为无穷大 Dim result() As Single '存放结果长度 Dim ResultNo() As Integer '存放结果节点编号 Dim iResult As Integer Dim No() As Integer Dim StartNo As Integer, EndNo As Integer 'Begin根据编码,搜索序号 StartNo = 0 EndNo = 0 For I = 1 To nNode If (NoNode(I) = NoNode1) Then StartNo = I End If If (NoNode(I) = NoNode2) Then EndNo = I End If If (StartNo > 0 And EndNo > 0) Then Exit For Next I 'End根据编码,搜索序号 ReDim NodeCheck(1 To nNode), NodeUse(1 To nNode) ReDim RS(1 To nNode), result(1 To nNode), ResultNo(1 To nNode) For I = 1 To nNode NodeCheck(I) = False '标记未经查过的点。 NodeUse(I) = False '标记未作为结果点使用过的点 RS(I) = 1E+38 '假设从起点到任一点的距离都为无穷大 Next I LL = StartNo '设置开始点。 NodeUse(LL) = True '标记开始点为真。即已经作为结果点使用过。 J = 0 For iNode = 1 To nNode '先从与开始点相连的起点寻找 For I = 1 To LinkN(LL) '以与LL点相连的起点的个数循环 iLL = LinkNi(LL) + I - 1 iResult = LinkNo(iLL) '找出与LL点相连的起点的点号 If NodeCheck(iResult) = False Then '如果没查过,则进行 S = LinkDis(iLL) + result(LL) '找出长度并求和 If NodeUse(iResult) = True Then '如果已经作为结果点,判断哪一个长 If S <= RS(iResult) Then '如果这一点到起点的长度比现在的路线长,替代 RS(iResult) = S result(iResult) = S '设置到这点的最短路径长度 ResultNo(iResult) = LL End If Else '如果上面的条件都不符合,则进行下面的语句 NodeCheck(iResult) = True RS(iResult) = S result(iResult) = S ResultNo(iResult) = LL J = J + 1 '每找到一个点加一,为了下面的判断 ReDim Preserve No(1 To J) '重新定义数组并使其值为当前的点号 No(J) = iResult End If End If Next I '设置最小为无穷大,最短路径点为空 MinS = 1E+38 MinPoint = 0 '找出已经查过点中长度最短的点 For I = iNode To J If RS(No(I)) < MinS Then II = I MinS = RS(No(I)) MinPoint = No(I) End If Next I '如果没有结果,即起点与终点没有通路,则退出程序 If MinS = 1E+38 Then MsgBox "即起点与终点没有通路!", vbOKOnly, "关于搜索最短路径" Exit Sub End If '将两点互换,减少循环。 No(II) = No(iNode) No(iNode) = MinPoint '标记已经作为结果点判断过 NodeUse(MinPoint) = True LL = MinPoint '判断结果点是否等于终点,如果等于则已经找到最短路径 If MinPoint = EndNo Then Exit For Next iNode 'Begin检索最短路径节点 ReDim NodeShortPath(1 To nNode) nNodeShortPath = 1 LL = MinPoint NodeShortPath(nNodeShortPath) = LL Do LL = ResultNo(LL) nNodeShortPath = nNodeShortPath + 1 NodeShortPath(nNodeShortPath) = LL If (LL = StartNo) Then Exit Do Loop 'End检索最短路径节点 ShortPath = result(EndNo) End Sub

“相关推荐”对你有帮助么?

  • 非常没帮助
  • 没帮助
  • 一般
  • 有帮助
  • 非常有帮助
提交
评论
添加红包

请填写红包祝福语或标题

红包个数最小为10个

红包金额最低5元

当前余额3.43前往充值 >
需支付:10.00
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包
实付
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明:

1.余额是钱包充值的虚拟货币,按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载,可以购买VIP、付费专栏及课程。

余额充值