noname40

#define ll long long
ll beautifulNumberCt(ll arg1)
{
    ll x = arg1, n = 1;
    ll a[100] = {};
    a[0] = 1;
    while (a[n-1] < x){
        a[n] = 3*a[n-1];
        n++;
    }
    for (ll i = n-1; i>=0; i--)
        if(x >= a[i])
            x -= a[i];
    return arg1 - x;
}