#include <iostream>
#include <algorithm>
#include <string>
#include  <queue>
#include <vector>
#include  <cstdio>
#include <cstring>
#include<map>
#include<set>
#include <cmath>
#include<unordered_map>
//#include<bits/stdc++.h>
#define ll long long int
#define ull unsigned long long int
#define I(a) scanf("%d",&a)
#define I2(a,b) scanf("%d%d",&a,&b)
#define I3(a,b,c) scanf("%d%d%d",&a,&b,&c)
#define L(a) scanf("%lld",&a)
#define L2(a,b) scanf("%lld%lld",&a,&b)
#define L3(a,b,c) scanf("%lld%lld%lld",&a,&b,&c)
#define PI(a) printf("%d",a)
#define PL(a) printf("%lld",a)
#define PT(t) printf("Case %d: ",t)
#define PB push_back
#define x first
#define y second
#define xx first.first
#define xy first.second
#define yx second.first
#define yy second.second
#define SC scanf
#define PC printf
#define NL printf("\n")
#define SET(a) memset(a,0,sizeof a)
#define SETR(a) memset(a,-1,sizeof a)
#define SZ(a) ((int)a.size())-1
#define f(i,a,b) for(int i=a;i<=b; i++)
#define fr(i,a,b) for(int i=a;i<=b; i++)
#define frr(i,a,b) for(int i=a;i>=b; i--)
#define frv(i,a)  for(int i=0;i<a.size();i++)
#define pi 2.0*acos(0.0)
#define R(a) freopen(a, "r", stdin);
#define W(a) freopen(a, "w", stdout);
#define CB(x) __builtin_popcount(x)
#define STN(a) stringtonumber<ll>(a)
#define lol printf("BUG\n")
#define Endl "\n"
#define mk make_pair
using namespace std;
template <class T> inline T BM(T p, T e, T M)
{
    ll ret = 1;
    for(; e > 0; e >>= 1)
    {
        if(e & 1) ret = (ret * p) % M;
        p = (p * p) % M;
    }
    return (T)ret;
}
template <class T> inline T mul(T p, T e, T M)
{
    ll ret = 0;
    for(; e > 0; e >>= 1)
    {
        if(e & 1) ret = (ret + p) ;
        p = (p + p) ;
        if(ret>=M)ret-=M;
        if(p>=M)p-=M;
    }
    return (T)ret;
}
template <class T> inline T gcd(T a, T b)
{
    if(b == 0)return a;
    return gcd(b, a % b);
}
template <class T> inline T mdINV(T a, T M)
{
    return BM(a, M - 2, M);
}
template <class T> inline T PW(T p, T e)
{
    ll ret = 1;
    for(; e > 0; e >>= 1)
    {
        if(e & 1) ret = (ret * p);
        p = (p * p);
    }
    return (T)ret;
}
 
 
template <class T>bool ISLEFT(T a, T b, T c)
{
    if(((a.xx - b.xx) * (b.yy - c.yy) - (b.xx - c.xx) * (a.yy - b.yy)) < 0.0)return 1;  //Uporer dike //A,b,c, x okkher ordera sorted
    else return 0;
}
 

#define  mx 2000000000000000ll
#define base 193ll
 
typedef pair<int,int >P;
//////////////////////////
////////////////////////
#define F(i,a,b) for(int i=a;i<b; i++)
#define LL long long
#define MX  10000000
#define md 998244353ll
///////////////////////////
///////////////////////////
///
int n;
char ar[12];
int DP[12][2][8];
int dx[] = {0,0,0,1,0,2,0,3,0,0};
int dp(int pos, int fl, int mu){
    //cout<<pos<<fl<<mu<<endl;
    if(pos == n+1){
        if(mu==7)return 1;
        return 0;
    }
    int &ret = DP[pos][fl][mu];

    if(ret!=-1)return ret;
    int lo = 0;
    int hi = 9;
    if(fl == 0){
        hi = ar[pos] - '0';
    }
    ret = 0;
    for(int i = lo;i<=hi;i++){
        if(!(i==3|| i==5||i==7))continue;
        if(i == hi){
            ret += dp(pos + 1, fl,mu |  (dx[i] > 0 ?(1<<(dx[i]-1)): 0));
        }
        else ret+= dp(pos + 1, 1 ,mu |  (dx[i] > 0 ?(1<<(dx[i]-1)): 0));
    }
    return ret;

}
int main(){
    SC("%s", ar+1);
    n = strlen(ar+1);

    memset(DP, -1, sizeof DP);

    int ans =dp(1, 0, 0);
    for(int i = 2;i<=n;i++){
        ans+=dp(i, 1, 0);
    }
    cout<<ans<<Endl;
    
    return 0;
}

Measured memory_bytes: 256