import std.stdio, std.string, std.conv;
import std.range, std.algorithm, std.array;

void main() {
    long n;
    long[long] memo;
    memo[0] = 1;

    long dfs(long m) {
        if (m in memo) {
            return memo[m];
        }
        else {
            memo[m] = dfs(m/3) + dfs(m/5);
            return memo[m];
        }
    }

    scan(n);
    writeln(dfs(n));
}



void scan(T...)(ref T args) {
    import std.stdio : readln;
    import std.algorithm : splitter;
    import std.conv : to;
    import std.range.primitives;

    auto line = readln().splitter();
    foreach (ref arg; args) {
        arg = line.front.to!(typeof(arg));
        line.popFront();
    }
    assert(line.empty);
}



void fillAll(R, T)(ref R arr, T value) {
    static if (is(typeof(arr[] = value))) {
        arr[] = value;
    }
    else {
        foreach (ref e; arr) {
            fillAll(e, value);
        }
    }
}