Description


W 公司有 m 个仓库和 n 个零售商店。第 i 个仓库有 ai 个单位的货物;第 j 个零售商店需要 bj​ 个单位的货物。

货物供需平衡,即 ∑ai=∑bj​ 。

从第 i 个仓库运送每单位货物到第 j 个零售商店的费用为 cij​ ​​ 。

试设计一个将仓库中所有货物运送到零售商店的运输方案,使总运输费用最少。

Input


第 1 行有 2 个正整数 m 和 n ,分别表示仓库数和零售商店数。

接下来的一行中有 m 个正整数 ai​ ,表示第 i 个仓库有 ai​ 个单位的货物。

再接下来的一行中有 n 个正整数 bj​ ,表示第 j 个零售商店需要 bj 个单位的货物。

接下来的 m 行,每行有 n 个整数,表示从第 i 个仓库运送每单位货物到第 j 个零售商店的费用 cij​ 。

Output


两行分别输出最小运输费用和最大运输费用。

Sample Input


2 3

220 280

170 120 210

77 39 105

150 186 122

Sample Output


48500

69140

Hint


1≤n,m≤100

题解


学YJQ大佬用记事本打代码的第一题

这 跟上一道题有什么区别吗?!「网络流24题」负载平衡问题

还是有点区别的

从s往每个仓库连边,容量ai 费用0

从每个商店向t连边,容量bj 费用0

每个仓库向每个商店连边 容量INF 费用cij


还讲一下记事本打代码的初体验吧

注意力瞬间集中是真的,没那么在意手速也是真的

