program vijos1307;

var

n,totle :int64;

procedure count(x:int64);

begin

if x=n+1 then exit;

totle:=sqr(x)+totle;

inc(x);

count(x);

end;

begin

totle:=0;

readln(n);

count(1);

writeln(totle);

end.

哪个大牛指点一下:第8个数据错误202,堆栈溢出,为什么那.感激不尽