首页 > 代码库 > 2015金币

2015金币

题目描述 Description

国王将金币作为工资,发放给忠诚的骑士。第一天,骑士收到一枚金币;之后两天

(第二天和第三天),每天收到两枚金币;之后三天(第四、五、六天),每

天收到三枚金币;之后四天(第七、八、九、十天),每天收到四枚金币……;

这种工资发放模式会一直这样延续下去:当连续N天每天收到N枚金币后,骑士会在

之后的连续N+1天里,每天收到N+1枚金币。请计算在前K天里,骑士一共获得了多少金币。

输入描述 Input Description

输入文件只有1行,包含一个正整数K,表示发放金币的天数。

输出描述 Output Description

输出文件只有1行,包含一个正整数,即骑士收到的金币数。

样例输入 Sample Input

1:

    6

2:

    1000

3:

    1

样例输出 Sample Output

1:

    14

2:

    29820

3:

    1

数据范围及提示 Data Size & Hint

1<=k<=10000

 

 

题解:

模拟。

普及组送分题,实在太简单了。

var n,k,ans:longint;

begin

 readln(n);

 k:=1;

 while n>=k do

  begin

   ans:=ans+sqr(k);

   n:=n-k;

   inc(k);

  end;

 write(ans+n*k);

end.

2015金币