#include "bits/stdc++.h"
using namespace std;
#define FOR(i,j,k) for(int (i)=(j);(i)<(int)(k);++(i))
#define rep(i,j) FOR(i,0,j)
#define each(x,y) for(auto &(x):(y))
#define mp make_pair
#define all(x) (x).begin(),(x).end()
#define debug(x) cout<<#x<<": "<<(x)<<endl
#define smax(x,y) (x)=max((x),(y))
#define smin(x,y) (x)=min((x),(y))
#define MEM(x,y) memset((x),(y),sizeof (x))
#define sz(x) (int)(x).size()
typedef long long ll;
typedef pair<int, int> pii;
typedef vector<int> vi;
typedef vector<ll> vll;

string nstr(){
    static const int MAX_LEN = 1000000;
    static char res_[MAX_LEN];
    scanf("%s",res_);
    return string(res_);
}

int inverse(int x, int mod){
    long long a = x, b = mod, u = 1, v = 0;
    while(b) {
        long long t = a / b;
        a -= t * b;
        swap(a, b);
        u -= t * v;
        swap(u, v);
    }
    if(u < 0)u += mod;
    return (int)u;
}

int powMod(int n, int k, int mod){
    if(n==0)return 0;
    ll res = 1 % mod, nn = n;
    while(k){
        if(k&1)res=res*nn%mod;
        nn=nn*nn%mod;
        k>>=1;
    }
    return (int)res;
}

string S;


void solve() {

    int N = sz(S), ans = 0;
    if(count(all(S), '0') == N) {
        puts("0");
        return;
    }
    int t = 0, y = 1;
    rep(i, N) {
        if(i != 0) {
            int a = N - i, b = i;
            while(a % 3 == 0)t++, a /= 3;
            while(b % 3 == 0)t--, b /= 3;
            y = y*a*inverse(b, 9) % 9;
        }
        int x = t == 0 ? 1 : t == 1 ? 3 : 0;
        (ans += x * y * (S[i]-'0')) %= 9;
    }
    if(ans == 0)ans = 9;
    printf("%d\n", ans);
}

int main(){
    int T; cin >> T;
    while(T--) {
        S = nstr();
        solve();
    }
}