#include <iostream>
#include <iomanip>
#include <fstream>
#include <string>
#include <array>
#include <vector>
#include <deque>
#include <list>
#include <set>
#include <map>
#include <unordered_map>
#include <unordered_set>
#include <stack>
#include <queue>
#include <bitset>
#include <tuple>
#include <cmath>
#include <complex>
#include <algorithm>
#include <utility>
#include <regex>
#include <cstdint>
#include <numeric>
#include <functional>
#include <cassert>

using namespace std;
using ll = long long;
using ull = unsigned long long;

constexpr ll INF = 1'000'000'000'000'000'000;
namespace utils{
#define ALL(x) begin(x), end(x)
#define rALL(x) rbegin(x), rend(x)
    template<class T, class Compare> using p_queue = priority_queue<T, vector<T>, Compare>;
    template<class T> using min_queue = p_queue<T, greater<T>>;
    template<class T> using max_queue = p_queue<T, less<T>>;

    template<class T> bool min_update(T& X, const T& A){ if(X > A) {X = A; return true;} return false; }
    template<class T> bool max_update(T& X, const T& A){ if(X < A) {X = A; return true;} return false; }
    using V_Set = unordered_set<int>;
    using E_Set = unordered_map<int, V_Set>;

    ll operator"" _64(unsigned long long x){ return ll(x); }
    ull operator"" _64u(unsigned long long x){ return ull(x); }

    template<class T>
    vector<T> make_vector(int n, T t){
        return vector<T>(n, t);
    }
    template<class ...Ts>
    auto make_vector(int n, Ts ... ts){
        return vector<decltype(make_vector(ts...))>(n, make_vector(ts...));
    }

    template<class T>
    ostream& operator<<(ostream& os, const vector<T>& v){
        for (auto &&x : v) { os << x << ' '; } cout << endl; return os ;
    }
}
using namespace utils;

class solver{
    istream& is;
    ostream& os;

public:
    solver(istream& I, ostream& O) :is(I), os(O) {}
    vector<vector<pair<ll, ll>>> d;


    void run(){
        ll N, M, L;
        is >> N >> M >> L;
        if(!is) return;
        d = make_vector(N, N, make_pair(INF, INF));
        for (int i = 0; i < M; ++i) {
            ll a, b, c;
            is >> a >> b >> c;
            a--; b--;
            if(c > L) continue;
            d[a][b] = {0, c};
            d[b][a] = {0, c};
        } // end i
        for (int i = 0; i < N; ++i) {
            d[i][i] = {0, 0};
        } // end i

        for (int k = 0; k < N; ++k) {
            for (int i = 0; i < N; ++i) {
                for (int j = 0; j < N; ++j) {
                    ll t1, t2, m1, m2;
                    tie(t1, m1) = d[i][k];
                    tie(t2, m2) = d[j][k];
                    if(m1 + m2 <= L)
                        min_update(d[i][j], {0,  m1 + m2});
                } // end j
            } // end i
        } // end k
        for (int k = 0; k < N; ++k) {
            for (int i = 0; i < N; ++i) {
                for (int j = 0; j < N; ++j) {
                    ll t1, t2, m1, m2;
                    tie(t1, m1) = d[i][k];
                    tie(t2, m2) = d[j][k];
                    min_update(d[i][j], {t1+t2+1, m2});
                } // end j
            } // end i
        } // end k

        int Q;
        is >> Q;
        for (int i = 0; i < Q; ++i) {
            int s, t;
            is >> s >> t;
            s--; t--;
            ll ans = d[s][t].first;
            if(ans == INF) ans = -1;
            os << ans << endl;
        } // end i



    }
};

int main(int argc, char *argv[]) {
    cin.tie(nullptr);
    ios::sync_with_stdio(false);
    cout << setprecision(16) << scientific;
#ifdef DEBUG
    string test_cases = "test_E.txt";
    cerr << test_cases << " -->" << endl;
    auto fs = fstream(test_cases, fstream::in);
    int loop = 0;
    while(fs) {
        loop++;
        cout << '#' << loop << "#------\n";
        solver(fs, cout).run();
    }
    if(loop <= 1) {
        cout << "===" << endl;
        while(cin) solver(cin, cout).run();
    }
#else
    solver(cin, cout).run();
#endif
    return 0;
}


Measured memory_bytes: 1920