网络流太弱了，练一手。
餐巾规划问题
显然白天晚上是要分开建点的，同时为了保证最大流的要求，所以每个白天点都要向汇点连一条容量 \(r_i\)，费用为 0 的边。同时，由于你还要买毛巾，所以要从源点向每个白天点连一条容量不限、费用为 \(p\) 的边。
考虑由于每天会制造出 \(r_i\) 个脏毛巾，所以源点要向晚上点补偿性的连一条容量为 \(r_i\)，费用为 0 的边。同时，延迟洗毛巾、快洗店、慢洗店三种情况也都是从晚上点连出去的，比较容易，就不说了。
#include<bits/stdc++.h>
#define int long long
using namespace std;
const int N=4005,M=12*N;
int n,cst,ta,csa,tb,csb;
struct mcmf{int s,t,k,h[N],d[N];int to[M],nx[M],f[M],w[M];int vis[N],dis[N],vs[N];queue<int>q;inline void init(int fs,int ed){memset(h,0,sizeof(h)),k=1,s=fs,t=ed;}inline void add(int x,int y,int v,int cs){f[++k]=v,w[k]=cs,to[k]=y,nx[k]=h[x],h[x]=k;f[++k]=0,w[k]=-cs,to[k]=x,nx[k]=h[y],h[y]=k;}inline int spfa(){while(q.size()) q.pop();for(int i=s;i<=t;i++) vs[i]=0,dis[i]=1e18;q.push(s),d[s]=h[s],dis[s]=0;while(q.size()){int x=q.front();q.pop(),vis[x]=0,d[x]=h[x],vs[x]=1;for(int i=h[x];i;i=nx[i]){if(dis[to[i]]<=dis[x]+w[i]||!f[i]) continue;dis[to[i]]=dis[x]+w[i];if(!vis[to[i]]) vis[to[i]]=1,q.push(to[i]);}}return vs[t];}inline int dfs(int x,int ans){if(x==t) return ans;int sum=ans;vis[x]=1;for(int i=d[x];i&∑i=nx[i]){d[x]=i;if(dis[x]+w[i]>dis[to[i]]||!f[i]||vis[to[i]]) continue;int num=dfs(to[i],min(sum,f[i]));f[i]-=num,f[i^1]+=num,sum-=num;}return vis[x]=0,ans-sum;}inline int dinic(){int mnc=0;while(spfa()) mnc+=dfs(s,1e18)*dis[t];return mnc;}
}fee;
signed main(){ios::sync_with_stdio(0);cin.tie(0),cout.tie(0);cin>>n,fee.init(0,n*2+1);for(int i=1,r;i<=n;i++)cin>>r,fee.add(0,i+n,r,0),fee.add(i,n*2+1,r,0);cin>>cst>>ta>>csa>>tb>>csb;for(int i=1;i<=n;i++){fee.add(0,i,1e14,cst);if(i+ta<=n) fee.add(i+n,i+ta,1e14,csa);if(i+tb<=n) fee.add(i+n,i+tb,1e14,csb);if(i<n) fee.add(i+n,i+n+1,1e14,0);}cout<<fee.dinic();return 0;
}