m:-readln([N]),format("~d
",N*(N+1)*(N*2+1)/6),m.