jzxx1303数列求和

题目描述
有一数列如下： 1 2 4 7 11 16 22…… 试求该数列前N项之和。

输入
一个整数N（ 0 < N < 1000 ）。

输出
一个整数。

样例输入
6
样例输出
41

满分代码：
var
    n,i,s:longint;
begin
    readln(n);
    for i:=1 to n do s:=s+(i*i-i+2) div 2;
    writeln(s);
end.