val n = valOf (TextIO.scanStream (Int64.scan StringCvt.DEC) TextIO.stdIn);

val k = n div 3;

val s1 = k * (k + 1) div 2;
val s2 = s1 * (2 * k + 1) div 3;
val s3 = s1 * s1;

val a1 = 3*s1-2*k + (if 3*(k+1)-2 <= n then 3*(k+1)-2 else 0);
val a2 = 9*s2-6*s1+k + (if 3*(k+1)-1 <= n then (3*(k+1)-1)*(3*(k+1)-1) else 0);
val a3 = 27*s3;

val ans = a1+a2+a3;

print (Int64.toString ans ^ "\n");