#408102 (C++11) No.788 トラックの移動

• 問題: No.788 トラックの移動
• ユーザー: hamray
• 提出日時: 2019-12-13 04:16:21
• 言語: C++11 (gcc 11.4.0)
• 結果: AC
• 実行時間: 453 ms / 2,000 ms
• コード長: 9,786 bytes
• コンパイル時間: 2,024 ms
• コンパイル使用メモリ: 180,656 KB
• 実行使用メモリ: 35,072 KB
• 最終ジャッジ日時: 2024-05-08 23:02:55
• 合計ジャッジ時間: 5,106 ms
• ジャッジサーバーID （参考情報）: judge1 / judge3

入力	結果	実行時間; 実行使用メモリ
testcase_00	AC	450 ms; 35,072 KB
testcase_01	AC	2 ms; 5,248 KB
testcase_02	AC	2 ms; 5,248 KB
testcase_03	AC	2 ms; 5,376 KB
testcase_04	AC	109 ms; 15,360 KB
testcase_05	AC	440 ms; 35,072 KB
testcase_06	AC	453 ms; 35,072 KB
testcase_07	AC	2 ms; 5,376 KB
testcase_08	AC	2 ms; 5,376 KB
testcase_09	AC	2 ms; 5,376 KB
testcase_10	AC	2 ms; 5,376 KB
testcase_11	AC	2 ms; 5,376 KB
testcase_12	AC	2 ms; 5,376 KB
testcase_13	AC	2 ms; 5,376 KB
testcase_14	AC	2 ms; 5,376 KB
testcase_15	AC	109 ms; 35,072 KB
testcase_16	AC	358 ms; 35,072 KB

ソースコード

#include <bits/stdc++.h>
 
#define M_PI       3.14159265358979323846
 
using namespace std;
 
 
//typedef
//-------------------------#include <bits/stdc++.h>
 
#define M_PI       3.14159265358979323846
 
using namespace std;
 
//conversion
//------------------------------------------
inline int toInt(string s) { int v; istringstream sin(s); sin >> v; return v; }
template<class T> inline string toString(T x) { ostringstream sout; sout << x; return sout.str(); }
inline int readInt() { int x; scanf("%d", &x); return x; }
 
//typedef
//------------------------------------------
typedef vector<int> VI;
typedef vector<VI> VVI;
typedef vector<string> VS;
typedef pair<int, int> PII;
typedef pair<int, PII> TIII;
typedef long long LL;
typedef unsigned long long ULL;
typedef vector<LL> VLL;
typedef vector<VLL> VVLL;
 
 
//container util
 
//------------------------------------------
#define ALL(a)  (a).begin(),(a).end()
#define RALL(a) (a).rbegin(), (a).rend()
#define PB push_back
#define MP make_pair
#define SZ(a) int((a).size())
#define SQ(a) ((a)*(a))
#define EACH(i,c) for(typeof((c).begin()) i=(c).begin(); i!=(c).end(); ++i)
#define EXIST(s,e) ((s).find(e)!=(s).end())
#define SORT(c) sort((c).begin(),(c).end())
 
//repetition
//------------------------------------------
#define FOR(i,s,n) for(int i=s;i<(int)n;++i)
#define REP(i,n) FOR(i,0,n)
#define MOD 1000000007
 
#define rep(i, a, b) for(int i = a; i < (b); ++i)
#define trav(a, x) for(auto& a : x)
#define all(x) x.begin(), x.end()
#define sz(x) (int)(x).size()
 
 
 
typedef long long ll;
typedef pair<int, int> pii;
typedef vector<int> vi;
const double EPS = 1E-8;
 
#define chmin(x,y) x=min(x,y)
#define chmax(x,y) x=max(x,y)
const int INF = 100000000;
 
struct Edge {
    int to, from;
    ll cost;
    Edge(int from, int to, ll cost): from(from), to(to), cost(cost) {}
};
 
class UnionFind {
public:
    vector <ll> par; 
    vector <ll> siz; 
    
    vector <ll> maxv;
    UnionFind(ll sz_): par(sz_), siz(sz_, 1LL) {
        for (ll i = 0; i < sz_; ++i) par[i] = i;
    }
    void init(ll sz_) {
        par.resize(sz_);
        siz.assign(sz_, 1LL);
        for (ll i = 0; i < sz_; ++i) par[i] = i;
    }
 
    ll root(ll x) { 
        while (par[x] != x) {
            x = par[x] = par[par[x]];
        }
        return x;
    }
 
