long long Pow(long long a, long long b)
{
    long long res = 1;
    while(b > 0){
        if(b % 2 != 0) res = (res * a) % 10000;
        a = (a * a) % mod;
        b /= 2;
    }
    return res;
}