记录编号 206050 评测结果 AAAAAAAAAA
题目名称 求和问题 最终得分 100
用户昵称 Gravatar二向箔 是否通过 通过
代码语言 Pascal 运行时间 1.919 s
提交时间 2015-11-05 21:45:51 内存使用 0.22 MiB
显示代码纯文本
var a:array[1..10000] of int64;
i:longint;
m,n,j,k:int64;
begin
assign(input,'sum.in');
assign(output,'sum.out');
reset(input);
rewrite(output);
readln(n);
for i:=1 to n do
begin
read(a[i]);
inc(a[i],a[i-1]);
end;
readln(m);
for i:=1 to m do
begin
readln(j,k);
writeln(a[k]-a[j-1]);
end;
close(input);
close(output);
end.