给出一个n,接下来有n行,每行一个整数,你要计算这n个整数的和 用pascal做

给出一个n,接下来有n行,每行一个整数,你要计算这n个整数的和 用pascal做
给出一个n,接下来有n行,每行一个整数,你要计算这n个整数的和 用pascal做

给出一个n,接下来有n行,每行一个整数,你要计算这n个整数的和 用pascal做
已试过,
程序如下：
program qiuhe;
var n,a,i,s:longint;
begin
  readln(n);
  for i:=1 to n do
    begin
      readln(a);
      s:=s+a;
    end;
  writeln('s=',s);
end.