n = str(pow(10, int(input())))
m = len(n)
MOD = 1000_000_007
dp = [[[0]*11 for _ in range(2)] for _ in range(m+1)]
dp[0][0][0] = 1
for i in range(m):
    for j in range(10):
        dp[i][0][j+1] += dp[i][0][j]
        dp[i][1][j+1] += dp[i][1][j]

    for x in range(10):
        dp[i+1][0][x] += dp[i][0][x]
        dp[i+1][0][x] %= MOD

        dp[i+1][1][x] += dp[i][0][x]
        dp[i+1][1][x] += dp[i][1][x]
        dp[i+1][1][x] %= MOD

ans = dp[m][0][9] % MOD
# print(*dp, sep="\n")
# ans = (sum(dp[m][0])+sum(dp[m][1])) % MOD
print(ans)