4817:【一维数组】元素求和 分数: 1

题目描述

对于一个有N(N<1000)个元素的数组进行K(K<2100)次区间求和。

输入格式

第一行:一个正整数N

第二行:N个正整数,表示数组中的N个元素,每个整数不超过10000,数值之间用一个空格分隔。

第三行:一个正整数K,表示进行K次区间求和。

接下来K行:每行两个整数i和j,表示计算第i个数组元素到第j个数组元素的和,包括第i个和第j个。

输出

共K行,每行对应一次求和的结果。

样例输入

10
1 2 3 4 5 6 7 8 9 10
3
1 3
1 5
6 10

样例输出

6
15
40
program p4817;

var a:array[1..10000] of integer;
    i,n,j,b,k,m,s,h:longint;
    d:char;
begin
 readln(n);
 for i:=1 to n do
  begin
   read(b,d);
   a[i]:=b;
  end;
  readln(k);
  for j:=1 to k do
   begin
    read(m,d,h);
    s:=0;
    for i:=m to h do
     s:=s+a[i];
    writeln(s);
   end;
end.

阅读更多
版权声明:本文为博主原创文章,未经博主允许不得转载。 https://blog.csdn.net/jing1223639316/article/details/46826579
个人分类: 编程
想对作者说点什么? 我来说一句

没有更多推荐了,返回首页

不良信息举报

4817:【一维数组】元素求和 分数: 1

最多只允许输入30个字

加入CSDN,享受更精准的内容推荐,与500万程序员共同成长!
关闭
关闭