program CiklasFor; var n : integer; a, suma : integer; i : integer; begin readln(n); suma := 0; for i := 2 to n do begin a := (i*i*i); suma := suma + a; end; writeln (suma); readln; end.