    bool merge(ll x, ll y) {
        x = root(x);
        y = root(y);
        if (x == y) return false;
        if (siz[x] < siz[y]) swap(x, y);
        siz[x] += siz[y];
        par[y] = x;
        return true;
    }
 
    bool issame(ll x, ll y) { 
        return root(x) == root(y);
    }
 
    ll size(ll x) { 
        return siz[root(x)];
    }
};
 
typedef vector<vector<Edge>> AdjList;
AdjList graph;
 
ll mod_pow(ll x, ll n, ll mod){
    ll res = 1;
    bool c = false;
    while(n){
        if(n&1) res = res * x;
 
        if(res > mod){
            c = true;
            res %= mod;
        }
        x = x * x %mod;
        n >>= 1;
    }
    if(c) return mod;
    return res;
}
 
#define SIEVE_SIZE 5000000+10
bool sieve[SIEVE_SIZE];
void make_sieve(){
    for(int i=0; i<SIEVE_SIZE; ++i) sieve[i] = true;
    sieve[0] = sieve[1] = false;
    for(int i=2; i*i<SIEVE_SIZE; ++i) if(sieve[i]) for(int j=2; i*j<SIEVE_SIZE; ++j) sieve[i*j] = false;
}
 
bool isprime(ll n){
    if(n == 0 || n == 1) return false;
    for(ll i=2; i*i<=n; ++i) if(n%i==0) return false;
    return true;
}
 
template<typename T>
vector<T> gauss_jordan(const vector<vector<T>>& A, const vector<T>& b){
    int n = A.size();
    vector<vector<T>> B(n, vector<T>(n+1));
 
    for(int i=0; i<n; ++i){
        for(int j=0; j<n; ++j){
            B[i][j] = A[i][j];
        }
    }
 
    for(int i=0; i<n; ++i) B[i][n] = b[i];
 
    for(int i=0; i<n; ++i){
        int pivot = i;
        for(int j=i; j<n; ++j){
            if(abs(B[j][i]) > abs(B[pivot][i])) pivot = j;
        }
        swap(B[i], B[pivot]);
 
        if(abs(B[i][i]) < EPS) return vector<T>(); //解なし
 
        for(int j=i+1; j<=n; ++j) B[i][j] /= B[i][i];
        for(int j=0; j<n; ++j){
            if(i != j){
                for(int k=i+1; k<=n; ++k) B[j][k] -= B[i][j] * B[i][k];
            }
        }
    }
 
    vector<T> x(n);
 
    for(int i=0; i<n; ++i) x[i] = B[i][n];
    return x;
    
}
 
 
 
 
typedef vector<ll> vec;
typedef vector<vec> mat;
 
mat mul(mat &A, mat &B) {
    mat C(A.size(), vec((int)B[0].size()));
    for(int i=0; i<A.size(); ++i){
        for(int k=0; k<B.size(); ++k){
            for(int j=0; j<B[0].size(); ++j){
                C[i][j] = (C[i][j] + A[i][k] * B[k][j] %MOD) % MOD;
            }
        }
    }
    return C;
}
mat mat_pow(mat A, ll n) {
    mat B(A.size(), vec((int)A.size()));
 
    for(int i=0; i<A.size(); ++i){
        B[i][i] = 1;
    }
 
    while(n > 0) {
        if(n & 1) B = mul(B, A);
        A = mul(A, A);
        n >>= 1;
    }
    return B;
}
 
bool operator<(const pii& a, const pii& b){
    if(a.first == b.first) return a.second < b.second;
    return a.first < b.first;
}
 
const int MAX = 510000;
long long fac[MAX], finv[MAX], inv[MAX];
 
// テーブルを作る前処理
void COMinit() {
    fac[0] = fac[1] = 1;
    finv[0] = finv[1] = 1;
    inv[1] = 1;
    for (int i = 2; i < MAX; i++){
        fac[i] = fac[i - 1] * i % MOD;
        inv[i] = MOD - inv[MOD%i] * (MOD / i) % MOD;
        finv[i] = finv[i - 1] * inv[i] % MOD;
    }
}
 
// 二項係数計算
long long COM(int n, int k){
    if (n < k) return 0;
    if (n < 0 || k < 0) return 0;
    return fac[n] * (finv[k] * finv[n - k] % MOD) % MOD;
}
 
int bit[1000010];
int sums(int i){
    i++;
    int s = 0;
    while(i > 0){
        s += bit[i];
        i -= i & -i;
    }
    return s;
}
void add(int i, int x){
    i++;
    while(i <= 1000010){
        bit[i] += x;
        i += i & -i;
    }
}
long long extGCD(long long a, long long b, long long &x, long long &y) {
    if (b == 0) {
        x = 1;
        y = 0;
        return a;
    }
    long long d = extGCD(b, a%b, y, x);
    y -= a/b * x;
    return d;
}
 
