package contest171104; import java.io.ByteArrayInputStream; import java.io.IOException; import java.io.InputStream; import java.io.PrintWriter; import java.util.Arrays; import java.util.InputMismatchException; public class D { InputStream is; PrintWriter out; String INPUT = ""; void solve() { long n = nl(); out.println(count(n) - count(n-1)); } long count(long n) { if(n < 0)return 0; int[] ds = Long.toBinaryString(n).chars().map(x -> x - '0').toArray(); ds = rev(ds); return countDivisbleBinomialCoefficient(ds, 2, 1); } public static int[] rev(int[] a) { int[] b = new int[a.length]; for(int i = 0;i < a.length;i++)b[a.length-1-i] = a[i]; return b; } public static long countDivisbleBinomialCoefficient(int[] ds, int P, int alpha) { int m = ds.length; long[][][] pre = new long[alpha+1][2][2]; // [score][edge or not][have carry to next] long[][][] cur = new long[alpha+1][2][2]; pre[0][1][0] = 1; long pmajor = (long)(P+1)*P/2; long pminor = (long)(P-1)*P/2; for(int i = m-1;i >= 0;i--){ // digit i for(int j = 0;j <= alpha;j++){ cur[j][0][0] = cur[j][0][1] = 0; cur[j][1][0] = cur[j][1][1] = 0; } long edge = ds[i]; long eminor0 = (edge+1)*edge/2; // = lenbuf){ ptrbuf = 0; try { lenbuf = is.read(inbuf); } catch (IOException e) { throw new InputMismatchException(); } if(lenbuf <= 0)return -1; } return inbuf[ptrbuf++]; } private boolean isSpaceChar(int c) { return !(c >= 33 && c <= 126); } private int skip() { int b; while((b = readByte()) != -1 && isSpaceChar(b)); return b; } private double nd() { return Double.parseDouble(ns()); } private char nc() { return (char)skip(); } private String ns() { int b = skip(); StringBuilder sb = new StringBuilder(); while(!(isSpaceChar(b))){ // when nextLine, (isSpaceChar(b) && b != ' ') sb.appendCodePoint(b); b = readByte(); } return sb.toString(); } private char[] ns(int n) { char[] buf = new char[n]; int b = skip(), p = 0; while(p < n && !(isSpaceChar(b))){ buf[p++] = (char)b; b = readByte(); } return n == p ? buf : Arrays.copyOf(buf, p); } private int[] na(int n) { int[] a = new int[n]; for(int i = 0;i < n;i++)a[i] = ni(); return a; } private long[] nal(int n) { long[] a = new long[n]; for(int i = 0;i < n;i++)a[i] = nl(); return a; } private char[][] nm(int n, int m) { char[][] map = new char[n][]; for(int i = 0;i < n;i++)map[i] = ns(m); return map; } private int[][] nmi(int n, int m) { int[][] map = new int[n][]; for(int i = 0;i < n;i++)map[i] = na(m); return map; } private int ni() { return (int)nl(); } private long nl() { long num = 0; int b; boolean minus = false; while((b = readByte()) != -1 && !((b >= '0' && b <= '9') || b == '-')); if(b == '-'){ minus = true; b = readByte(); } while(true){ if(b >= '0' && b <= '9'){ num = num * 10 + (b - '0'); }else{ return minus ? -num : num; } b = readByte(); } } private static void tr(Object... o) { System.out.println(Arrays.deepToString(o)); } }