k=int(input())

i=0
n=1
m=1
ans=[]

while True:
    i+=54*10**(n-2)*(n-1)+10**(n-1)*5
    if i>=k: 
        i-=54*10**(n-2)*(n-1)+10**(n-1)*5
        i=int(i)
        break
    n+=1
#iにはn-1桁までの累計、nは答えの桁数    





def func(lis,n,l,i,k):
    m=0
    x=lis.count(4)+lis.count(6)+lis.count(8)*2+lis.count(9)+lis.count(0)
    while True:
        i+=(n-l-1)*6*10**(n-l-2)+x*10**(n-l-1)
            
        if m==0 or m==4 or m==6 or m== 9:
            i+=10**(n-l-1)
            if i>=k:
                i-=10**(n-l-1)+(n-l-1)*6*10**(n-l-2)+x*10**(n-l-1)
                break
        
        if m==8:
            i+=2*10**(n-l-1)
            if i>=k:
                i-=(n-l-1)*6*10**(n-l-2)+x*10**(n-l-1)+2*10**(n-l-1)
                break
                
        if i>=k:
            i-=(n-l-1)*6*10**(n-l-2)+x*10**(n-l-1)
            break
        m+=1
    return m,int(i)

def func2(lis,i,k):
    boo=False
    m=0
    x=lis.count(4)+lis.count(6)+lis.count(8)*2+lis.count(9)+lis.count(0)
    while m<10:
        i+=x
            
        if m==0 or m==4 or m==6 or m== 9:
            i+=1
            if i==k: 
                boo=True
                break
        if m==8:
            i+=2
            if i==k:
                boo=True
                break
        if i==k:
            boo=True
            break
        m+=1
    return m,boo


            
if n==1:
    m,boo=func2([],0,k+1)
    ans.append(m)
else:
    while m<10:
        i+=(n-1)*10**(n-2)*6
        if i>=k: 
            i-=(n-1)*10**(n-2)*6
            break
        
        if m==4 or m==6 or m==9:
            i+=10**(n-1)
            if i>=k:
                i-=10**(n-1)+(n-1)*10**(n-2)*6
                break
        elif m==8:
            i+=2*10**(n-1)
            if i>=k: 
                i-=2*10**(n-1)+(n-1)*10**(n-2)*6
                break
        m+=1  
    #mはn桁目の数字、iはn桁目が1~m-1までの累計
    
    ans.append(m)
    for l in range(n-2):
        m,i=func(ans,n,l+1,i,k)
        ans.append(m)
    m,boo=func2(ans,i,k)
    ans.append(m)

if boo==False: print(-1)
elif k==0: print(1)
else:
    t=0
    for i in range(len(ans)):
        t+=ans[i]*10**(n-i-1)
    print(t)