#include using namespace std; using ll = long long; using ld = long double; //using ar2 = array; #define pb push_back #define all(x) (x).begin(),(x).end() #define rall(x) (x).rbegin(),(x).rend() #define pop_cnt(s) ll(popcount(uint64_t(s))) #define next_p(v) next_permutation(v.begin(), v.end()) template inline bool chmin(T& a, const T& b) {bool c=a>b; if(a>b) a=b; return c;} template inline bool chmax(T& a, const T& b) {bool c=a inline T gcd(T a,T b) {return (b==0)?a:gcd(b,a%b);} template inline T lcm(T a, T b) {return (a*b)/gcd(a,b);} template using vc = vector; template using vvc = vc>; template using vvvc = vc>; template using pq = priority_queue>; template using pq_g = priority_queue, greater>; const ll INF = 2e18; const vc dx = {1, 1, 1, 0, 0, -1, -1, -1}; const vc dy = {1, 0, -1, 1, -1, 1, 0, -1}; //ライブラリ貼るところ //ここまで void solve(){ ll n, m, p, y; cin >> n >> m >> p >> y; vector>> graph(n); for(int i = 0; i < m; ++i){ int a, b; cin >> a >> b; ll c; cin >> c; graph[--a].pb({--b, c}); graph[b].pb({a, c}); } vector cost(n, INF); cost[0] = 0; pq_g> q; q.push({0, 0}); while(!(q.empty())){ auto [cs, t] = q.top(); q.pop(); if(cost[t] != cs) continue; for(auto [nt, ncs]: graph[t]){ if(cost[nt] > cs + ncs){ cost[nt] = cs + ncs; q.push({cs + ncs, nt}); } } } ll ans = 0; for(int i = 0; i < p; ++i){ int d; cin >> d; --d; ll e; cin >> e; ll z = y - cost[d]; chmax(ans, z / e); } cout << ans << "\n"; } int main(){ cin.tie( nullptr ); ios::sync_with_stdio( false ); cout << setprecision( 15 ) << fixed; int t = 1; for(int i = 0; i < t; ++i) solve(); }