circle = [1, 0, 0, 0, 1, 0, 1, 0, 2, 1]

def f(S):
    S = str(S)
    ret = 0
    eq = 0
    cnt = 0
    s = int(S[0])
    for i in range(1, s):
        ret += circle[i]
        cnt += 1
    eq = circle[s]
    for s in S[1:]:
        s = int(s)
        ret *= 10
        ret += cnt * 6
        cnt *= 10
        ret += 5
        cnt += 9
        for i in range(s):
            cnt += 1
            ret += eq + circle[i]
        eq += circle[s]
    return ret + eq



k = int(input())
l = 0
r = 10 ** 18
while r - l > 1:
    mid = (l + r) // 2
    if f(mid) >= k:
        r = mid
    else:
        l = mid
if f(r) == k:
    print(r)
else:
    print(-1)