ll GCD(ll a, ll b){
    
    if(b == 0) return a;
    return GCD(b, a%b);
}
 
struct BipartiteMatching {
  vector< vector< int > > graph;
  vector< int > match, alive, used;
  int timestamp;
 
  BipartiteMatching(int n) : graph(n), alive(n, 1), used(n, 0), match(n, -1), timestamp(0) {}
 
  void add_edge(int u, int v) {
    graph[u].push_back(v);
    graph[v].push_back(u);
  }
 
  bool dfs(int idx) {
    used[idx] = timestamp;
    for(auto &to : graph[idx]) {
      int to_match = match[to];
      if(alive[to] == 0) continue;
      if(to_match == -1 || (used[to_match] != timestamp && dfs(to_match))) {
        match[idx] = to;
        match[to] = idx;
        return true;
      }
    }
    return false;
  }
 
  int bipartite_matching() {
    int ret = 0;
    for(int i = 0; i < graph.size(); i++) {
      if(alive[i] == 0) continue;
      if(match[i] == -1) {
        ++timestamp;
        ret += dfs(i);
      }
    }
    return ret;
  }
 
  void output() {
    for(int i = 0; i < graph.size(); i++) {
      if(i < match[i]) {
        cout << i << "-" << match[i] << endl;
      }
    }
  }
};

ll N, M, L;
ll t[2010];
ll dist2[2010][2010];
vector<vector<pair<ll, ll>>> G(2010);

vector<ll> dist;
vector<ll> prever;
vector<ll> get_path(int t){
    vector<ll> path;
    for(; t != -1; t = prever[t]){
        path.push_back(t);
    }
    reverse(all(path));
    return path;
}

int main() {
    cin.tie(0);
    ios::sync_with_stdio(false);
    cout << fixed << setprecision(15);
    
    cin >> N >> M >> L;
    L--;
    int cnt=0;
    REP(i,N) {
        cin >> t[i];
        cnt += t[i];

    }
    
    if(cnt == 1){
        cout << 0 << endl;
        return 0;
    }
    REP(i,M){
        ll a, b, c; cin >> a >> b >> c;

        a--; b--;
        G[a].PB({b, c});
        G[b].PB({a, c});
    }

    REP(i,N) REP(j,N) dist2[i][j] = INT_MAX;
    // L -> i の最短距離と経路復元

    dist = vector<ll>(N, (1LL << 60));
    prever = vector<ll>(N, -1);
    dist[L] = 0;
    {
        priority_queue<pair<ll,ll>, vector<pair<ll,ll>>, greater<pair<ll,ll>>> q;
        q.push({0, L});
    
        while(q.size()){
            pair<ll,ll> p = q.top();
            q.pop();
            int v = p.second;
            if(dist[v] < p.first) continue;

            for(auto e: G[v]){
                int u = e.first, cost = e.second;
                if(dist[u] > dist[v] + cost){
                    dist[u] = dist[v] + cost;
                    prever[u] = v;
                    q.push({dist[u], u});
                }
            }
        }
    }
    for(int i=0; i<N; i++){
        dist2[i][i] = 0;
        priority_queue<pair<ll,ll>, vector<pair<ll,ll>>, greater<pair<ll,ll>>> q;
        q.push({0, i});

        while(q.size()){
            pair<ll,ll> p = q.top();
            q.pop();
            int v = p.second;
            if(dist2[i][v] < p.first) continue;

            for(auto e: G[v]){
                int u = e.first, cost = e.second;
                if(dist2[i][u] > dist2[i][v] + cost){
                    dist2[i][u] = dist2[i][v] + cost;
                    
                    q.push({dist2[i][u], u});
                }
            }
        }
        

    }

    ll ans = (1LL << 60);

    for(int i=0; i<N; i++){
        // i にトラックを集める
        int tt[N];
        for(int j=0; j<N; j++) tt[j] = t[j];

        vector<ll> path = get_path(i);
        for(int j=0; j<path.size(); j++){
            if(tt[path[j]]){
                tt[path[j]]--;
                break;
            }
        }

        ll tmp = dist2[L][i];
        for(int j=0; j<N; j++){
            tmp += tt[j] * 2 * dist2[i][j];
        }
        ans = min(ans, tmp);
        
        
    }
    
    cout << ans << endl;
    return 0;
}