挂了两次 第一次CE(dfs(x,INF)

第二次 居然挂在n,m反向读入???woc???

果然还是个菜鸡啊QAQ

#include<cmath>
#include<queue>
#include<cstdio>
#include<cstring>
#include<iostream>
#include<algorithm>
using namespace std;
#define R register
const int INF=999999999;
int n,m,s,t;
struct emm{
int e,f,v,c;
}a[100007];
int h[207];
int tot=1;
void con(int u,int v,int w,int f)
{
a[++tot].f=h[u];
h[u]=tot;
a[tot].e=v;
a[tot].v=w;
a[tot].c=f;
a[++tot].f=h[v];
h[v]=tot;
a[tot].e=u;
a[tot].c=-f;
return;
}
void scan()
{
scanf("%d%d",&m,&n);
s=0,t=n+m+1;
for(R int i=1;i<=m;++i)
{
int x;
scanf("%d",&x);
con(s,i,x,0);
}
for(R int i=1;i<=n;++i)
{
int x;
scanf("%d",&x);
con(i+m,t,x,0);
}
for(R int i=1;i<=m;++i)
for(R int j=1;j<=n;++j)
{
int x;
scanf("%d",&x);
con(i,j+m,INF,x);
}
return;
}
queue<int>q;
bool sf[207];
int d[207];
bool spfa()
{
memset(sf,0,sizeof(sf));
memset(d,127,sizeof(d));
d[s]=0;sf[s]=1;q.push(s);
while(!q.empty())
{
int x=q.front();q.pop();
for(int i=h[x];i;i=a[i].f)
if(d[a[i].e]>d[x]+a[i].c&&a[i].v)
{
d[a[i].e]=d[x]+a[i].c;
if(!sf[a[i].e])
{
sf[a[i].e]=1;
q.push(a[i].e);
}
}
sf[x]=0;
}
return d[t]<INF;
}
long long ans=0;
int dfs(int x,int al)
{
if(x==t||!al)return al;
int fl=0;
for(int i=h[x];i;i=a[i].f)
if(d[a[i].e]==d[x]+a[i].c&&a[i].v&&!sf[a[i].e])
{
sf[a[i].e]=1;
int f=dfs(a[i].e,min(al,a[i].v));
if(f)
{
fl+=f;
al-=f;
ans+=f*a[i].c;
a[i].v-=f;
a[i^1].v+=f;
if(!al)break;
}
}
if(!fl)d[x]=-INF;
return fl;
}
void run()
{
while(spfa())
{
sf[t]=1;
while(sf[t])
{
memset(sf,0,sizeof(sf));
dfs(s,INF);
}
}
cout<<ans<<endl;
for(int i=2;i<=tot;i+=2)
{
a[i].v+=a[i^1].v;
a[i^1].v=0;
swap(a[i].c,a[i^1].c);
}
ans=0;
while(spfa())
{
sf[t]=1;
while(sf[t])
{
memset(sf,0,sizeof(sf));
dfs(s,INF);
}
}
cout<<-ans<<endl;
return;
}
int main()
{
scan();
run();
return 0;
}

下次要用没有自动对齐的纯·记事本 2333

「网络流24题」「LuoguP4015」 运输问题的更多相关文章

  1. LOJ6003 - 「网络流 24 题」魔术球

    原题链接 Description 假设有根柱子,现要按下述规则在这根柱子中依次放入编号为的球. 每次只能在某根柱子的最上面放球. 在同一根柱子中,任何2个相邻球的编号之和为完全平方数. 试设计一个算法 ...

  2. LOJ6002 - 「网络流 24 题」最小路径覆盖

    原题链接 Description 求一个DAG的最小路径覆盖,并输出一种方案. Solution 模板题啦~ Code //「网络流 24 题」最小路径覆盖 #include <cstdio&g ...

  3. LOJ6001 - 「网络流 24 题」太空飞行计划

    原题链接 Description 有个实验和个仪器,做实验有报酬买仪器有花费.每个实验都需要一些仪器,求最大净收益(实验报酬仪器花费),并输出一组方案. Solution 实验向所需仪器连边,实验的点 ...

  4. LOJ6000 - 「网络流 24 题」搭配飞行员

    原题链接 题意简述 求二分图的最大匹配. 题解 这里写的是匈牙利算法. 表示节点的当前匹配. 为真表示在这一轮匹配中,无法给节点一个新的匹配.所以如果为真就不用再dfs它了,直接continue就好. ...

  5. LibreOJ #6014. 「网络流 24 题」最长 k 可重区间集

    #6014. 「网络流 24 题」最长 k 可重区间集 内存限制:256 MiB时间限制:1000 ms标准输入输出 题目类型:传统评测方式:文本比较 上传者: 匿名 提交提交记录统计讨论测试数据   ...

  6. Libre 6013 「网络流 24 题」负载平衡 (网络流,最小费用最大流)

    Libre 6013 「网络流 24 题」负载平衡 (网络流,最小费用最大流) Description G 公司有n 个沿铁路运输线环形排列的仓库,每个仓库存储的货物数量不等.如何用最少搬运量可以使n ...

  7. Libre 6012 「网络流 24 题」分配问题 (网络流,费用流)

    Libre 6012 「网络流 24 题」分配问题 (网络流,费用流) Description 有n件工作要分配给n个人做.第i个人做第j件工作产生的效益为\(c_{ij}\).试设计一个将n件工作分 ...

  8. Libre 6011 「网络流 24 题」运输问题 (网络流,最小费用最大流)

    Libre 6011 「网络流 24 题」运输问题 (网络流,最小费用最大流) Description W 公司有m个仓库和n个零售商店.第i个仓库有\(a_i\)个单位的货物:第j个零售商店需要\( ...

  9. LibreOJ #6013. 「网络流 24 题」负载平衡 最小费用最大流 供应平衡问题

    #6013. 「网络流 24 题」负载平衡 内存限制:256 MiB时间限制:1000 ms标准输入输出 题目类型:传统评测方式:文本比较 上传者: 匿名 提交提交记录统计讨论测试数据   题目描述 ...

随机推荐

  1. Java使用IText(VM模版)导出PDF,IText导出word(二)

    ===============action=========================== //退款导出word    public void exportWordTk() throws IOE ...

  2. HDU 1501

    Zipper Time Limit: 2000/1000 MS (Java/Others)    Memory Limit: 65536/32768 K (Java/Others) Total Sub ...

  3. 用CSS美化你的HTML

    CSS的简介: 1.CSS的定义:层叠样式表.属性和属性值用冒号分隔开,以分号结尾(这些符号都是英文的). 2.CSS得引入方式: 行内引入:<div style="这里写样式&quo ...

  4. Oracle创建索引的原则(转)

    Oracle 建立索引及SQL优化 数据库索引: 索引有单列索引复合索引之说 如何某表的某个字段有主键约束和唯一性约束,则Oracle 则会自动在相应的约束列上建议唯一索引.数据库索引主要进行提高访问 ...

  5. C# json反序列化 对象中嵌套数组 (转载) 可能会导致循环或多重级联路径。请指定 ON DELETE NO ACTION 或 ON UPDATE NO ACTION,或修改其他 FOREIGN KEY 约束。

    C# json反序列化 对象中嵌套数组 (转载)   看图: 这里可以看到是二层嵌套!!使用C#如何实现?? 思路:使用list集合实现 → 建立类 → list集合 → 微软的   Newtonso ...

  6. Dell服务器相关操作

    1. Raid相关: # 删除已有的Raid配置 MegaCli64 -CfgLdDel -LALL -aALL # 获取设备ID和槽号 MegaCli64 -PDList -aALL|egrep ' ...

  7. C++结构体中使用函数与类中使用函数小结

    #include <iostream>#include <string.h>using namespace std;struct stud//学生信息结构体{    char ...

  8. 阿里云安装nginx 启动失败的原因。

    阿里云编译安装nginx服务器后启动一直报下面错误. 百度了一圈,看到一个说要先关掉apache服务,感觉这个好像是对的,立马做了下面操作. 果然把nginx起了起来. 从这边才知道apache和ng ...

  9. windows下在eclipse上远程连接hadoop集群调试mapreduce错误记录

    第一次跑mapreduce,记录遇到的几个问题,hadoop集群是CDH版本的,但我windows本地的jar包是直接用hadoop2.6.0的版本,并没有特意找CDH版本的 1.Exception ...

  10. ABAP debug遇到问题

    新项目的系统,调试是老出现这个框不断弹出,一堆出来 都来不及关. 不确定是不是因为可用对话框不够的原因.