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); } } }